Changeset 409 for trunk/libIGCM/AA_create_ts

Timestamp:

01/19/11 17:52:56 (13 years ago)

Author:

sdipsl

Message:

• correct bug with TS 3D without chunck see ticket #52
• catch return code from all nco operator except ncrcat and exit if SpaceName? is PROD. clean error code handling. Special case for cdo command. see ticket #51
  • it means that if SpaceName?=PROD all must run absolutely perfectly ; otherwise libIGCM will stop.
• For Smooth file, first access is always true for Period=1. Get Files when SmoothMin?<CumulPeriod?<SmoothMax? and modulo [min]:[modulo:][max] is true. see ticket #44
• Under testing : do not use unless you are willing to help testing.

File:

• trunk/libIGCM/AA_create_ts (modified) (8 diffs)

trunk/libIGCM/AA_create_ts

@@ -32 +32 @@
 #-Q- sx8brodie # pour recevoir un mail en cas de depassement du temps Elapsed (ou autre pb.)
 #-Q- sx8brodie # @ notification = error
-#-Q- sx8brodie # @ environment  = $DEBUG_debug ; $MODIPSL ; $libIGCM ; $libIGCM_SX ; $SUBMIT_DIR ; $REBUILD_DIR ; $RebuildFromArchive ; $POST_DIR ; $MASTER ; $RebuildFrequency ; $PeriodDateBegin ; $PeriodDateEnd ; $NbRebuildDir ; $StandAlone ; $CompletedFlag ; $TsTask ; $CompToRead ; $FlagToRead ; $NameToRead ; $RESOL_ATM ; $RESOL_OCE ; $RESOL_ICE ; $RESOL_MBG ; $RESOL_SRF ; $RESOL_SBG ; $MASTER
+#-Q- sx8brodie # @ environment  = $DEBUG_debug ; $MODIPSL ; $libIGCM ; $libIGCM_SX ; $SUBMIT_DIR ; $REBUILD_DIR ; $RebuildFromArchive ; $POST_DIR ; $MASTER ; $RebuildFrequency ; $PeriodDateBegin ; $PeriodDateEnd ; $NbRebuildDir ; $StandAlone ; $CompletedFlag ; $TsTask ; $CompToRead ; $FlagToRead ; $RESOL_ATM ; $RESOL_OCE ; $RESOL_ICE ; $RESOL_MBG ; $RESOL_SRF ; $RESOL_SBG ; $MASTER
 #-Q- sx8brodie # @ queue
 #-Q- aix6 #!/bin/ksh
@@ -48 +48 @@
 #-Q- aix6 # pour recevoir un mail en cas de depassement du temps Elapsed (ou autre pb.)
 #-Q- aix6 # @ notification = error
-#-Q- aix6 # @ environment  = $DEBUG_debug ; $MODIPSL ; $libIGCM ; $libIGCM_SX ; $SUBMIT_DIR ; $REBUILD_DIR ; $RebuildFromArchive ; $POST_DIR ; $MASTER ; $RebuildFrequency ; $DateBegin ; $PeriodDateBegin ; $PeriodDateEnd ; $NbRebuildDir ; $StandAlone ; $CompletedFlag ; $TsTask ; $CompToRead ; $FlagToRead ; $NameToRead ; $RESOL_ATM ; $RESOL_OCE ; $RESOL_ICE ; $RESOL_MBG ; $RESOL_SRF ; $RESOL_SBG ; $MASTER
+#-Q- aix6 # @ environment  = $DEBUG_debug ; $MODIPSL ; $libIGCM ; $libIGCM_SX ; $SUBMIT_DIR ; $REBUILD_DIR ; $RebuildFromArchive ; $POST_DIR ; $MASTER ; $RebuildFrequency ; $DateBegin ; $PeriodDateBegin ; $PeriodDateEnd ; $NbRebuildDir ; $StandAlone ; $CompletedFlag ; $TsTask ; $CompToRead ; $FlagToRead ; $RESOL_ATM ; $RESOL_OCE ; $RESOL_ICE ; $RESOL_MBG ; $RESOL_SRF ; $RESOL_SBG ; $MASTER
 #-Q- aix6 # @ queue
 #-Q- ulam #!/bin/ksh
@@ -64 +64 @@
 #-Q- ulam # pour recevoir un mail en cas de depassement du temps Elapsed (ou autre pb.)
 #-Q- ulam # @ notification = error
-#-Q- ulam # @ environment  = $DEBUG_debug ; $MODIPSL ; $libIGCM ; $libIGCM_SX ; $SUBMIT_DIR ; $REBUILD_DIR ; $RebuildFromArchive ; $POST_DIR ; $MASTER ; $RebuildFrequency ; $DateBegin ; $PeriodDateBegin ; $PeriodDateEnd ; $NbRebuildDir ; $StandAlone ; $CompletedFlag ; $TsTask ; $CompToRead ; $FlagToRead ; $NameToRead ; $RESOL_ATM ; $RESOL_OCE ; $RESOL_ICE ; $RESOL_MBG ; $RESOL_SRF ; $RESOL_SBG ; $MASTER
+#-Q- ulam # @ environment  = $DEBUG_debug ; $MODIPSL ; $libIGCM ; $libIGCM_SX ; $SUBMIT_DIR ; $REBUILD_DIR ; $RebuildFromArchive ; $POST_DIR ; $MASTER ; $RebuildFrequency ; $DateBegin ; $PeriodDateBegin ; $PeriodDateEnd ; $NbRebuildDir ; $StandAlone ; $CompletedFlag ; $TsTask ; $CompToRead ; $FlagToRead ; $RESOL_ATM ; $RESOL_OCE ; $RESOL_ICE ; $RESOL_MBG ; $RESOL_SRF ; $RESOL_SBG ; $MASTER
 #-Q- ulam # @ queue
 #-Q- sx8mercure #!/bin/ksh
@@ -649 +649 @@
         if [ X${file} != X${NULL_STR} ] ; then
             IGCM_sys_Get /l liste_file[*] ${RUN_DIR_PATH}/${comp}
+            # Even if some files are missing we tried to continue
+            # Either ListVar in compname.card are asked nut not present in original history file
+            # Either a previous TS task failed
             ExitFlag=false
             IGCM_debug_Verif_Exit_Post
@@ -820 +823 @@
             # Get selected files
             IGCM_sys_Get /l liste_file[*] ${RUN_DIR_PATH}/${comp}
-            ExitFlag=false
             IGCM_debug_Verif_Exit_Post
 
@@ -829 +831 @@
                         for Patch in $( eval echo \${LISTE_PATCHES_${file}[*]} ); do
                             IGCM_${Patch} ${file_t}
+                            IGCM_debug_Verif_Exit_Post
                         done
                     done
@@ -884 +887 @@
                         IGCM_sys_ncks -Oh -x -v ${var} ${file_out} ${file_out_YE%%.nc}_tmp1.nc
                         # This will remove the time axis because cdo rewrites severely with only considered useful variables
-                        IGCM_sys_cdo -mulc,1 ${file_out_YE%%.nc}_tmp1.nc ${file_out_YE%%.nc}_tmp2.nc > /dev/null 2>&1
+                        IGCM_sys_cdo -mulc,1 ${file_out_YE%%.nc}_tmp1.nc ${file_out_YE%%.nc}_tmp2.nc
                         if [ $? -eq 0 ] ; then
                                 # Now append all ancillary variables if previous cdo operator ok
@@ -902 +905 @@
                 fi
                 #
-                ExitFlag=false
-                IGCM_debug_Verif_Exit_Post
             done     # for var in ${liste_var} ; do
             IGCM_sys_Rm ${liste_file_tmp[*]}
         done         # for file in ${liste_file_brut} do
     done             # for comp in ${config_ListOfComponents[*]} ; do
-    ExitFlag=false
-    IGCM_debug_Verif_Exit_Post
     # GO AHEAD IN DEEPEST LOOP
     (( CURRENT_LOOP = CURRENT_LOOP + 1 ))