MODULE time_phylmdz_mod IMPLICIT NONE REAL,SAVE :: dtphys ! physics time step (s) !$OMP THREADPRIVATE(pdtphys) REAL,SAVE :: daysec ! length of day (s) !$OMP THREADPRIVATE(daysec) INTEGER,SAVE :: day_ini ! initial day of the run !$OMP THREADPRIVATE(day_ini) REAL,SAVE :: hour_ini ! start time (fraction of day) of the run ! 0=