Ignore:
Timestamp:
Jun 26, 2014, 6:07:05 PM (11 years ago)
Author:
emillour
Message:

Common dynamics:
Some updates to keep up with LMDZ5 Earth model evolution
(up to LMDZ5 rev 2070). See file "DOC/chantiers/commit_importants.log"
for detailed list of changes.
Note that the updates of exner* routines change (as expected) results
at numerical roundoff level.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LMDZ.COMMON/makelmdz

    r1300 r1302  
    2626cosp=false
    2727sisvat=false
     28rrtm=false
    2829bands=""
    2930scatterers=""
    30 dyn=""
    3131full=''
    3232
     
    3535## try to recognise machine and infer arch from it
    3636machine=`hostname`
    37 if [[ "$machine" == "brodie" ]]
    38 then
    39   arch="SX8_BRODIE"
    40 fi
    4137if [[ "${machine:0:3}" == "ada" ]]
    4238then
    4339  arch="X64_ADA"
    44 fi
    45 if [[ "${machine:0:6}" == "ciclad" ]]
    46 then
    47   arch="AMD64_CICLAD"
    4840fi
    4941if [[ "${machine:0:7}" == "platine" ]]
     
    8779
    8880CPP_KEY=""
    89 INCLUDE='-I$(LIBF)/grid -I$(LIBF)/bibio -I$(LIBF)/dyn3d_common -I$(LIBF)/filtrez -I. '
     81INCLUDE='-I$(LIBF)/grid -I$(LIBF)/bibio -I$(LIBF)/filtrez -I. '
    9082LIB=""
    9183adjnt=""
     
    184176          CPP_KEY="$CPP_KEY $2" ; shift ; shift ;;
    185177
    186       "-adjnt")
    187           echo "not operational ... work to be done here ";exit
    188           opt_dep="$opt_dep adjnt" ; adjnt="-ladjnt -ldyn3d "
    189           optim="$optim -Dadj" ; shift ;;
    190 
    191178      "-cosp")
    192179          cosp="$2" ; shift ; shift ;;
     
    194181      "-sisvat")
    195182          sisvat="$2" ; shift ; shift ;;
     183     
     184      "-rrtm")
     185          rrtm="$2" ; shift ; shift ;;
    196186     
    197187      "-mem")
     
    457447fi
    458448
     449if [[ "$rrtm" == "true" ]]
     450then
     451   CPP_KEY="$CPP_KEY CPP_RRTM"
     452fi
     453
    459454
    460455INCLUDE="$INCLUDE ${NETCDF_INCDIR}"
     
    536531echo dimension $dimension
    537532
    538 if (( $dimension == 3 ))
    539 then
     533if (( $dimension == 3 )) ; then
    540534  cd $LIBFGCM/grid
    541535  \rm fxyprim.h
    542536  cp -p fxy_${grille}.h fxyprim.h
    543 #else
    544 #  echo "Probleme dans les dimensions de la dynamique !!"
    545 #  echo "Non reactive pour l'instant !!!"
    546 fi
    547 if (( $dimension == 1 ))
    548 then
    549   echo pas de dynamique
    550   dyn="DYN= L_DYN=-ldyn3d "
    551 fi
    552 
    553 ######################################################################
    554 # Gestion du filtre qui n'existe qu'en 3d.
    555 ######################################################################
    556 
    557 if (( `expr $dimc \> 2` == 1 ))
    558 then
    559    filtre="FILTRE=$filtre"
     537  filtre="FILTRE=$filtre"
     538  INCLUDE="$INCLUDE "'-I$(LIBF)/dyn3d${FLAG_PARA} -I$(LIBF)/dyn3d_common '
     539elif (( $dimension == 2 )) ; then
     540   filtre="FILTRE= L_FILTRE= "
     541   INCLUDE="$INCLUDE "'-I$(LIBF)/dyn2d'
     542elif (( $dimension == 1 )) ; then
     543   echo pas de dynamique
     544   CPP_KEY="$CPP_KEY CPP_1D"
     545   filtre="L_DYN= DYN= FILTRE= L_FILTRE= DIRMAIN=phy$physique "
     546   INCLUDE="$INCLUDE "'-I$(LIBF)/dyn3d -I$(LIBF)/dyn3d_common ' # Pas tres propre
    560547else
    561    filtre="FILTRE= L_FILTRE= "
    562 fi
    563 echo MACRO FILTRE $filtre
    564 
    565 echo $dimc
    566 
    567 ######################################################################
    568 # Creation du suffixe de la configuration
    569 ######################################################################
    570 
    571 
    572 SUFF_NAME=_${dim_full}
    573 SUFF_NAME=${SUFF_NAME}_phy${physique}
    574 
    575 if [[ "$parallel" != "none" ]]
    576 then
    577   SUFF_NAME=${SUFF_NAME}_para
    578   DYN=dyn${dimc}d${paramem}
    579   if [[ "$paramem" == "mem" ]]
    580   then
    581    SUFF_NAME=${SUFF_NAME}_${paramem}
    582   fi
    583 else
    584   SUFF_NAME=${SUFF_NAME}_seq
    585   DYN=dyn${dimc}d
    586 fi
    587 
    588 if [[ $veget != "false" ]]
    589 then
    590   SUFF_NAME=${SUFF_NAME}_orch
    591 fi
    592 
    593 if [[ $couple != "false" ]]
    594 then
    595   SUFF_NAME=${SUFF_NAME}_couple
    596 fi
    597 
    598 if [[ $chimie == "INCA" ]]
    599 then
    600   SUFF_NAME=${SUFF_NAME}_inca
     548   echo Dimension dimc=$dimc pas prevu ; exit
    601549fi
    602550
     
    626574find libf -name '*.[Fh]' -print | sort > tmp77
    627575find libf -name '*.[Fh]' -exec egrep -i " *use *ioipsl" {} \; -print | sort > tmp90
    628 find libf -name '*.[Fh90]' -print | sort >> tmp90
     576find libf -name '*.F90' -print | sort >> tmp90
    629577######### CAS PARTICULIER CHIMIE TITAN
    630578if [[ "$physique" == "titan" ]]
     
    766714INCLUDEC="$includec" \
    767715$filtre \
    768 $dyn \
    769716LIBO=${LIBOGCM}/${nomlib} \
    770717$phys \
     
    798745INCLUDEC="$includec" \
    799746$filtre \
    800 $dyn \
    801747LIBO=${LIBOGCM}/${nomlib} \
    802748$phys \
Note: See TracChangeset for help on using the changeset viewer.