1 | # $Id$ |
---|
2 | set -xv |
---|
3 | |
---|
4 | CONF=GYRE |
---|
5 | # Variables changed by lance_batch.ksh script |
---|
6 | RUN=xxx |
---|
7 | NB_PROCS=xxx |
---|
8 | LAUNCH=xxx |
---|
9 | LEXE=xxx |
---|
10 | CPERF=xxx |
---|
11 | D_INPUT=xxx |
---|
12 | D_GET=xxx |
---|
13 | REF_TAG=xxx |
---|
14 | MYO_EXP=xxx |
---|
15 | TSYMB=xxx |
---|
16 | USE_IOMPUT=xxx |
---|
17 | USE_IOSERVER=xxx |
---|
18 | NB_PROCS_IOSERVER=xxx |
---|
19 | |
---|
20 | # Variables changed by ins_valid.ksh script |
---|
21 | MAINDIR=/workdir/rech/eee/reee831/NVTK |
---|
22 | WORK=/workdir/rech/eee/reee831/NVTK/modipsl/config |
---|
23 | REF_OD=/u/rech/eee/reee831/NEMO_VALIDATION |
---|
24 | |
---|
25 | # Arguments |
---|
26 | # type = 'long' or '1_short' or '2_short' |
---|
27 | type=$1 |
---|
28 | |
---|
29 | case ${type} in |
---|
30 | 'long' ) |
---|
31 | DIROUT='LONG' |
---|
32 | ITERATIONS=360 ;; |
---|
33 | |
---|
34 | '1_short' ) |
---|
35 | DIROUT='1_SHORT' |
---|
36 | ITERATIONS=180 ;; |
---|
37 | |
---|
38 | '2_short' ) |
---|
39 | DIROUT='2_SHORT' |
---|
40 | ITERATIONS=180 ;; |
---|
41 | |
---|
42 | 'gtime' ) |
---|
43 | DIROUT='GTIME' |
---|
44 | ITERATIONS=4320 ;; |
---|
45 | esac |
---|
46 | |
---|
47 | # Working directory |
---|
48 | cd ${TMPDIR} |
---|
49 | #-T- osxxlf mkdir -p ${WORK}/NEMO_VALID/W${CONF}/${RUN}/${DIROUT}/${MYO_EXP}/RUN |
---|
50 | #-T- osxxlf cd ${WORK}/NEMO_VALID/W${CONF}/${RUN}/${DIROUT}/${MYO_EXP}/RUN |
---|
51 | #-T- osxxlf zback=$? |
---|
52 | #-T- osxxlf if [ ${zback} = 0 ] ; then rm -rf namelist* *.nc memory* solver.stat ocean.output* mpp.output* mono.output* ; fi |
---|
53 | |
---|
54 | ############################################################## |
---|
55 | ############################################################## |
---|
56 | ############################################################## |
---|
57 | ### Input files |
---|
58 | ############################################################## |
---|
59 | ############################################################## |
---|
60 | ############################################################## |
---|
61 | # Local function to copy namelists files |
---|
62 | get_namelist () { |
---|
63 | if [ -a $1/$2_$3 ] ; then |
---|
64 | cp $1/$2_$3 $4 |
---|
65 | else |
---|
66 | echo ' ###############################################################' |
---|
67 | echo ' ######################## W A R N I N G ########################' |
---|
68 | echo ' ######################## W A R N I N G ########################' |
---|
69 | echo ' ######################## W A R N I N G ########################' |
---|
70 | echo ' ###############################################################' |
---|
71 | echo " $2_$3 file doesn't exist, we use the standard $2" |
---|
72 | echo ' ###############################################################' |
---|
73 | echo ' ######################## W A R N I N G ########################' |
---|
74 | echo ' ######################## W A R N I N G ########################' |
---|
75 | echo ' ######################## W A R N I N G ########################' |
---|
76 | echo ' ###############################################################' |
---|
77 | cp $1/$2 $4 |
---|
78 | fi |
---|
79 | } |
---|
80 | |
---|
81 | # Local function to find namelists parameters |
---|
82 | supergrep () { |
---|
83 | grep "^ *$1 *=" $2 | sed -e "s% *\!.*%%" |
---|
84 | } |
---|
85 | |
---|
86 | # Ocean namelist |
---|
87 | LOC_NAM=${MAINDIR}/modipsl/config/${CONF}/EXP00 |
---|
88 | get_namelist ${LOC_NAM} namelist ${MYO_EXP} namelist |
---|
89 | |
---|
90 | # namelist modifications |
---|
91 | PAT_NIT000=$( supergrep nn_it000 namelist ) |
---|
92 | PAT_NITEND=$( supergrep nn_itend namelist ) |
---|
93 | PAT_NSTOCK=$( supergrep nn_stock namelist ) |
---|
94 | PAT_NWRITE=$( supergrep nn_write namelist ) |
---|
95 | PAT_NRSTDT=$( supergrep nn_rstctl namelist ) |
---|
96 | PAT_NBITCM=$( supergrep nn_bit_cmp namelist ) |
---|
97 | PAT_NSOLVV=$( supergrep nn_solv namelist ) |
---|
98 | PAT_RESTAR=$( supergrep ln_rstart namelist ) |
---|
99 | PAT_RESMLD=$( supergrep ln_trdmld_restart namelist ) |
---|
100 | |
---|
101 | sed -e "s%$PAT_RESTAR% ln_rstart = .false.%" \ |
---|
102 | -e "s%$PAT_NIT000% nn_it000 = 1 %" \ |
---|
103 | -e "s%$PAT_NITEND% nn_itend = ${ITERATIONS} %" \ |
---|
104 | -e "s%$PAT_NSTOCK% nn_stock = ${ITERATIONS} %" \ |
---|
105 | -e "s%$PAT_NWRITE% nn_write = 60 %" \ |
---|
106 | -e "s%$PAT_NRSTDT% nn_rstctl = 0 %" \ |
---|
107 | -e "s%$PAT_NBITCM% nn_bit_cmp = 1%" \ |
---|
108 | -e "s%$PAT_NSOLVV% nn_solv = 2%" \ |
---|
109 | -e "s%$PAT_RESMLD% ln_trdmld_restart = .false.%" namelist > nam.tmp |
---|
110 | |
---|
111 | mv nam.tmp namelist |
---|
112 | |
---|
113 | # iom_put xml file |
---|
114 | if [ "${USE_IOMPUT}" = "true" ] |
---|
115 | then |
---|
116 | get_namelist ${LOC_NAM} xmlio_server.def ${MYO_EXP} xmlio_server.def |
---|
117 | get_namelist ${LOC_NAM} iodef.xml ${MYO_EXP} iodef.xml |
---|
118 | sed -e "s/^ *using_server *=.*$/ using_server = .${USE_IOSERVER}./" xmlio_server.def > tmp$$ |
---|
119 | mv tmp$$ xmlio_server.def |
---|
120 | fi |
---|
121 | |
---|
122 | |
---|
123 | # Analytical forcing |
---|
124 | |
---|
125 | # Get restarts files if needed |
---|
126 | if [ $type = '2_short' ] |
---|
127 | then |
---|
128 | if [ ${RUN} = 'mon' -o ${RUN} = 'omp' ] ; then |
---|
129 | cp ${WORK}/NEMO_VALID/W${CONF}/${RUN}/1_SHORT/${MYO_EXP}/*_restart.nc restart.nc |
---|
130 | cp ${WORK}/NEMO_VALID/W${CONF}/${RUN}/1_SHORT/${MYO_EXP}/*_restart_mld.nc restart_mld.nc |
---|
131 | fi |
---|
132 | |
---|
133 | if [ ${RUN} = 'mpi' ] ; then |
---|
134 | typeset -Z4 i=0 |
---|
135 | while [ $i -lt $NB_PROCS ] |
---|
136 | do |
---|
137 | cp ${WORK}/NEMO_VALID/W${CONF}/${RUN}/1_SHORT/${MYO_EXP}/*_restart_${i}.nc restart_${i}.nc |
---|
138 | cp ${WORK}/NEMO_VALID/W${CONF}/${RUN}/1_SHORT/${MYO_EXP}/*_restart_mld_${i}.nc restart_mld_${i}.nc |
---|
139 | let i=$i+1 |
---|
140 | done |
---|
141 | fi |
---|
142 | |
---|
143 | # Ocean namelist modifications |
---|
144 | PAT_NIT000=$( supergrep nn_it000 namelist ) |
---|
145 | PAT_NITEND=$( supergrep nn_itend namelist ) |
---|
146 | PAT_NRSTDT=$( supergrep nn_rstctl namelist ) |
---|
147 | PAT_RESTAR=$( supergrep ln_rstart namelist ) |
---|
148 | PAT_RESMLD=$( supergrep ln_trdmld_restart namelist ) |
---|
149 | ORCA_NIT000=$(( $ITERATIONS + 1 )) |
---|
150 | ORCA_NITEND=$(( $ITERATIONS*2 )) |
---|
151 | |
---|
152 | sed -e "s%$PAT_RESTAR% ln_rstart = .true.%" \ |
---|
153 | -e "s%$PAT_NIT000% nn_it000 = $ORCA_NIT000 %" \ |
---|
154 | -e "s%$PAT_NITEND% nn_itend = $ORCA_NITEND %" \ |
---|
155 | -e "s%$PAT_NRSTDT% nn_rstctl = 2%" \ |
---|
156 | -e "s%$PAT_RESMLD% ln_trdmld_restart = .true.%" namelist > nam.tmp |
---|
157 | |
---|
158 | mv nam.tmp namelist |
---|
159 | |
---|
160 | fi |
---|
161 | |
---|
162 | ############################################################## |
---|
163 | ############################################################## |
---|
164 | ############################################################## |
---|
165 | ### Launch run |
---|
166 | ############################################################## |
---|
167 | ############################################################## |
---|
168 | ############################################################## |
---|
169 | |
---|
170 | cp ${MAINDIR}/modipsl/bin/opa_${CONF}_${RUN}_${MYO_EXP} opa_${CONF}_${RUN}_${MYO_EXP} |
---|
171 | cp ${MAINDIR}/modipsl/bin/opa_${CONF}_memo_${MYO_EXP} opa_${CONF}_memo_${MYO_EXP} |
---|
172 | chmod 777 opa_${CONF}_${RUN}_${MYO_EXP} |
---|
173 | chmod 777 opa_${CONF}_memo_${MYO_EXP} |
---|
174 | |
---|
175 | # |
---|
176 | # Profiling & Executable memory size |
---|
177 | #################################### |
---|
178 | touch memory_size.txt |
---|
179 | |
---|
180 | case ${RUN} in |
---|
181 | 'mon' ) |
---|
182 | #-T- sx8brodie export F_PROGINF=detail |
---|
183 | #-T- sx8brodie echo "Stack memory: $( (size opa_${CONF}_${RUN}_${MYO_EXP}) )" >> memory_size.txt |
---|
184 | #-T- sx8brodie echo "Static memory: $( (size opa_${CONF}_memo_${MYO_EXP}) )" >> memory_size.txt ;; |
---|
185 | #-T- sx8mercure export F_PROGINF=detail |
---|
186 | #-T- sx8mercure echo "Stack memory: $( (size opa_${CONF}_${RUN}_${MYO_EXP}) )" >> memory_size.txt |
---|
187 | #-T- sx8mercure echo "Static memory: $( (size opa_${CONF}_memo_${MYO_EXP}) )" >> memory_size.txt ;; |
---|
188 | #-T- aix6 echo "Stack memory: $( (size opa_${CONF}_memo_${MYO_EXP}) )" >> memory_size.txt |
---|
189 | #-T- aix6 echo "Static memory: $( (size opa_${CONF}_${RUN}_${MYO_EXP}) )" >> memory_size.txt ;; |
---|
190 | #-T- osxxlf echo "Stack memory: $( (size opa_${CONF}_memo_${MYO_EXP}) )" >> memory_size.txt |
---|
191 | #-T- osxxlf echo "Static memory: $( (size opa_${CONF}_${RUN}_${MYO_EXP}) )" >> memory_size.txt ;; |
---|
192 | 'mpi' ) |
---|
193 | #-T- sx8brodie export MPIPROGINF=detail ;; |
---|
194 | #-T- sx8mercure export MPIPROGINF=detail ;; |
---|
195 | #-T- aix6 ;; |
---|
196 | #-T- osxxlf ;; |
---|
197 | 'omp' ) |
---|
198 | #-T- sx8brodie export F_PROGINF=detail |
---|
199 | #-T- sx8brodie export OMP_NUM_THREADS=${NB_PROCS} ;; |
---|
200 | #-T- sx8mercure export F_PROGINF=detail |
---|
201 | #-T- sx8mercure export OMP_NUM_THREADS=${NB_PROCS} ;; |
---|
202 | #-T- aix6 ;; |
---|
203 | #-T- osxxlf ;; |
---|
204 | esac |
---|
205 | # |
---|
206 | # >>>>>> EXECUTION < < < < |
---|
207 | ########################## |
---|
208 | |
---|
209 | case ${RUN} in |
---|
210 | 'mon' | 'omp' ) |
---|
211 | ${CPERF} ./opa_${CONF}_${RUN}_${MYO_EXP} ;; |
---|
212 | 'mpi' ) |
---|
213 | #-T- sx8brodie ${CPERF} ${LEXE} ./opa_${CONF}_${RUN}_${MYO_EXP} ;; |
---|
214 | #-T- sx8mercure ${CPERF} ${LEXE} ./opa_${CONF}_${RUN}_${MYO_EXP} ;; |
---|
215 | #-T- aix6 ${CPERF} ${LEXE} ./opa_${CONF}_${RUN}_${MYO_EXP} ;; |
---|
216 | #-T- osxxlf mpd& |
---|
217 | #-T- osxxlf sleep 5 |
---|
218 | #-T- osxxlf ${CPERF} ${LEXE} ./opa_${CONF}_${RUN}_${MYO_EXP} |
---|
219 | #-T- osxxlf mpdallexit ;; |
---|
220 | esac |
---|
221 | |
---|
222 | ls -l |
---|
223 | # |
---|
224 | |
---|
225 | ############################################################## |
---|
226 | ############################################################## |
---|
227 | ############################################################## |
---|
228 | ### Save output files |
---|
229 | ############################################################## |
---|
230 | ############################################################## |
---|
231 | ############################################################## |
---|
232 | case ${RUN} in |
---|
233 | 'mon' | 'omp' ) |
---|
234 | liste_files=' *abort* memory* namelist* *xml* perfs* solver.stat ocean.output layout* GYRE* restart* mono*' ;; |
---|
235 | 'mpi' ) |
---|
236 | liste_files=' *abort* namelist* *xml* solver.stat perfs* ocean.output* layout* GYRE* restart* mpp*' ;; |
---|
237 | esac |
---|
238 | |
---|
239 | # Ensure that all files saved are coming from the current run |
---|
240 | ind=1 |
---|
241 | for k in $liste_files |
---|
242 | do |
---|
243 | echo $k > temp |
---|
244 | var=$( ( awk '{printf("%-.4s", varin ) } ' varin=$k temp ) ) |
---|
245 | if [ ${ind} = 1 -a ${var} = 'perf' ] ; then |
---|
246 | kc='perf*' |
---|
247 | rm -f ${WORK}/NEMO_VALID/W${CONF}/${RUN}/${DIROUT}/${MYO_EXP}/${kc} |
---|
248 | ind=0 |
---|
249 | fi |
---|
250 | cp $k ${WORK}/NEMO_VALID/W${CONF}/${RUN}/${DIROUT}/${MYO_EXP}/$k |
---|
251 | done |
---|
252 | |
---|
253 | ############################################################## |
---|
254 | ############################################################## |
---|
255 | ############################################################## |
---|
256 | ### Retrieve some reference run files |
---|
257 | ############################################################## |
---|
258 | ############################################################## |
---|
259 | ############################################################## |
---|
260 | if [ ${REF_TAG} = 'nemo_v2' -o ${REF_TAG} = 'nemo_v2_3' -o ${REF_TAG} = 'nemo_v3' -o ${REF_TAG} = 'nemo_v3_2' ] |
---|
261 | then |
---|
262 | STORE_DATA=${REF_OD}/${CONF}/${REF_TAG}/${RUN}/${DIROUT} |
---|
263 | LFILES="solver.stat memory_size.txt ocean.output ${RUN}${CONF}_err" |
---|
264 | SAV_DIR=${WORK}/NEMO_VALID/W${CONF}/${RUN}/${DIROUT}/${REF_TAG} |
---|
265 | if [ ! -d ${SAV_DIR} ] ; then |
---|
266 | mkdir ${SAV_DIR} |
---|
267 | fi |
---|
268 | for ref_file in ${LFILES} |
---|
269 | do |
---|
270 | ${D_GET} ${STORE_DATA}/${TSYMB}${ref_file} ${SAV_DIR}/${ref_file} |
---|
271 | done |
---|
272 | fi |
---|
273 | |
---|
274 | ############################################################## |
---|
275 | ############################################################## |
---|
276 | ############################################################## |
---|
277 | ### Launch restart job |
---|
278 | ############################################################## |
---|
279 | ############################################################## |
---|
280 | ############################################################## |
---|
281 | if [ $type = '1_short' ] ; then |
---|
282 | cd ${WORK}/NEMO_VALID/W${CONF}/${RUN}/2_SHORT/${MYO_EXP} |
---|
283 | ${LAUNCH}job_${RUN}_2_short_${MYO_EXP}.ksh |
---|
284 | fi |
---|