working on fortran read