Changeset 1524 for trunk/LMDZ.MARS/libf/phymars/inistats.F

Timestamp:

Mar 29, 2016, 11:45:49 AM (9 years ago)

Author:

emillour

Message:

All GCMS:
More updates to enforce dynamics/physics separation:

get rid of references to "temps_mod" from physics packages;
make a "time_phylmdz_mod.F90" module to store that
information and fill it via "iniphysiq".

EM

File:

• trunk/LMDZ.MARS/libf/phymars/inistats.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/inistats.F

@@ -3 +3 @@
       use mod_phys_lmdz_para, only : is_master
       USE comvert_mod, ONLY: ap,bp,aps,bps,preff,pseudoalt,presnivs
-      USE comcstfi_h, ONLY: daysec,dtphys,pi
+      USE comcstfi_h, ONLY: pi
+      USE time_phylmdz_mod, ONLY: daysec,dtphys
       implicit none
 
-#include "dimensions.h"
-#include "paramet.h"
-#include "comgeom.h"
-#include "statto.h"
-#include "netcdf.inc"
+      include "dimensions.h"
+      include "paramet.h"
+      include "comgeom.h"
+      include "statto.h"
+      include "netcdf.inc"
 
       integer,intent(out) :: ierr