Changeset 2348

Timestamp:

Aug 24, 2015, 2:41:28 PM (9 years ago)

Author:

Ehouarn Millour

Message:

Added missing declarations required when CPP_VEGET preprocessing flag is defined (i.e. for LMDZOR).
EM

Location:

LMDZ5/trunk/libf/phylmd

Files:

• surf_land_orchidee_mod.F90 (modified) (1 diff)
• surf_land_orchidee_noopenmp_mod.F90 (modified) (1 diff)

LMDZ5/trunk/libf/phylmd/surf_land_orchidee_mod.F90

@@ -47 +47 @@
     USE print_control_mod, ONLY: lunout
     USE mod_grid_phy_lmdz, ONLY: nbp_lon, nbp_lat
+#ifdef CPP_VEGET
+    USE time_phylmdz_mod, ONLY: itau_phy 
+#endif
 !    
 ! Cette routine sert d'interface entre le modele atmospherique et le 

LMDZ5/trunk/libf/phylmd/surf_land_orchidee_noopenmp_mod.F90

@@ -99 +99 @@
     USE indice_sol_mod
     USE mod_grid_phy_lmdz, ONLY: nbp_lon, nbp_lat
+    USE print_control_mod, ONLY: lunout
+#ifdef CPP_VEGET
+    USE time_phylmdz_mod, ONLY: itau_phy 
+#endif
     IMPLICIT NONE