Changeset 522 for trunk/libIGCM/libIGCM_config/libIGCM_config.ksh

Timestamp:

12/02/11 19:17:07 (12 years ago)

Author:

sdipsl

Message:

Source driver from ${SUBMIT_DIR}/DRIVER/ if it exists ; otherwise back to default
Add yyyymm_m1, yyyymm_p1, month_m1, month_p1 and day as available global variables. Needed by LMDZ-REPROBUS
Add IGCM_date_GetYearMonthDay function
JG

File:

• trunk/libIGCM/libIGCM_config/libIGCM_config.ksh (modified) (4 diffs)

trunk/libIGCM/libIGCM_config/libIGCM_config.ksh

@@ -396 +396 @@
         #================================================#
 
-        IGCM_date_GetYearMonth $DateBegin year month
-        year_m1=$(( year - 1 ))
-        year_p1=$(( year + 1 )) 
+        IGCM_date_GetYearMonthDay $DateBegin year month day
         IGCM_config_Analyse_PeriodLength
 
@@ -477 +475 @@
         fi
 
-        IGCM_date_GetYearMonth $PeriodDateBegin year month
-        year_m1=$(( year - 1 ))
-        year_p1=$(( year + 1 )) 
+        IGCM_date_GetYearMonthDay $PeriodDateBegin year month day
         IGCM_config_Analyse_PeriodLength
 
@@ -486 +482 @@
     fi    
     OldPrefix=${config_UserChoices_JobName}_${PeriodDateEnd}
-  
+
+    # BEGIN: SHOULD GO IN A FUNCTION FROM libIGCM_date.ksh
+    # Compute year_m1 and year_p1 (year minus 1Y and year plus 1Y)
+    year_m1=$(( year - 1 ))
+    year_p1=$(( year + 1 ))     
+    # Compute month_m1 (month minus 1M)
+    # Compute yyyymm_m1 (yyyymm minus 1M)
+    month_m1=$(( month - 1 ))
+    if [ ${month_m1} = 0 ]; then
+        month_m1=12
+        yyyymm_m1=${year_m1}12
+    elif [ ${month_m1} -le 9 ]; then
+        month_m1=0${month_m1}
+        yyyymm_m1=${year}${month_m1}
+    else
+        yyyymm_m1=${year}${month_m1}
+    fi
+    # Compute month_p1 (month plus 1M)
+    # Compute yyyymm_p1 (yyyymm plus 1M)
+    month_p1=$(( month + 1 ))
+    if [ ${month_p1} = 13 ]; then
+        month_p1=01
+        yyyymm_p1=${year_p1}01
+    elif [ ${month_p1} -le 9 ]; then
+        month_p1=0${month_p1}
+        yyyymm_p1=${year}${month_p1}
+    else
+        yyyymm_p1=${year}${month_p1}
+    fi
+    #IGCM_debug_Print 1 "jg 1 month_m1 = ${month_m1} month_p1 = ${month_p1} "
+    #IGCM_debug_Print 1 "jg 1 calculate yyyymm_m1 = ${yyyymm_m1} "
+    #IGCM_debug_Print 1 "jg 1 calculate yyyymm_p1 = ${yyyymm_p1} "
+
+    # END: SHOULD GO IN A FUNCTION FROM libIGCM_date.ksh
+
     #===================================================================#
     # Prepare variables available for ${COMP}.card and ${COMP}.driver   #
@@ -735 +765 @@
 
     PeriodDateBegin=$( IGCM_date_AddDaysToGregorianDate ${PeriodDateEnd} 1 )
-    IGCM_date_GetYearMonth $PeriodDateBegin year month
+    IGCM_date_GetYearMonthDay $PeriodDateBegin year month day
     year_m1=$(( year - 1 ))
     year_p1=$(( year + 1 ))