69 |
C surfQswfile :: File containing surface shortwave radiation |
C surfQswfile :: File containing surface shortwave radiation |
70 |
C dQdTfile :: File containing thermal relaxation coefficient |
C dQdTfile :: File containing thermal relaxation coefficient |
71 |
C EmPmRfile :: File containing surface fresh water flux |
C EmPmRfile :: File containing surface fresh water flux |
72 |
|
C pLoadFile :: File containing pressure loading |
73 |
C buoyancyRelation :: Flag used to indicate which relation to use to |
C buoyancyRelation :: Flag used to indicate which relation to use to |
74 |
C get buoyancy. |
C get buoyancy. |
75 |
COMMON /PARM_C/ checkPtSuff, |
COMMON /PARM_C/ checkPtSuff, |
79 |
& saltClimFile, buoyancyRelation, |
& saltClimFile, buoyancyRelation, |
80 |
& EmPmRfile, surfQfile, surfQswfile, |
& EmPmRfile, surfQfile, surfQswfile, |
81 |
& uVelInitFile, vVelInitFile, pSurfInitFile, |
& uVelInitFile, vVelInitFile, pSurfInitFile, |
82 |
& dQdTfile |
& dQdTfile, ploadFile |
83 |
CHARACTER*(5) checkPtSuff(maxNoChkptLev) |
CHARACTER*(5) checkPtSuff(maxNoChkptLev) |
84 |
CHARACTER*(MAX_LEN_FNAM) bathyFile, topoFile |
CHARACTER*(MAX_LEN_FNAM) bathyFile, topoFile |
85 |
CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile |
CHARACTER*(MAX_LEN_FNAM) hydrogThetaFile |
96 |
CHARACTER*(MAX_LEN_FNAM) vVelInitFile |
CHARACTER*(MAX_LEN_FNAM) vVelInitFile |
97 |
CHARACTER*(MAX_LEN_FNAM) pSurfInitFile |
CHARACTER*(MAX_LEN_FNAM) pSurfInitFile |
98 |
CHARACTER*(MAX_LEN_FNAM) dQdTfile |
CHARACTER*(MAX_LEN_FNAM) dQdTfile |
99 |
|
CHARACTER*(MAX_LEN_FNAM) ploadFile |
100 |
|
|
101 |
C-- COMMON /PARM_I/ Integer valued parameters used by the model. |
C-- COMMON /PARM_I/ Integer valued parameters used by the model. |
102 |
C cg2dMaxIters :: Maximum number of iterations in the |
C cg2dMaxIters :: Maximum number of iterations in the |