fortran: minor style thing