260 |
C momImplVertAdv :: Turns on implicit vertical advection for Momentum |
C momImplVertAdv :: Turns on implicit vertical advection for Momentum |
261 |
C multiDimAdvection :: Flag that enable multi-dimension advection |
C multiDimAdvection :: Flag that enable multi-dimension advection |
262 |
C useMultiDimAdvec :: True if multi-dim advection is used at least once |
C useMultiDimAdvec :: True if multi-dim advection is used at least once |
263 |
C forcing_In_AB :: if False, put forcing (Temp,Salt,Tracers) contribution |
C forcing_In_AB :: if False, put forcing (Temp,Salt,Tracers) contribution |
264 |
C out off Adams-Bashforth time stepping. |
C out off Adams-Bashforth time stepping. |
265 |
|
C doAB_onGtGs :: if the Adams-Bashforth time stepping is used, always |
266 |
|
C apply AB on tracer tendencies (rather than on Tracer) |
267 |
C startFromPickupAB2 :: with AB-3 code, start from an AB-2 pickup |
C startFromPickupAB2 :: with AB-3 code, start from an AB-2 pickup |
268 |
C doThetaClimRelax :: Set true if relaxation to temperature |
C doThetaClimRelax :: Set true if relaxation to temperature |
269 |
C climatology is required. |
C climatology is required. |
323 |
& useAbsVorticity, upwindShear, |
& useAbsVorticity, upwindShear, |
324 |
& implicitDiffusion, implicitViscosity, |
& implicitDiffusion, implicitViscosity, |
325 |
& tempImplVertAdv, saltImplVertAdv, momImplVertAdv, |
& tempImplVertAdv, saltImplVertAdv, momImplVertAdv, |
326 |
& multiDimAdvection, useMultiDimAdvec, forcing_In_AB, |
& multiDimAdvection, useMultiDimAdvec, |
327 |
|
& forcing_In_AB, doAB_onGtGs, |
328 |
& doThetaClimRelax, doSaltClimRelax, doTr1ClimRelax, |
& doThetaClimRelax, doSaltClimRelax, doTr1ClimRelax, |
329 |
& periodicExternalForcing, |
& periodicExternalForcing, |
330 |
& fluidIsAir, fluidIsWater, |
& fluidIsAir, fluidIsWater, |
389 |
LOGICAL multiDimAdvection |
LOGICAL multiDimAdvection |
390 |
LOGICAL useMultiDimAdvec |
LOGICAL useMultiDimAdvec |
391 |
LOGICAL forcing_In_AB |
LOGICAL forcing_In_AB |
392 |
|
LOGICAL doAB_onGtGs |
393 |
LOGICAL doThetaClimRelax |
LOGICAL doThetaClimRelax |
394 |
LOGICAL doSaltClimRelax |
LOGICAL doSaltClimRelax |
395 |
LOGICAL doTr1ClimRelax |
LOGICAL doTr1ClimRelax |
451 |
C rhoConstFresh :: Constant reference density for fresh water (rain) |
C rhoConstFresh :: Constant reference density for fresh water (rain) |
452 |
C tRef :: reference vertical profile for potential temperature |
C tRef :: reference vertical profile for potential temperature |
453 |
C sRef :: reference vertical profile for salinity/specific humidity |
C sRef :: reference vertical profile for salinity/specific humidity |
454 |
|
C phiRef :: reference potential (pressure/rho, geopotential) profile |
455 |
C phiMin :: Latitude of southern most cell face. |
C phiMin :: Latitude of southern most cell face. |
456 |
C thetaMin :: Longitude of western most cell face (this |
C thetaMin :: Longitude of western most cell face (this |
457 |
C is an "inert" parameter but it is included |
C is an "inert" parameter but it is included |
590 |
C ( g*rho if horiz in m and vertical in Pa ). |
C ( g*rho if horiz in m and vertical in Pa ). |
591 |
C Ro_SeaLevel :: standard position of Sea-Level in "R" coordinate, used as |
C Ro_SeaLevel :: standard position of Sea-Level in "R" coordinate, used as |
592 |
C starting value (k=1) for vertical coordinate (rf(1)=Ro_SeaLevel) |
C starting value (k=1) for vertical coordinate (rf(1)=Ro_SeaLevel) |
593 |
|
C sideDragFactor :: side-drag scaling factor (used only if no_slip_sides) |
594 |
|
C (default=2: full drag ; =1: gives half-slip BC) |
595 |
C bottomDragLinear :: Drag coefficient built in to core dynamics |
C bottomDragLinear :: Drag coefficient built in to core dynamics |
596 |
C --"-"-- Quadratic ( linear: 1/s, quadratic: 1/m ) |
C bottomDragQuadratic ( linear: 1/s, quadratic: 1/m ) |
597 |
|
C nh_Am2 :: scales the non-hydrostatic terms and changes internal scales |
598 |
|
C (i.e. allows convection at different Rayleigh numbers) |
599 |
COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit, |
COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit, |
600 |
& cg2dpcOffDFac, cg3dTargetResidual, |
& cg2dpcOffDFac, cg3dTargetResidual, |
601 |
& delR, delRc, delX, delY, |
& delR, delRc, delX, delY, |
618 |
& hFacMin, hFacMinDz, hFacInf, hFacSup, |
& hFacMin, hFacMinDz, hFacInf, hFacSup, |
619 |
& gravity, recip_Gravity, gBaro, rhonil, recip_rhonil, |
& gravity, recip_Gravity, gBaro, rhonil, recip_rhonil, |
620 |
& recip_rhoConst, rhoConst, |
& recip_rhoConst, rhoConst, |
621 |
& rhoConstFresh, convertEmP2rUnit, tRef, sRef, |
& rhoConstFresh, convertEmP2rUnit, tRef, sRef, phiRef, |
622 |
& baseTime, startTime, endTime, |
& baseTime, startTime, endTime, |
623 |
& chkPtFreq, pchkPtFreq, dumpFreq, adjDumpFreq, |
& chkPtFreq, pchkPtFreq, dumpFreq, adjDumpFreq, |
624 |
& diagFreq, taveFreq, tave_lastIter, monitorFreq, adjMonitorFreq, |
& diagFreq, taveFreq, tave_lastIter, monitorFreq, adjMonitorFreq, |
632 |
& hFacMinDr, hFacMinDp, |
& hFacMinDr, hFacMinDp, |
633 |
& horiVertRatio, recip_horiVertRatio, |
& horiVertRatio, recip_horiVertRatio, |
634 |
& ivdc_kappa, Ro_SeaLevel, |
& ivdc_kappa, Ro_SeaLevel, |
635 |
& bottomDragLinear,bottomDragQuadratic,nh_Am2, |
& sideDragFactor, bottomDragLinear, bottomDragQuadratic, nh_Am2, |
636 |
& tCylIn, tCylOut |
& tCylIn, tCylOut |
637 |
|
|
|
_RL nh_Am2 |
|
638 |
_RL cg2dTargetResidual |
_RL cg2dTargetResidual |
639 |
_RL cg2dTargetResWunit |
_RL cg2dTargetResWunit |
640 |
_RL cg3dTargetResidual |
_RL cg3dTargetResidual |
711 |
_RL convertEmP2rUnit |
_RL convertEmP2rUnit |
712 |
_RL tRef(Nr) |
_RL tRef(Nr) |
713 |
_RL sRef(Nr) |
_RL sRef(Nr) |
714 |
|
_RL phiRef(2*Nr+1) |
715 |
_RL baseTime |
_RL baseTime |
716 |
_RL startTime |
_RL startTime |
717 |
_RL endTime |
_RL endTime |
748 |
_RL recip_horiVertRatio |
_RL recip_horiVertRatio |
749 |
_RL ivdc_kappa |
_RL ivdc_kappa |
750 |
_RL Ro_SeaLevel |
_RL Ro_SeaLevel |
751 |
|
_RL sideDragFactor |
752 |
_RL bottomDragLinear |
_RL bottomDragLinear |
753 |
_RL bottomDragQuadratic |
_RL bottomDragQuadratic |
754 |
|
_RL nh_Am2 |
755 |
_RL tCylIn |
_RL tCylIn |
756 |
_RL tCylOut |
_RL tCylOut |
757 |
|
|
797 |
LOGICAL useFLT |
LOGICAL useFLT |
798 |
LOGICAL usePTRACERS |
LOGICAL usePTRACERS |
799 |
LOGICAL useGCHEM |
LOGICAL useGCHEM |
800 |
|
LOGICAL useRBCS |
801 |
LOGICAL useSBO |
LOGICAL useSBO |
802 |
LOGICAL useSEAICE |
LOGICAL useSEAICE |
803 |
LOGICAL useBulkForce |
LOGICAL useBulkForce |
812 |
COMMON /PARM_PACKAGES/ |
COMMON /PARM_PACKAGES/ |
813 |
& useKPP, useGMRedi, useOBCS, useAIM, useLand, useECCO, |
& useKPP, useGMRedi, useOBCS, useAIM, useLand, useECCO, |
814 |
& useSHAP_FILT, useZONAL_FILT, useGrdchk, useFLT, |
& useSHAP_FILT, useZONAL_FILT, useGrdchk, useFLT, |
815 |
& usePTRACERS, useGCHEM, |
& usePTRACERS, useGCHEM, useRBCS, |
816 |
& useSBO, useSEAICE, useThSIce, useBulkForce, |
& useSBO, useSEAICE, useThSIce, useBulkForce, |
817 |
& usefizhi, usegridalt, usediagnostics, useEBM, useMNC, |
& usefizhi, usegridalt, usediagnostics, useEBM, useMNC, |
818 |
& usePP81, useMY82, useOPPS, useGGL90, useMATRIX, |
& usePP81, useMY82, useOPPS, useGGL90, useMATRIX, |