Changeset 777 for CONFIG/IPSLCM/IPSLCM5/branches/IPSLCM5_v2/EXP00/COMP/opa9.driver

Timestamp:

11/04/09 11:32:11 (15 years ago)

Author:

mafoipsl

Message:

iomput added in NEMO. First guess for larger tests.

File:

• CONFIG/IPSLCM/IPSLCM5/branches/IPSLCM5_v2/EXP00/COMP/opa9.driver (modified) (5 diffs)

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

@@ -43 +43 @@
     PAT_NRSTAR=$( supergrep nn_rstctl  ${SUBMIT_DIR}/PARAM/namelist_${RESOL_OCE} )
     PAT_NMSH=$(   supergrep nn_msh     ${SUBMIT_DIR}/PARAM/namelist_${RESOL_OCE} )
-    PAT_PRG=$(    supergrep nn_prg ${SUBMIT_DIR}/PARAM/namelist_${RESOL_OCE} )
+    PAT_PRG=$(    supergrep nn_prg     ${SUBMIT_DIR}/PARAM/namelist_${RESOL_OCE} )
     PAT_NF_PTR=$( supergrep nf_ptr_wri ${SUBMIT_DIR}/PARAM/namelist_${RESOL_OCE} )
 
-    ORCA_RDT=$( supergrep rn_rdt  ${SUBMIT_DIR}/PARAM/namelist_${RESOL_OCE} | sed 's/ *rn_rdt *=//' | sed 's/\. *//' )
+    ORCA_RDT=$(   supergrep rn_rdt     ${SUBMIT_DIR}/PARAM/namelist_${RESOL_OCE} | sed 's/ *rn_rdt *=//' | sed 's/\. *//' )
 
     # Period Length In Days between DateBegin and first day of calendar 0001 01 01
     # /!\ Needed by OPA namelist to compute file names /!\
     (( DaysSinceJC = $( IGCM_date_DaysSinceJC ${DateBegin} ) + 1 ))
+
+    ##--Variables used for XMLIO_SERVER configuration file
+    # using_server: .TRUE.(.FALSE.) to use(bypass) the io_server
+    PAT_SERVER=$( supergrep using_server ${SUBMIT_DIR}/PARAM/xmlio_server.def )
 
     IGCM_debug_PopStack "OCE_Initialize"
@@ -61 +65 @@
 
     NbFreq=$( echo ${config_OCE_WriteFrequency} | wc -w )
+
+    ## This informations are used for diaptr, trends and diagap files
+    ## only the first frequency is used for this files
 
     ##--Write Frequency Purpose ....
@@ -89 +96 @@
 
     ##--Write Frequency Purpose .... concerning the second opa file type.
-    if [ ${NbFreq} -eq 2 ] ; then
+    if [ ${NbFreq} -ge 2 ] ; then
         frequency=$( echo ${config_OCE_WriteFrequency} | awk "-F " '{print $2}' )
         factor=$( echo ${frequency} | sed -e "s/[yYmMdD]//" )
@@ -115 +122 @@
     fi
 
+
+    ##--Write Frequency for iomput
+    ## Differents frequencies are allowed for grid_[TUVW] and icemod files
+
+    V1D_ENABLE=".FALSE."
+    V5D_ENABLE=".FALSE."
+    V1M_ENABLE=".FALSE."
+    V1Y_ENABLE=".FALSE."
+
+    for frequency in ${config_OCE_WriteFrequency} ; do
+        case ${frequency} in
+            1D|1d) V1D_ENABLE=".TRUE." ;;
+        esac
+        case ${frequency} in
+            5D|5d) V5D_ENABLE=".TRUE." ;;
+        esac
+        case ${frequency} in
+            1M|1m) V1M_ENABLE=".TRUE." ;;
+        esac
+        case ${frequency} in
+            *[yY]) V1Y_ENABLE=".TRUE." ;;
+        esac
+    done
+
     # Period Length In Days between DateBegin and first day of calendar 0001 01 01
     # Needed by OPA namelist to compute correct file names 
@@ -190 +221 @@
     grep AUTO namelist
 
+    ##--Variables used for iodef xml configuration file
+    # output_1m_frequency_oce : output frequency of ocean output files in seconds
+    #     - length of 1 month (in seconds) 
+    #     - -1 for monthly mean with 31-28-31-30 .... calendar if
+    #          simulation are done per year. ie PeriodLength=1Y in config.card
+    #     - n days (in seconds) for other Period Length
+    #                           
+
+    output_1m_frequency_oce=-1
+
+    case ${config_UserChoices_PeriodLength} in
+        *Y|*y)
+              (( output_1m_frequency_oce = 86400 * $( IGCM_date_DaysInMonth ${year} ${month} ) )) 
+              if [ "${config_UserChoices_CalendarType}" != "360d" ] ; then
+                 output_1m_frequency_oce=-1
+              fi
+              ;;
+        *M|*m)
+              (( output_1m_frequency_oce = 86400 * $( IGCM_date_DaysInMonth ${year} ${month} ) ))
+              if [ "${config_UserChoices_CalendarType}" != "360d" ] ; then
+                 output_1m_frequency_oce=-1
+              fi
+              ;;
+        *)
+              (( output_1m_frequency_oce = PeriodLengthInDays * 86400 )) ;;
+    esac
+
+    echo 1M_Frequency in iodef : ${output_1m_frequency_oce}
+
+    # update iodef.xml
+
+    sed -e "s/<1D_ENABLE>/${V1D_ENABLE}/" \
+        -e "s/<5D_ENABLE>/${V5D_ENABLE}/" \
+        -e "s/<1M_ENABLE>/${V1M_ENABLE}/" \
+        -e "s/<1Y_ENABLE>/${V1Y_ENABLE}/" \
+        -e "s/<1M_FREQUENCY>/${output_1m_frequency_oce}/g" \
+        iodef.xml > iodef.xml.tmp
+
+    IGCM_sys_Mv iodef.xml.tmp iodef.xml
+
+    # update xmlio_server.def
+
+    if [ X${opa9_UserChoices_io_server} = Xy ] ; then
+        sed -e "s/${PAT_SERVER}/  using_server = .TRUE./" \
+        xmlio_server.def > xmlio_server.def.tmp
+        IGCM_sys_Mv xmlio_server.def.tmp xmlio_server.def
+    fi
+
     IGCM_debug_PopStack "OCE_Update"
 }