105 |
& cg2dChkResFreq, |
& cg2dChkResFreq, |
106 |
& cg3dMaxIters, |
& cg3dMaxIters, |
107 |
& cg3dChkResFreq, |
& cg3dChkResFreq, |
108 |
& nIter0, nTimeSteps, |
& nIter0, nTimeSteps, nEndIter, |
109 |
& numStepsPerPickup, |
& numStepsPerPickup, |
110 |
& writeStatePrec, nCheckLev, |
& writeStatePrec, nCheckLev, |
111 |
& writeBinaryPrec, readBinaryPrec, |
& writeBinaryPrec, readBinaryPrec, |
116 |
INTEGER cg3dChkResFreq |
INTEGER cg3dChkResFreq |
117 |
INTEGER nIter0 |
INTEGER nIter0 |
118 |
INTEGER nTimeSteps |
INTEGER nTimeSteps |
119 |
|
INTEGER nEndIter |
120 |
INTEGER numStepsPerPickup |
INTEGER numStepsPerPickup |
121 |
INTEGER writeStatePrec |
INTEGER writeStatePrec |
122 |
INTEGER writeBinaryPrec |
INTEGER writeBinaryPrec |
370 |
& externForcingCycle, externForcingPeriod, |
& externForcingCycle, externForcingPeriod, |
371 |
& viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp, |
& viscAp, diffKpT, diffKpS, hFacMinDr, hFacMinDp, |
372 |
& theta_S, specVol_S, horiVertRatio, recip_horiVertRatio, |
& theta_S, specVol_S, horiVertRatio, recip_horiVertRatio, |
373 |
& latFFTFiltLo |
& latFFTFiltLo, ivdc_kappa |
374 |
|
|
375 |
_RL cg2dTargetResidual |
_RL cg2dTargetResidual |
376 |
_RL cg3dTargetResidual |
_RL cg3dTargetResidual |
456 |
_RL horiVertRatio |
_RL horiVertRatio |
457 |
_RL recip_horiVertRatio |
_RL recip_horiVertRatio |
458 |
_RL latFFTFiltLo |
_RL latFFTFiltLo |
459 |
|
_RL ivdc_kappa |
460 |
|
|
461 |
COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp, |
COMMON /PARM_A/ HeatCapacity_Cp,recip_Cp, |
462 |
& Lamba_theta |
& Lamba_theta |