Changeset 858 for CONFIG/LMDZORINCA/trunk/EXP_CH4_AER/COMP/orchidee.driver

Timestamp:

12/18/09 15:26:08 (15 years ago)

Author:

acosce

Message:

ACo: update

• LMDZ calendar
• rebuild on archive
• orchidee cards

File:

• CONFIG/LMDZORINCA/trunk/EXP_CH4_AER/COMP/orchidee.driver (modified) (5 diffs)

CONFIG/LMDZORINCA/trunk/EXP_CH4_AER/COMP/orchidee.driver

@@ -1 +1 @@
 #!/bin/ksh
 
-#D- Driver du script pour ORCHIDEE_OL (off-line)
+#D- Driver du script pour ORCHIDEE
+
+function ORCHIDEE_sed
+{
+    IGCM_debug_PushStack "ORCHIDEE_sed"
+    
+    sed -e "s/^${1}\ *=.*/${1}= ${2}/" \
+        orchidee.def > orchidee.def.tmp
+    RET=$?
+    echo "ORCHIDEE_sed : ${1} ${2}"
+    \mv orchidee.def.tmp orchidee.def
+    
+    IGCM_debug_PopStack "ORCHIDEE_sed"
+    return $RET
+}
 
 #-----------------------------------------------------------------
@@ -7 +21 @@
 {
     IGCM_debug_PushStack "SRF_Initialize"
+
+    RESOL_SRF=ALL
 
     IGCM_debug_PopStack "SRF_Initialize"
@@ -16 +32 @@
     IGCM_debug_PushStack "SRF_Update"
 
+    typeset SECHIBA_WRITE_STEP
+
     case ${config_SRF_WriteFrequency} in
-        1Y|1y) 
-            (( STOMATE_WRITE_STEP = PeriodLengthInDays ))
-            (( SECHIBA_WRITE_STEP = PeriodLengthInDays * 86400 )) ;;
-        1M|1m) 
-            if [ ${config_UserChoices_PeriodLength} = 1Y ] ; then
-                (( STOMATE_WRITE_STEP = PeriodLengthInDays / 12 ))
-                (( SECHIBA_WRITE_STEP = PeriodLengthInDays * 86400 / 12  ))
-            else
-                (( STOMATE_WRITE_STEP = $( IGCM_date_DaysInMonth $year $month ) ))
+        *Y|*y) 
+            WriteInYears=$( echo ${1} | awk -F '[yY]' "{print ${config_SRF_WriteFrequency}}" )
+            PeriodLengthInYears=$( echo ${1} | awk -F '[yY]' "{print ${config_UserChoices_PeriodLength}}" )
+            (( SECHIBA_WRITE_STEP = PeriodLengthInDays * WriteInYears / PeriodLengthInYears * 86400 )) ;;
+        *M|*m) 
+            WriteInMonths=$( echo ${1} | awk -F '[mM]' "{print ${config_SRF_WriteFrequency}}" )
+            case ${config_UserChoices_PeriodLength} in
+            *Y|*y)
+                PeriodLengthInYears=$( echo ${1} | awk -F '[yY]' "{print ${config_UserChoices_PeriodLength}}" )
+                (( SECHIBA_WRITE_STEP = PeriodLengthInDays * 86400 / PeriodLengthInYears / 12  ))
+                ;;
+            *M|*m)
+                PeriodLengthInMonths=$( echo ${1} | awk -F '[mM]' "{print ${config_UserChoices_PeriodLength}}" )
+                (( SECHIBA_WRITE_STEP = PeriodLengthInDays * WriteInMonths  * 86400 / PeriodLengthInMonths  ))
+                ;;
+            *)
                 (( SECHIBA_WRITE_STEP = $( IGCM_date_DaysInMonth $year $month ) * 86400 ))
-            fi ;;
+                ;;
+            esac
+            ;;
         5D|5d) 
-            (( STOMATE_WRITE_STEP = 5 ))
             (( SECHIBA_WRITE_STEP = 5 * 86400 )) ;;
         1D|1d) 
-            (( STOMATE_WRITE_STEP = 1 ))
             (( SECHIBA_WRITE_STEP = 86400 )) ;;
+        *s)
+            WriteInSeconds=$( echo ${1} | awk -F '[s]' "{print ${config_SRF_WriteFrequency}}" )
+            (( SECHIBA_WRITE_STEP = WriteInSeconds )) ;;
         *) 
             IGCM_debug_Exit "SRF_Update " ${config_SRF_WriteFrequency} " invalid WriteFrequency : choose in 1Y, 1M, 5D, 1D." 
@@ -39 +67 @@
     esac
 
+    ORCHIDEE_sed HYDROL_CWRR ${orchidee_UserChoices_NEWHYDROL}
 
-    if ( [ ${CumulPeriod} -eq 1 ] && [ "${config_SRF_Restart}" = "n" ] ) ; then
-        sed -e "s/_start_sech_/default/" \
-            -e "s/_write_step_/${SECHIBA_WRITE_STEP}/" \
-            orchidee.def > orchidee.def.tmp
-## For STOMATE
-#           -e "s/STOMATE_HIST_DT= 10./STOMATE_HIST_DT = ${STOMATE_WRITE_STEP}/" \
+    ORCHIDEE_sed WRITE_STEP ${SECHIBA_WRITE_STEP}
+    ORCHIDEE_sed SECHIBA_HISTLEVEL ${orchidee_UserChoices_sechiba_LEVEL}
 
-## For ORCHIDEE_WATCHOUT_FILE : 
-#            -e "s/ORCHIDEE_WATCHOUT= n/ORCHIDEE_WATCHOUT= y/" \
-#            -e "s/DT_WATCHOUT= 1800/DT_WATCHOUT= 3600/" \
-    else
-        sed -e "s/_start_sech_/start_sech.nc/" \
-            -e "s/_write_step_/${SECHIBA_WRITE_STEP}/" \
-            orchidee.def > orchidee.def.tmp
-## For STOMATE
-#            -e "s/STOMATE_RESTART_FILEIN= NONE/STOMATE_RESTART_FILEIN = stomate_rest_in.nc/" \
-#            -e "s/STOMATE_HIST_DT= 10./STOMATE_HIST_DT = ${STOMATE_WRITE_STEP}/" \
+##    if [ ${year} -eq 1950 ] ; then
+#       ORCHIDEE_sed SECHIBA_HISTFILE2 y
+#       ORCHIDEE_sed SECHIBA_HISTLEVEL2 10
+#       ORCHIDEE_sed WRITE_STEP2 86400.0
+##    fi
 
-## For ORCHIDEE_WATCHOUT_FILE : 
-#            -e "s/ORCHIDEE_WATCHOUT= n/ORCHIDEE_WATCHOUT= y/" \
-#            -e "s/DT_WATCHOUT= 1800/DT_WATCHOUT= 3600/" \
+    if ( [ ${CumulPeriod} -ne 1 ] || [ "${config_SRF_Restart}" != "n" ] ) ; then
+        ORCHIDEE_sed SECHIBA_restart_in sechiba_rest_in.nc
     fi
-    IGCM_sys_Mv orchidee.def.tmp orchidee.def
+
+    #IGCM_sys_Cp ${RUN_DIR}/orchidee.def ${RUN_DIR}/run.def
+    #IGCM_sys_Put_Out ${RUN_DIR}/run.def ${R_SAVE}/${PREFIX}_run.def
 
     IGCM_debug_PopStack "SRF_Update"
@@ -72 +93 @@
     IGCM_debug_PushStack "SRF_Finalize"
 
-# For STOMATE :
-#     if [ $( IGCM_date_DaysBetweenGregorianDate ${PeriodDateEnd} ${year}1230 ) -ge 0 ] ; then
-#       IGCM_sys_Put_Out stomate_Cforcing.nc ${R_OUT_SRF_O_M}/${PREFIX}_stomate_Cforcing.nc
-#       IGCM_sys_Put_Out stomate_forcing.nc  ${R_OUT_SRF_O_M}/${PREFIX}_stomate_forcing.nc
-#     fi
+    #IGCM_sys_Put_Out ${RUN_DIR}/used_run.def ${R_SAVE}/${PREFIX}_used_run.def
 
     echo FINALIZE SRF !!!