119 |
& writeStatePrec, nCheckLev, |
& writeStatePrec, nCheckLev, |
120 |
& writeBinaryPrec, readBinaryPrec, |
& writeBinaryPrec, readBinaryPrec, |
121 |
& nonlinFreeSurf, |
& nonlinFreeSurf, |
122 |
& zonal_filt_sinpow, zonal_filt_cospow |
& zonal_filt_sinpow, zonal_filt_cospow, |
123 |
|
& tempAdvScheme, saltAdvScheme, tracerAdvScheme |
124 |
INTEGER cg2dMaxIters |
INTEGER cg2dMaxIters |
125 |
INTEGER cg2dChkResFreq |
INTEGER cg2dChkResFreq |
126 |
INTEGER cg3dMaxIters |
INTEGER cg3dMaxIters |
136 |
INTEGER nonlinFreeSurf |
INTEGER nonlinFreeSurf |
137 |
INTEGER zonal_filt_sinpow |
INTEGER zonal_filt_sinpow |
138 |
INTEGER zonal_filt_cospow |
INTEGER zonal_filt_cospow |
139 |
|
INTEGER tempAdvScheme |
140 |
|
INTEGER saltAdvScheme |
141 |
|
INTEGER tracerAdvScheme |
142 |
|
|
143 |
C-- COMMON /PARM_L/ Logical valued parameters used by the model. |
C-- COMMON /PARM_L/ Logical valued parameters used by the model. |
144 |
C usingCartesianGrid - If TRUE grid generation will be in a cartesian |
C usingCartesianGrid - If TRUE grid generation will be in a cartesian |
177 |
C momStepping - Turns momentum equation time-stepping off |
C momStepping - Turns momentum equation time-stepping off |
178 |
C tempStepping - Turns temperature equation time-stepping off |
C tempStepping - Turns temperature equation time-stepping off |
179 |
C saltStepping - Turns salinity equation time-stepping off |
C saltStepping - Turns salinity equation time-stepping off |
180 |
|
C tr1Stepping - Turns passive tracer 1 time-stepping on/off |
181 |
C useConstantF - Coriolis parameter set to f0 |
C useConstantF - Coriolis parameter set to f0 |
182 |
C useBetaPlaneF - Coriolis parameter set to f0 + beta.y |
C useBetaPlaneF - Coriolis parameter set to f0 + beta.y |
183 |
C useSphereF - Coriolis parameter set to 2.omega.sin(phi) |
C useSphereF - Coriolis parameter set to 2.omega.sin(phi) |
204 |
& momPressureForcing,tempDiffusion, tempAdvection, tempForcing, |
& momPressureForcing,tempDiffusion, tempAdvection, tempForcing, |
205 |
& saltDiffusion, saltAdvection, saltForcing, |
& saltDiffusion, saltAdvection, saltForcing, |
206 |
& rigidLid, implicitFreeSurface, exactConserv, uniformLin_PhiSurf, |
& rigidLid, implicitFreeSurface, exactConserv, uniformLin_PhiSurf, |
207 |
& momStepping, tempStepping, saltStepping, |
& momStepping, tempStepping, saltStepping, tr1Stepping, |
208 |
& metricTerms, usingSphericalPolarMTerms, |
& metricTerms, usingSphericalPolarMTerms, |
209 |
& useConstantF, useBetaPlaneF, useSphereF, |
& useConstantF, useBetaPlaneF, useSphereF, |
210 |
& implicitDiffusion, implicitViscosity, |
& implicitDiffusion, implicitViscosity, |
211 |
& doThetaClimRelax, doSaltClimRelax, |
& doThetaClimRelax, doSaltClimRelax, doTr1ClimRelax, |
212 |
& periodicExternalForcing, usingPCoords, usingZCoords, |
& periodicExternalForcing, usingPCoords, usingZCoords, |
213 |
& nonHydrostatic, globalFiles, |
& nonHydrostatic, globalFiles, |
214 |
& allowFreezing, groundAtK1, |
& allowFreezing, groundAtK1, |
215 |
& usePickupBeforeC35, debugMode |
& usePickupBeforeC35, debugMode, |
216 |
|
& readPickupWithTracer, writePickupWithTracer |
217 |
LOGICAL usingCartesianGrid |
LOGICAL usingCartesianGrid |
218 |
LOGICAL usingSphericalPolarGrid |
LOGICAL usingSphericalPolarGrid |
219 |
LOGICAL usingCurvilinearGrid |
LOGICAL usingCurvilinearGrid |
239 |
LOGICAL momStepping |
LOGICAL momStepping |
240 |
LOGICAL tempStepping |
LOGICAL tempStepping |
241 |
LOGICAL saltStepping |
LOGICAL saltStepping |
242 |
|
LOGICAL tr1Stepping |
243 |
LOGICAL metricTerms |
LOGICAL metricTerms |
244 |
LOGICAL useConstantF |
LOGICAL useConstantF |
245 |
LOGICAL useBetaPlaneF |
LOGICAL useBetaPlaneF |
248 |
LOGICAL implicitViscosity |
LOGICAL implicitViscosity |
249 |
LOGICAL doThetaClimRelax |
LOGICAL doThetaClimRelax |
250 |
LOGICAL doSaltClimRelax |
LOGICAL doSaltClimRelax |
251 |
|
LOGICAL doTr1ClimRelax |
252 |
LOGICAL periodicExternalForcing |
LOGICAL periodicExternalForcing |
253 |
LOGICAL usingPCoords |
LOGICAL usingPCoords |
254 |
LOGICAL usingZCoords |
LOGICAL usingZCoords |
258 |
LOGICAL groundAtK1 |
LOGICAL groundAtK1 |
259 |
LOGICAL usePickupBeforeC35 |
LOGICAL usePickupBeforeC35 |
260 |
LOGICAL debugMode |
LOGICAL debugMode |
261 |
|
LOGICAL readPickupWithTracer |
262 |
|
LOGICAL writePickupWithTracer |
263 |
|
|
264 |
C-- COMMON /PARM_R/ "Real" valued parameters used by the model. |
C-- COMMON /PARM_R/ "Real" valued parameters used by the model. |
265 |
C gg2dTargetResidual |
C gg2dTargetResidual |
406 |
& recip_rhoConst, rhoConst, tRef, sRef, |
& recip_rhoConst, rhoConst, tRef, sRef, |
407 |
& endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq, monitorFreq, |
& endTime, chkPtFreq, pchkPtFreq, dumpFreq, taveFreq, monitorFreq, |
408 |
& afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom, |
& afFacMom, vfFacMom, pfFacMom, cfFacMom, foFacMom, mtFacMom, |
409 |
& cosPower, |
& cosPower, cAdjFreq, omega, |
410 |
& cAdjFreq, omega, tauThetaClimRelax, lambdaThetaClimRelax, |
& tauThetaClimRelax, lambdaThetaClimRelax, |
411 |
& tauSaltClimRelax, lambdaSaltClimRelax, |
& tauSaltClimRelax, lambdaSaltClimRelax, |
412 |
|
& tauTr1ClimRelax, lambdaTr1ClimRelax, |
413 |
& externForcingCycle, externForcingPeriod, |
& externForcingCycle, externForcingPeriod, |
414 |
& viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp, |
& viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp, |
415 |
& theta_S, specVol_S, horiVertRatio, recip_horiVertRatio, |
& theta_S, specVol_S, horiVertRatio, recip_horiVertRatio, |
496 |
_RL lambdaThetaClimRelax |
_RL lambdaThetaClimRelax |
497 |
_RL tauSaltClimRelax |
_RL tauSaltClimRelax |
498 |
_RL lambdaSaltClimRelax |
_RL lambdaSaltClimRelax |
499 |
|
_RL tauTr1ClimRelax |
500 |
|
_RL lambdaTr1ClimRelax |
501 |
_RL externForcingCycle |
_RL externForcingCycle |
502 |
_RL externForcingPeriod |
_RL externForcingPeriod |
503 |
_RL horiVertRatio |
_RL horiVertRatio |
542 |
LOGICAL useGMRedi |
LOGICAL useGMRedi |
543 |
LOGICAL useOBCS |
LOGICAL useOBCS |
544 |
LOGICAL useAIM |
LOGICAL useAIM |
545 |
|
LOGICAL useGrdchk |
546 |
LOGICAL useECCO |
LOGICAL useECCO |
547 |
LOGICAL useSHAP_FILT |
LOGICAL useSHAP_FILT |
548 |
COMMON /PARM_PACKAGES/ |
COMMON /PARM_PACKAGES/ |
549 |
& useKPP, useGMRedi, useOBCS, useAIM, useECCO, useSHAP_FILT |
& useKPP, useGMRedi, useOBCS, useAIM, useECCO, |
550 |
|
& useSHAP_FILT, useGrdchk |
551 |
|
|