Changeset 2320 for LMDZ5/trunk/libf/phylmd/traclmdz_mod.F90

Timestamp:

Jul 1, 2015, 3:57:32 PM (9 years ago)

Author:

Ehouarn Millour

Message:

Physics/dynamics separation: make an infotrac_phy module, which should be used from within the physics, and is initialized from infotrac (dynamics) via iniphysiq.
EM

File:

• LMDZ5/trunk/libf/phylmd/traclmdz_mod.F90 (modified) (4 diffs)

LMDZ5/trunk/libf/phylmd/traclmdz_mod.F90

@@ -67 +67 @@
     
     USE dimphy
-    USE infotrac
+    USE infotrac_phy
     
     ! Input argument
@@ -89 +89 @@
     ! Initialization of the tracers should be done here only for those not found in the restart file.
     USE dimphy
-    USE infotrac
+    USE infotrac_phy
     USE regr_pr_comb_coefoz_m, ONLY: alloc_coefoz
     USE press_coefoz_m, ONLY: press_coefoz
@@ -343 +343 @@
     
     USE dimphy
-    USE infotrac
+    USE infotrac_phy
     USE regr_pr_comb_coefoz_m, ONLY: regr_pr_comb_coefoz
     USE o3_chem_m, ONLY: o3_chem
@@ -626 +626 @@
     ! variable trs is written to restart file (restartphy.nc)
     USE dimphy
-    USE infotrac
+    USE infotrac_phy
     
     REAL,DIMENSION(klon,nbtr), INTENT(OUT) :: trs_out