New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
user/flavoni/libIGCM/iom_put (diff) – NEMO

Changes between Version 16 and Version 17 of user/flavoni/libIGCM/iom_put


Ignore:
Timestamp:
2009-10-29T16:49:25+01:00 (14 years ago)
Author:
flavoni
Comment:

--

Legend:

Unmodified
Added
Removed
Modified

  • user/flavoni/libIGCM/iom_put

    v16 v17  
    1212   Add in modispl/util/mod.def in NEMO_IGCM: 
    1313 
    14  #-H- NEMO_IGCM  NEMO trunk [[BR]] 
    15  #-H- NEMO_IGCM  IOIPSL/src tag v2_1_8 [[BR]] 
    16  #-H- NEMO_IGCM  libIGCM tag libIGCM_v1_3 [[BR]] 
     14 #-H- NEMO_IGCM  NEMO trunk revision '''1670''' [[BR]] 
     15 #-H- NEMO_IGCM  libIGCM tag libIGCM_v1_4 [[BR]] 
    1716 #-H- NEMO_IGCM  NEMO_XMLIO_SERVER svn !r37 [[BR]] 
    1817 #-C- NEMO_IGCM  XMLF90                         HEAD  12 XMLF90                 modeles [[BR]] 
    … …  
    2625 1. changed PREFIX name for output .nc file  [[BR]] 
    2726 [OutputFiles]  [[BR]] 
    28  List= ('''${PREFIX}_${WF1}'''_icemod.nc, ${R_OUT_ICE_NWRITE}/${PREFIX}_${WF1}_icemod.nc, Post_1M_icemod) 
     27 List= ('''${PREFIX_NEMO}'''_icemod.nc, ${R_OUT_ICE_NWRITE}/${PREFIX}_${WF1}_icemod.nc, Post_1M_icemod) 
    2928  
     29 (in lim2.driver ${PREFIX_NEMO} is:  [[BR]] 
     30 ${PREFIX_NEMO}=${PREFIX}_{WF1}  if we use iomput [[BR]] 
     31 ${PREFIX_NEMO}=${PREFIX_NWRITE}_${DATE_OPA} if not )   [[BR]] 
     32 
     33 
    3034 2. removed deptht in ncrcat (for monitoring, no good to do ncrcat in 3 dimensions for ice)   [[BR]] 
    3135 [Post_1M_icemod] [[BR]] 
    … …  
    4347 [OutputFiles]  [[BR]] 
    4448 List= ('''${PREFIX}_${WF1}''''_grid_T.nc, ${R_OUT_OCE_NWRITE}/${PREFIX}_${WF1}_grid_T.nc, Post_1M_grid_T),\ [[BR]] 
    45  ('''${PREFIX}_${WF1}'''_grid_U.nc, ${R_OUT_OCE_NWRITE}/${PREFIX}_${WF1}_grid_U.nc, Post_1M_grid_U),\ [BR]] 
    46  ('''${PREFIX}_${WF1}'''_grid_V.nc, ${R_OUT_OCE_NWRITE}/${PREFIX}_${WF1}_grid_V.nc, Post_1M_grid_V),\ [[BR]] 
    47  ('''${PREFIX}_${WF1}'''_grid_W.nc, ${R_OUT_OCE_NWRITE}/${PREFIX}_${WF1}_grid_W.nc, Post_1M_grid_W),\ [[BR]] 
     49 ('''${PREFIX_NEMO}'''_grid_U.nc, ${R_OUT_OCE_NWRITE}/${PREFIX}_${WF1}_grid_U.nc, Post_1M_grid_U),\ [BR]] 
     50 ('''${PREFIX_NEMO}'''_grid_V.nc, ${R_OUT_OCE_NWRITE}/${PREFIX}_${WF1}_grid_V.nc, Post_1M_grid_V),\ [[BR]] 
     51 ('''${PREFIX_NEMO}'''_grid_W.nc, ${R_OUT_OCE_NWRITE}/${PREFIX}_${WF1}_grid_W.nc, Post_1M_grid_W),\ [[BR]] 
    4852 
     53 (in opa9.driver ${PREFIX_NEMO} is:  [[BR]] 
     54 ${PREFIX_NEMO}=${PREFIX}_{WF1}  if we use iomput [[BR]] 
     55 ${PREFIX_NEMO}=${PREFIX_NWRITE}_${DATE_OPA} if not )   [[BR]] 
    4956 
    5057 * '''opa9.driver'''  
    … …  
    7986 IGCM_sys_Mv iodef.xml.tmp iodef.xml [[BR]] 
    8087 
    81  * ''' libIGCM_config.ksh'''  
    8288 
    8389 # Determine number of day(s) in WriteFrequency :  [[BR]] 
    84  \${config_${comp}_WriteFrequency}  [[BR]] 
    85  case ${config_OCE_WriteFrequency} in  [[BR]] 
    86      *Y|*y)  [[BR]] 
    87       WriteFrequencyInYears=$( echo ${config_OCE_WriteFrequency} | sed -e 's/[yY]//' ) [[BR]] 
    88       IGCM_debug_Print 1 "Number of years for WriteFrequency : ${WriteFrequencyInYears}" [[BR]] 
    89       WriteFrequencyInDays=0  [[BR]] 
    90       i=0 [[BR]] 
    91       until [ $i -ge $WriteFrequencyInYears ] ; do [[BR]] 
    92       (( WriteFrequencyInDays = WriteFrequencyInDays + $( IGCM_date_DaysInYear $(( year + i )) ) )) [[BR]] 
    93       (( i=i+1 )) [[BR]] 
    94       done [[BR]] 
    95       ;; [[BR]] 
    96     *M|*m) [[BR]] 
    97       WriteFrequencyInMonths=$( echo ${config_OCE_WriteFrequency} | sed -e 's/[mM]//' ) [[BR]] 
    98       IGCM_debug_Print 1 "Number of months for WriteFrequency : ${WriteFrequencyInMonths}" [[BR]] 
    99       WriteFrequencyInDays=0 [[BR]] 
    100       i=0 [[BR]] 
    101       until [ $i -ge $WriteFrequencyInMonths ] ; do [[BR]] 
    102       if [ $(( month + i )) -lt 13 ] ; then [[BR]] 
    103       (( WriteFrequencyInDays  = WriteFrequencyInDays + $( IGCM_date_DaysInMonth $year $(( month + i )) ) )) [[BR]] 
    104       else [[BR]] 
    105       (( WriteFrequencyInDays  = WriteFrequencyInDays + $( IGCM_date_DaysInMonth $year $(( month + i - 12 )) ) )) [[BR]] 
    106       fi [[BR]] 
    107       (( i=i+1 )) [[BR]] 
    108       done [[BR]] 
    109       ;; [[BR]] 
    110     *D|*d) [[BR]] 
    111       WriteFrequencyInMonths=0 [[BR]] 
    112       WriteFrequencyInDays=$( echo ${config_OCE_WriteFrequency} | sed -e 's/[dD]//' );; [[BR]] 
    113       *) [[BR]] 
    114       IGCM_debug_Exit "IGCM_config_Analyse_PeriodLength " ${config_OCE_WriteFrequency} " invalid period length : choose in *Y, *M, *D." [[BR]] 
    115       IGCM_debug_Verif_Exit ;; [[BR]] 
    116  esac [[BR]] 
     90   case ${config_UserChoices_OCE_WriteFrquency} in 
     91            1Y|1y) 
     92                (( WriteFrequencyInDays = $( IGCM_date_DaysInYear $year ) )) ;; 
     93            1M|1m) 
     94                (( WriteFrequencyInDays = $( IGCM_date_DaysInMonth $year $month ) )) ;; 
     95            5D|5d) 
     96                (( WriteFrequencyInDays=5 )) ;; 
     97            1D|1d) 
     98                (( WriteFrequencyInDays=1 )) ;; 
     99            *) 
     100                IGCM_debug_Exit "IGCM_config_OCE_WriteFrquency " ${config_UserChoices_OCE_WriteFrquency} " invalid write frquency length : choose in 1Y, 1M, 5D, 1D." 
     101                IGCM_debug_Verif_Exit ;; 
     102   esac 
    117103 
    118  IGCM_debug_Print 3 "WriteFrequencyInDays    : ${WriteFrequencyInDays}" 
    119104