1 |
|
C |
2 |
C $Header$ |
C $Header$ |
3 |
|
C $Name$ |
4 |
|
|
5 |
|
#include "AD_CONFIG.h" |
6 |
#include "CTRL_CPPOPTIONS.h" |
#include "CTRL_CPPOPTIONS.h" |
7 |
|
|
8 |
|
|
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 |
#ifndef ALLOW_TANGENTLINEAR_RUN |
doInitXX = .TRUE. |
181 |
yadmark = 'ad' |
|
182 |
#else |
#ifdef ALLOW_TANGENTLINEAR_RUN |
183 |
|
yadprefix = 'g_' |
184 |
yadmark = 'g_' |
yadmark = 'g_' |
185 |
|
#else |
186 |
|
yadprefix = 'ad' |
187 |
|
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 = ' ' |