Changeset 912 for CONFIG/IPSLCM/IPSLCM5/branches/IPSLCM5_v2/EXP00/COMP/lmdz.driver

Timestamp:

02/22/10 17:04:36 (14 years ago)

Author:

mafoipsl

Message:

AC : Add the possibility to force higher writing level for aerosol.
2 variables added with default value : LMDZ_Freq_aero=120 and LMDZ_Length_aero=12

File:

• CONFIG/IPSLCM/IPSLCM5/branches/IPSLCM5_v2/EXP00/COMP/lmdz.driver (modified) (3 diffs)

CONFIG/IPSLCM/IPSLCM5/branches/IPSLCM5_v2/EXP00/COMP/lmdz.driver

@@ -65 +65 @@
         eval LMDZ_Bands_file_name=\${lmdz_UserChoices_LMDZ_Bands_file_name} > /dev/null 2>&1
     fi
+
+    ##  Read LMDZ_Freq_aero and LMDZ_Length_aero in lmdz.card
+    eval LMDZ_Freq_aero=\${lmdz_UserChoices_LMDZ_Freq_aero} > /dev/null 2>&1
+    eval LMDZ_Length_aero=\${lmdz_UserChoices_LMDZ_Length_aero} > /dev/null 2>&1
 
     IGCM_debug_PopStack "ATM_Initialize"
@@ -98 +102 @@
     fi
 
+    ## 
+    if [ ${CumulPeriod}%${LMDZ_Freq_aero} -lt ${LMDZ_Length_aero} ] ; then 
+        lev_histmth=4
+    else
+        lev_histmth=2
+    fi  
+
     ## algo : For CumulPeriod=1 ; 
     ##        IF NbPeriod_Adjust = 0, Get Bands file directly from server, store it with _0 suffix
@@ -124 +135 @@
     LMDZ_sed physiq.def OK_journe   ${OK_journe}
     LMDZ_sed physiq.def OK_mensuel  ${OK_mensuel}
+    LMDZ_sed physiq.def lev_histmth ${lev_histmth}
     LMDZ_sed physiq.def ok_hf       ${ok_hf}
     LMDZ_sed physiq.def ecrit_mth   ${LMDZ_ecrit_mth}