Ignore:
Timestamp:
11/03/09 18:44:21 (15 years ago)
Author:
sdipsl
Message:
  • Cesium will post-process SX9 simulation
  • Big clean in libIGCM_sys
  • Testing only for now
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_calculo.ksh

    r173 r192  
    108108 
    109109#==================================================== 
    110 #- libIGCM_POST 
    111 typeset -r libIGCM_POST=${libIGCM} 
    112  
    113 #==================================================== 
    114110#- IN 
    115111typeset -r R_IN=${R_IN:=${ARCHIVE}/${LOGIN}/TEMP_LOCAL/SCRIPTS} 
     
    238234        fi 
    239235    fi 
    240     # vérification ?? : 
    241     if [ ! -d ${1} ] ; then 
    242         echo "IGCM_sys_MkdirArchive : erreur." 
    243         IGCM_debug_Exit "IGCM_sys_MkdirArchive" 
    244     fi 
    245236    IGCM_debug_PopStack "IGCM_sys_MkdirArchive" 
    246237} 
     
    264255        fi 
    265256    fi 
    266     # vérification ?? : 
    267     if [ ! -d ${1} ] ; then 
    268         echo "IGCM_sys_MkdirWork : erreur." 
    269         IGCM_debug_Exit "IGCM_sys_MkdirWork" 
    270     fi 
    271257    IGCM_debug_PopStack "IGCM_sys_MkdirWork" 
    272258} 
    273 IGCM_sys_MkdirWork ${RUN_DIR_PATH} 
    274 echo "RUN_DIR_PATH ${RUN_DIR_PATH} ok." 
    275259 
    276260#D-#================================================== 
     
    964948} 
    965949 
    966 ############################################################## A REVOIR !! 
    967  
    968 #D-#================================================== 
    969 #D-function IGCM_sys_Rapatrie 
    970 #D-* Purpose: Rapatrie 
    971 #D-* Examples: 
    972 #D- 
    973 function IGCM_sys_Rapatrie { 
    974     IGCM_debug_PushStack "IGCM_sys_Rapatrie" $@ 
    975     if ( $DEBUG_sys ) ; then 
    976         echo "IGCM_sys_Rapatrie :" $@ 
    977     fi 
    978  
    979     typeset RET=0 
    980  
    981     IGCM_sys_Get ${R_STOCKAGE}/$2 $1 ;  
    982     let $(( RET=RET+$? )) 
    983     IGCM_sys_Cd $1 ;  
    984     let $(( RET=RET+$? )) 
    985     IGCM_sys_UnTar $2 ;  
    986     let $(( RET=RET+$? )) 
    987  
    988     if [ ${RET} -gt 0 ] ; then 
    989         echo "IGCM_sys_Rapatrie : erreur." 
    990         IGCM_debug_Exit "IGCM_sys_Rapatrie" 
    991     fi 
    992     IGCM_debug_PopStack "IGCM_sys_Rapatrie" 
    993 } 
    994  
    995950############################################################## A FINIR !! 
    996951 
Note: See TracChangeset for help on using the changeset viewer.