Changeset 1785 for LMDZ5/trunk/libf/phylmd/thermcell_main.F90

Timestamp:

Jul 16, 2013, 11:22:04 AM (11 years ago)

Author:

Ehouarn Millour

Message:

Transformation de l'include indicesol.h en un module indice_sol_mod et modification des appels dans tous les fichiers concernés.
Aucun changement des résultats ni des sorties du modèle vs 1784.
UG

...................................................

Replacement of the indicesol.h include by a module named indice_sol_mod. Modification of the calls in every affected files.
Results and outputs of simulations are unchanged in comparison with rev 1784.
UG

File:

• LMDZ5/trunk/libf/phylmd/thermcell_main.F90 (modified) (2 diffs)

LMDZ5/trunk/libf/phylmd/thermcell_main.F90

@@ -19 +19 @@
      &                  ,alp_bl_conv,alp_bl_stat &
 !!! fin nrlmd le 10/04/2012
-     &                  ,ztva  )
+     &                         )
 
       USE dimphy
       USE ioipsl
       USE comgeomphy , ONLY:rlond,rlatd
+      USE indice_sol_mod
       IMPLICIT NONE
 
@@ -67 +68 @@
 #include "iniprint.h"
 #include "thermcell.h"
-!!! nrlmd le 10/04/2012
-#include "indicesol.h"
-!!! fin nrlmd le 10/04/2012
 
 !   arguments: