Changeset 1785 for LMDZ5/trunk/libf/phylmd/clcdrag.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/clcdrag.F90 (modified) (3 diffs)

LMDZ5/trunk/libf/phylmd/clcdrag.F90

@@ -8 +8 @@
 
   USE dimphy
+  USE indice_sol_mod
+
   IMPLICIT NONE
 ! ================================================================= c
@@ -17 +19 @@
 !
 ! knon----input-I- nombre de points pour un type de surface
-! nsrf----input-I- indice pour le type de surface; voir indicesol.h
+! nsrf----input-I- indice pour le type de surface; voir indice_sol_mod.F90
 ! u1-------input-R- vent zonal au 1er niveau du modele
 ! v1-------input-R- vent meridien au 1er niveau du modele
@@ -41 +43 @@
   INCLUDE "YOMCST.h"
   INCLUDE "YOETHF.h"
-  INCLUDE "indicesol.h"
   INCLUDE "clesphys.h"
 !