Fix fortran error