fortran_exercise