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, useSETRLSTK, useSIGREG |
& printMapIncludesZeros, useSETRLSTK, useSIGREG, useEMBEDSRC |
50 |
CEOP |
CEOP |
51 |
|
|
52 |
|
|
89 |
C useSETRLSTK is a flag which toggles calling a small C routine |
C useSETRLSTK is a flag which toggles calling a small C routine |
90 |
C which sets the stack size to "unlimited" using setrlimit() |
C which sets the stack size to "unlimited" using setrlimit() |
91 |
C |
C |
92 |
|
C useEMBEDSRC is a flag which allows one or more embedded files |
93 |
|
C to be written |
94 |
|
|
95 |
notUsingXPeriodicity = .FALSE. |
notUsingXPeriodicity = .FALSE. |
96 |
notUsingYPeriodicity = .FALSE. |
notUsingYPeriodicity = .FALSE. |
97 |
useCubedSphereExchange = .FALSE. |
useCubedSphereExchange = .FALSE. |
101 |
nTy = 1 |
nTy = 1 |
102 |
useSETRLSTK = .FALSE. |
useSETRLSTK = .FALSE. |
103 |
useSIGREG = .FALSE. |
useSIGREG = .FALSE. |
104 |
|
useEMBEDSRC = .FALSE. |
105 |
|
|
106 |
C-- Read in data from eedata file |
C-- Read in data from eedata file |
107 |
C We really ought to be using our environment file reading |
C We really ought to be using our environment file reading |