source: CONFIG/trunk/IPSLCM4_v2/EXP00/COMP/lim.driver @ 287

Last change on this file since 287 was 287, checked in by sdipsl, 16 years ago

SD : every component must determine its own resolution

File size: 1.1 KB
Line 
1#!/bin/ksh
2
3#-----------------------------------
4function ICE_Initialize
5{ 
6    IGCM_debug_PushStack "ICE_Initialize"
7
8    #echo INITIALIZE ICE !!!
9    RESOL_ICE=$( echo $RESOL | awk "-Fx" '{print $1}' )
10
11    IGCM_debug_PopStack "ICE_Initialize"
12}
13
14#-----------------------------------
15function ICE_Update
16{
17    IGCM_debug_PushStack "ICE_Update"
18
19    ##--Write Frequency Purpose ....
20
21    ##-- NOTICE THAT ICE_UPDATE
22    ##-- MUST BE DONE AFTER OCE_UPDATE
23
24    (( ICE_NSTOCK = ORCA_NWRITE ))
25
26    ##-- Restart configuration
27    if ( [ "${CumulPeriod}" -eq 1 ] && [ "${config_ICE_Restart}" = "n" ] ) ; then
28        LIMSTAR=2
29        #echo "PAS DE RESTART GLACE UCL"
30    else
31        LIMSTAR=1
32        #echo "RESTART GLACE UCL"
33    fi
34
35    #- pas de restart glace au debut de la simulation pour ORCA
36    sed -e "s/KKKKKKK/${LIMSTAR}/" \
37        -e "s/SSSSSSS/${ICE_NSTOCK}/" \
38        run.param.li > run.param.li.tmp
39
40    IGCM_sys_Mv run.param.li.tmp run.param.li
41
42    IGCM_debug_PopStack "ICE_Update"
43}
44
45#-----------------------------------
46function ICE_Finalize
47{
48    IGCM_debug_PushStack "ICE_Finalize"
49
50    echo FINALIZE ICE !!!
51
52    IGCM_debug_PopStack "ICE_Finalize"
53}
Note: See TracBrowser for help on using the repository browser.