From fortran_lib/0f8789e6fc7e028b115ab2c030bde4e36085eb10