Trim Fortran