FORTRAN optimization