[MITgcm-cvs] MITgcm/pkg/cheapaml CVS Commit

[Jean-Michel Campin]

Update of /u/gcmpack/MITgcm/pkg/cheapaml
In directory forge:/tmp/cvs-serv8140

Modified Files:
	cheapaml_fields_load.F 
Log Message:
- 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).