- add missing "_d 0" where it's needed - define and use reciprocal of Ny-1 (in place of division by float(Ny-1):   has small effect on trucation error but this avoid to fall on single-prec   operation in expression like: float((jG-1))/float((Ny-1))*37.5d0 - use standard routine (S/R GET_PERIODIC_INTERVAL) to decide when it is time   to load new forcing arrays. + some editing (improve indentation).
- add missing "_d 0" where it's needed
- define and use reciprocal of Ny-1 (in place of division by float(Ny-1):
  has small effect on trucation error but this avoid to fall on single-prec
  operation in expression like: float((jG-1))/float((Ny-1))*37.5d0
- use standard routine (S/R GET_PERIODIC_INTERVAL) to decide when it is time
  to load new forcing arrays.
+ some editing (improve indentation).

altMITgcm/MITgcm66h,altMITgcm/MITgcm66h,altMITgcm/MITgcm66h,altMITgcm/MITgcm66h,altMITgcm/MITgcm66h,altMITgcm/MITgcm66h,altMITgcm/MITgcm66h,altMITgcm/MITgcm66h