Changeset 3831 for dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/conf_phys_m.F90

Timestamp:

Jun 18, 2015, 12:00:37 PM (10 years ago)

Author:

ymipsl

Message:

module reorganisation for a cleaner dyn-phys interface
YM

File:

• dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/conf_phys_m.F90 (modified) (3 diffs)

dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/conf_phys_m.F90

@@ -27 +27 @@
     USE phys_cal_mod
     USE carbon_cycle_mod, ONLY : carbon_cycle_tr, carbon_cycle_cpl
-    !USE control_phy_mod
     USE mod_grid_phy_lmdz, only: klon_glo
-    USE inifis_mod, ONLY: lunout
-
+    USE print_control_mod, ONLY: lunout
+    USE time_phylmdz_mod, ONLY: pdtphys
 
     include "conema3.h"
@@ -1511 +1510 @@
     !Config Desc = freq_calNMC(2) = frequence de calcul fichiers histdayNMC
     !Config Desc = freq_calNMC(3) = frequence de calcul fichiers histhfNMC
-    !Config Def  = pasphys
-    !Config Help =
-    !
-    freq_calNMC_omp(1) = pasphys
-    freq_calNMC_omp(2) = pasphys
-    freq_calNMC_omp(3) = pasphys
+    !Config Def  = pdtphys
+    !Config Help =
+    !
+    freq_calNMC_omp(1) = pdtphys
+    freq_calNMC_omp(2) = pdtphys
+    freq_calNMC_omp(3) = pdtphys
     call getin('freq_calNMC',freq_calNMC_omp)
     !
@@ -2288 +2287 @@
 
   use IOIPSL
-  USE inifis_mod, ONLY: lunout
+  USE print_control_mod, ONLY: lunout
   implicit none
   ! Configuration de l'interace atm/surf