107 |
& xx_hfacc_file, |
& xx_hfacc_file, |
108 |
& xx_efluxy_file, |
& xx_efluxy_file, |
109 |
& xx_efluxp_file, |
& xx_efluxp_file, |
110 |
& xx_bottomdrag_file |
& xx_bottomdrag_file, |
111 |
|
& doInitXX |
112 |
|
|
113 |
namelist /ctrl_packnames/ |
namelist /ctrl_packnames/ |
114 |
& yadmark, yctrlid, |
& yadmark, yctrlid, yctrlposunpack, yctrlpospack, |
115 |
& ctrlname, costname, scalname, maskname, metaname |
& ctrlname, costname, scalname, maskname, metaname |
116 |
|
|
117 |
_BEGIN_MASTER( myThid ) |
_BEGIN_MASTER( myThid ) |
177 |
xx_efluxp_file = ' ' |
xx_efluxp_file = ' ' |
178 |
xx_bottomdrag_file = ' ' |
xx_bottomdrag_file = ' ' |
179 |
|
|
180 |
|
doInitXX = .TRUE. |
181 |
|
|
182 |
#ifdef ALLOW_TANGENTLINEAR_RUN |
#ifdef ALLOW_TANGENTLINEAR_RUN |
183 |
yadprefix = 'g_' |
yadprefix = 'g_' |
184 |
yadmark = 'g_' |
yadmark = 'g_' |
187 |
yadmark = 'ad' |
yadmark = 'ad' |
188 |
#endif |
#endif |
189 |
yctrlid = 'MIT_CE_000' |
yctrlid = 'MIT_CE_000' |
190 |
|
yctrlposunpack = '.opt' |
191 |
|
yctrlpospack = '.opt' |
192 |
ctrlname = ' ' |
ctrlname = ' ' |
193 |
costname = ' ' |
costname = ' ' |
194 |
scalname = ' ' |
scalname = ' ' |