Changeset 1114 for LMDZ4/branches/LMDZ4-dev/makegcm_fcm

Timestamp:

Mar 3, 2009, 5:40:26 PM (16 years ago)

Author:

jghattas

Message:

Creation du module infotrac:

• contient les variables de advtrac.h
• contient la subroutine iniadvtrac renommer en infotrac_init
• le nombre des traceurs est lu dans tracer.def en dynamique (ou par default ou recu par INCA)
• ce module est utilise dans la dynamique et la physique
• contient aussi la variable nbtr qui avant etait stockee dans dimphy

Le fichier advtrac.h n'existe plus.
La compilation ne prend plus en compte le nombre de traceur.

/JG

File:

• LMDZ4/branches/LMDZ4-dev/makegcm_fcm (modified) (6 diffs)

LMDZ4/branches/LMDZ4-dev/makegcm_fcm

@@ -18 +18 @@
 set dim="96x72x19"
 set physique=lmd
-set ntrac = 4
 set filtre=filtrez
 set grille=reg
@@ -60 +59 @@
 [-h]                       : manuel abrégé
 [-d [[IMx]JMx]LM]          : IM, JM, LM sont les dims en x, y, z (def: $dim)
-[-t NTRAC]                 : nombre de traceurs (def: 4)
 [-p PHYS]                  : compilation avec la physique libf/phyPHYS, (def: lmd)
 [-prod / -dev / -debug]    : compilation en mode production (default) / developpement / debug .
@@ -115 +113 @@
         set parallel="$2" ; shift ; shift ; goto top
   
-     case -t
-        set ntrac=$2 ; shift ; shift ; goto top
-
      case -include
         set INCLUDE="$INCLUDE -I$2" ; shift ; shift ; goto top
@@ -211 +206 @@
 set LIB="$LIB -L${NETCDF_LIBDIR} -lnetcdf"
 
-
-########################################################################
-# choix du nombre de traceur par defaut si il n'a pas ete choisi,
-# suivant la physique
-########################################################################
-
-if ( $ntrac == 0  ) then
-    if ( "$physique" == 'nophys' ) then
-        set ntrac=1
-    else if ( "$physique" == 'lmd' ) then
-        set ntrac=2
-    else if ( "$physique" == 'lmd_test_li' ) then
-        set ntrac=2
-    else if ( "$physique" == 'ec' ) then
-        set ntrac=1
-    else
-        set ntrac = 1
-    endif
-endif
-
-
 ########################################################################
 # calcul du nombre de dimensions
@@ -248 +222 @@
 ########################################################################
 # Gestion des dimensions du modele.
-# on cree ou remplace le fichier des dimensions/nombre de traceur
+# on cree ou remplace le fichier des dimensions
 ########################################################################
 
 cd $LIBFGCM/grid/dimension
-./makdim $ntrac $dim
+./makdim $dim
 cat $LIBFGCM/grid/dimensions.h
 cd $LMDGCM
@@ -314 +288 @@
 
 set SUFF_NAME=_${dim_full}
-set SUFF_NAME=${SUFF_NAME}_t${ntrac}_phy${physique}
+set SUFF_NAME=${SUFF_NAME}_phy${physique}
 
 if ( "$parallel" != 'none' ) then