46 |
CHARACTER*(MAX_LEN_PREC) record |
CHARACTER*(MAX_LEN_PREC) record |
47 |
NAMELIST /EEPARMS/ |
NAMELIST /EEPARMS/ |
48 |
& nTx, nTy, usingMPI, useCoupler, useCubedSphereExchange, |
& nTx, nTy, usingMPI, useCoupler, useCubedSphereExchange, |
49 |
& printMapIncludesZeros |
& printMapIncludesZeros, useSETRLSTK |
50 |
CEOP |
CEOP |
51 |
|
|
52 |
|
|
86 |
C useCoupler is a flag which controls communications with other |
C useCoupler is a flag which controls communications with other |
87 |
C model components through a coupler interface. |
C model components through a coupler interface. |
88 |
C |
C |
89 |
|
C useSETRLSTK is a flag which toggles calling a small C routine |
90 |
|
C which sets the stack size to "unlimited" using setrlimit() |
91 |
|
C |
92 |
notUsingXPeriodicity = .FALSE. |
notUsingXPeriodicity = .FALSE. |
93 |
notUsingYPeriodicity = .FALSE. |
notUsingYPeriodicity = .FALSE. |
94 |
useCubedSphereExchange = .FALSE. |
useCubedSphereExchange = .FALSE. |
96 |
useCoupler = .FALSE. |
useCoupler = .FALSE. |
97 |
nTx = 1 |
nTx = 1 |
98 |
nTy = 1 |
nTy = 1 |
99 |
|
useSETRLSTK = .FALSE. |
100 |
|
|
101 |
C-- Read in data from eedata file |
C-- Read in data from eedata file |
102 |
C We really ought to be using our environment file reading |
C We really ought to be using our environment file reading |