From fortran_lib/b7c21c30ad7ecbf9a615aa97e477889bf8cf046b