Changeset 1524 for trunk/LMDZ.MARS/libf/phymars/iniwrite.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/iniwrite.F (modified) (1 diff)

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

@@ -2 +2 @@
 
       use comsoil_h, only: mlayer, nsoilmx
-      USE comcstfi_h
+      USE comcstfi_h, only: g, mugaz, omeg, rad, rcp, pi 
       USE comvert_mod, ONLY: ap,bp,aps,bps,pseudoalt
       USE logic_mod, ONLY: fxyhypb,ysinus
       USE serre_mod, ONLY: clon,clat,grossismx,grossismy,dzoomx,dzoomy
-      USE temps_mod, ONLY: hour_ini
+      USE time_phylmdz_mod, ONLY: hour_ini, daysec, dtphys
       USE ener_mod, ONLY: etot0,ptot0,ztot0,stot0,ang0
       IMPLICIT NONE