89 |
C to kg/m2/s by multiplying by rhoConstFresh. |
C to kg/m2/s by multiplying by rhoConstFresh. |
90 |
C saltFluxFile :: File containing surface salt flux |
C saltFluxFile :: File containing surface salt flux |
91 |
C pLoadFile :: File containing pressure loading |
C pLoadFile :: File containing pressure loading |
92 |
C eddyTauxFile :: File containing zonal Eddy stress data |
C eddyPsiXFile :: File containing zonal Eddy streamfunction data |
93 |
C eddyTauyFile :: File containing meridional Eddy stress data |
C eddyPsiYFile :: File containing meridional Eddy streamfunction data |
94 |
C the_run_name :: string identifying the name of the model "run" |
C the_run_name :: string identifying the name of the model "run" |
95 |
COMMON /PARM_C/ |
COMMON /PARM_C/ |
96 |
& buoyancyRelation, eosType, |
& buoyancyRelation, eosType, |
107 |
& lambdaThetaFile, lambdaSaltFile, |
& lambdaThetaFile, lambdaSaltFile, |
108 |
& uVelInitFile, vVelInitFile, pSurfInitFile, |
& uVelInitFile, vVelInitFile, pSurfInitFile, |
109 |
& dQdTfile, ploadFile, |
& dQdTfile, ploadFile, |
110 |
& eddyTauxFile, eddyTauyFile, |
& eddyPsiXFile, eddyPsiYFile, |
111 |
& the_run_name |
& the_run_name |
112 |
CHARACTER*(MAX_LEN_FNAM) buoyancyRelation |
CHARACTER*(MAX_LEN_FNAM) buoyancyRelation |
113 |
CHARACTER*(6) eosType |
CHARACTER*(6) eosType |
138 |
CHARACTER*(MAX_LEN_FNAM) pSurfInitFile |
CHARACTER*(MAX_LEN_FNAM) pSurfInitFile |
139 |
CHARACTER*(MAX_LEN_FNAM) dQdTfile |
CHARACTER*(MAX_LEN_FNAM) dQdTfile |
140 |
CHARACTER*(MAX_LEN_FNAM) ploadFile |
CHARACTER*(MAX_LEN_FNAM) ploadFile |
141 |
CHARACTER*(MAX_LEN_FNAM) eddyTauxFile |
CHARACTER*(MAX_LEN_FNAM) eddyPsiXFile |
142 |
CHARACTER*(MAX_LEN_FNAM) eddyTauyFile |
CHARACTER*(MAX_LEN_FNAM) eddyPsiYFile |
143 |
CHARACTER*(MAX_LEN_FNAM) lambdaThetaFile |
CHARACTER*(MAX_LEN_FNAM) lambdaThetaFile |
144 |
CHARACTER*(MAX_LEN_FNAM) lambdaSaltFile |
CHARACTER*(MAX_LEN_FNAM) lambdaSaltFile |
145 |
CHARACTER*(MAX_LEN_PREC/2) the_run_name |
CHARACTER*(MAX_LEN_PREC/2) the_run_name |