MODULE temps_mod IMPLICIT NONE INTEGER itaufin ! total number of dynamical steps for the run INTEGER*4 day_ini ! initial day # of simulation sequence INTEGER*4 day_end ! final day # ; i.e. day # when this simulation ends REAL dt ! (dynamics) time step (changes if doing Matsuno or LF step) REAL hour_ini ! initial fraction of day of simulation sequence (0=