120 |
C eeEndError initialisation/termination. |
C eeEndError initialisation/termination. |
121 |
C fatalError - Flag used to indicate that the model is ended with |
C fatalError - Flag used to indicate that the model is ended with |
122 |
C an error |
C an error |
123 |
|
C useCoupler - use Coupler for a multi-components set-up |
124 |
COMMON /EEPARAMS_L/ eeBootError, fatalError, eeEndError, |
COMMON /EEPARAMS_L/ eeBootError, fatalError, eeEndError, |
125 |
& useCubedSphereExchange |
& useCubedSphereExchange, useCoupler |
126 |
LOGICAL eeBootError |
LOGICAL eeBootError |
127 |
LOGICAL eeEndError |
LOGICAL eeEndError |
128 |
LOGICAL fatalError |
LOGICAL fatalError |
129 |
LOGICAL useCubedSphereExchange |
LOGICAL useCubedSphereExchange |
130 |
|
LOGICAL useCoupler |
131 |
|
|
132 |
C-- COMMON /EPARAMS_I/ Execution environment public integer variables. |
C-- COMMON /EPARAMS_I/ Execution environment public integer variables. |
133 |
C errorMessageUnit - Fortran IO unit for error messages |
C errorMessageUnit - Fortran IO unit for error messages |