working fortran version