fortran unit test