Changeset 1132

Timestamp:

Mar 24, 2009, 5:15:54 PM (15 years ago)

Author:

jghattas

Message:

• Ajout du module surf_land_orchidee_noooenmp_mod qui contient l'ancien interface d'ORCHIDEE. Pour utiliser cette module il faut compiler avec le cle cpp ORCHIDEE_NOOPENMP. Par default on continue a utiliser le module surf_land_orchidee_mod qui contient l'interface mixte MPI/OpenMP pour ORCHIDEE.

• Ajout d'option -cpp dans makegcm_fcm qui permet d'ajouter un cle cpp dans la ligne de compilation.

Location:

LMDZ4/branches/LMDZ4-dev

Files:

• libf/phylmd/surf_land_mod.F90 (modified) (1 diff)
• libf/phylmd/surf_land_orchidee_mod.F90 (modified) (2 diffs)
• libf/phylmd/surf_land_orchidee_noopenmp_mod.F90 (added)
• makegcm_fcm (modified) (2 diffs)

LMDZ4/branches/LMDZ4-dev/libf/phylmd/surf_land_mod.F90

@@ -23 +23 @@
     USE dimphy
     USE surface_data, ONLY    : ok_veget
+
+#ifdef ORCHIDEE_NOOPENMP
+    USE surf_land_orchidee_noopenmp_mod
+#else
     USE surf_land_orchidee_mod
+#endif
     USE surf_land_bucket_mod
     USE calcul_fluxs_mod

LMDZ4/branches/LMDZ4-dev/libf/phylmd/surf_land_orchidee_mod.F90

@@ -1 +1 @@
 !
 MODULE surf_land_orchidee_mod
+#ifndef ORCHIDEE_NOOPENMP
 !
 ! This module controles the interface towards the model ORCHIDEE
@@ -632 +633 @@
 !****************************************************************************************
 !
-
+#endif
 END MODULE surf_land_orchidee_mod

LMDZ4/branches/LMDZ4-dev/makegcm_fcm

@@ -67 +67 @@
 [-g GRI]                   : conf. grille dans dyn3d/GRI_xy.h  (def: reg inclue un zoom)
 [-io IO]                   : choix d'une librairie I/O, experts (def: ioipsl)
-[-include INCLUDES]        : variables supplementaires pour include cpp, experts.
+[-include INCLUDES]        : variables supplementaires pour include
+[-cpp CPP_KEY]             : cle cpp supplementaires
 [-adjnt]                   : adjoint, a remettre en route ...
 [-filtre NOMFILTRE]        : prend le filtre dans libf/NOMFILTRE (def: filtrez)
@@ -115 +116 @@
      case -include
         set INCLUDE="$INCLUDE -I$2" ; shift ; shift ; goto top
+
+     case -cpp
+        set CPP_KEY="$CPP_KEY $2" ; shift ; shift ; goto top
 
      case -adjnt