565 |
C :: parameter but it makes geographical references simple.) |
C :: parameter but it makes geographical references simple.) |
566 |
C ygOrigin :: Origin of the Y-axis (Cartesian Grid) / Latitude of Southern |
C ygOrigin :: Origin of the Y-axis (Cartesian Grid) / Latitude of Southern |
567 |
C :: most face (Lat-Lon grid). |
C :: most face (Lat-Lon grid). |
568 |
C Ro_SeaLevel :: Origin of the vertical R-coords axis (often at sea-level) |
C rSphere :: Radius of sphere for a spherical polar grid ( m ). |
569 |
C :: corresponding to rF(k=1) |
C recip_rSphere :: Reciprocal radius of sphere ( m^-1 ). |
570 |
|
C radius_fromHorizGrid :: sphere Radius of input horiz. grid (Curvilinear Grid) |
571 |
|
C seaLev_Z :: the reference height of sea-level (usually zero) |
572 |
|
C top_Pres :: pressure (P-Coords) or reference pressure (Z-Coords) at the top |
573 |
C rSigmaBnd :: vertical position (in r-unit) of r/sigma transition (Hybrid-Sigma) |
C rSigmaBnd :: vertical position (in r-unit) of r/sigma transition (Hybrid-Sigma) |
574 |
C gravity :: Acceleration due to constant gravity ( m/s^2 ) |
C gravity :: Acceleration due to constant gravity ( m/s^2 ) |
575 |
C recip_gravity :: Reciprocal gravity acceleration ( s^2/m ) |
C recip_gravity :: Reciprocal gravity acceleration ( s^2/m ) |
587 |
C sRef :: reference vertical profile for salinity/specific humidity |
C sRef :: reference vertical profile for salinity/specific humidity |
588 |
C pRef4EOS :: reference pressure used in EOS (case selectP_inEOS_Zc=1) |
C pRef4EOS :: reference pressure used in EOS (case selectP_inEOS_Zc=1) |
589 |
C phiRef :: reference potential (press/rho, geopot) profile (m^2/s^2) |
C phiRef :: reference potential (press/rho, geopot) profile (m^2/s^2) |
|
C phi0Ref :: reference [pressure/geo] potential at origin r = rF(1) |
|
590 |
C dBdrRef :: vertical gradient of reference buoyancy [(m/s/r)^2]: |
C dBdrRef :: vertical gradient of reference buoyancy [(m/s/r)^2]: |
591 |
C :: z-coord: = N^2_ref = Brunt-Vaissala frequency [s^-2] |
C :: z-coord: = N^2_ref = Brunt-Vaissala frequency [s^-2] |
592 |
C :: p-coord: = -(d.alpha/dp)_ref [(m^2.s/kg)^2] |
C :: p-coord: = -(d.alpha/dp)_ref [(m^2.s/kg)^2] |
604 |
C :: from vertical r-coordinate unit to mass per unit area [kg/m2]. |
C :: from vertical r-coordinate unit to mass per unit area [kg/m2]. |
605 |
C :: z-coord: = rhoConst ( [m] * rho = [kg/m2] ) ; |
C :: z-coord: = rhoConst ( [m] * rho = [kg/m2] ) ; |
606 |
C :: p-coord: = 1/gravity ( [Pa] / g = [kg/m2] ) ; |
C :: p-coord: = 1/gravity ( [Pa] / g = [kg/m2] ) ; |
|
C rSphere :: Radius of sphere for a spherical polar grid ( m ). |
|
|
C recip_rSphere :: Reciprocal radius of sphere ( m^-1 ). |
|
|
C radius_fromHorizGrid :: sphere Radius of input horiz. grid (Curvilinear Grid) |
|
607 |
C f0 :: Reference coriolis parameter ( 1/s ) |
C f0 :: Reference coriolis parameter ( 1/s ) |
608 |
C ( Southern edge f for beta plane ) |
C ( Southern edge f for beta plane ) |
609 |
C beta :: df/dy ( s^-1.m^-1 ) |
C beta :: df/dy ( s^-1.m^-1 ) |
772 |
C psiEuler :: Euler angle, rotation about new z-axis |
C psiEuler :: Euler angle, rotation about new z-axis |
773 |
COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit, |
COMMON /PARM_R/ cg2dTargetResidual, cg2dTargetResWunit, |
774 |
& cg2dpcOffDFac, cg3dTargetResidual, |
& cg2dpcOffDFac, cg3dTargetResidual, |
775 |
& delR, delRc, xgOrigin, ygOrigin, Ro_SeaLevel, rSigmaBnd, |
& delR, delRc, xgOrigin, ygOrigin, rSphere, recip_rSphere, |
776 |
|
& radius_fromHorizGrid, seaLev_Z, top_Pres, rSigmaBnd, |
777 |
& deltaT, deltaTMom, dTtracerLev, deltaTFreeSurf, deltaTClock, |
& deltaT, deltaTMom, dTtracerLev, deltaTFreeSurf, deltaTClock, |
778 |
& abEps, alph_AB, beta_AB, |
& abEps, alph_AB, beta_AB, |
|
& rSphere, recip_rSphere, radius_fromHorizGrid, |
|
779 |
& f0, beta, fPrime, omega, rotationPeriod, |
& f0, beta, fPrime, omega, rotationPeriod, |
780 |
& viscFacAdj, viscAh, viscAhW, smag3D_coeff, |
& viscFacAdj, viscAh, viscAhW, smag3D_coeff, |
781 |
& viscAhMax, viscAhGrid, viscAhGridMax, viscAhGridMin, |
& viscAhMax, viscAhGrid, viscAhGridMax, viscAhGridMin, |
798 |
& gravFacC, recip_gravFacC, gravFacF, recip_gravFacF, |
& gravFacC, recip_gravFacC, gravFacF, recip_gravFacF, |
799 |
& rhoNil, rhoConst, recip_rhoConst, rho1Ref, |
& rhoNil, rhoConst, recip_rhoConst, rho1Ref, |
800 |
& rhoFacC, recip_rhoFacC, rhoFacF, recip_rhoFacF, rhoConstFresh, |
& rhoFacC, recip_rhoFacC, rhoFacF, recip_rhoFacF, rhoConstFresh, |
801 |
& thetaConst, tRef, sRef, pRef4EOS, phiRef, phi0Ref, dBdrRef, |
& thetaConst, tRef, sRef, pRef4EOS, phiRef, dBdrRef, |
802 |
& rVel2wUnit, wUnit2rVel, mass2rUnit, rUnit2mass, |
& rVel2wUnit, wUnit2rVel, mass2rUnit, rUnit2mass, |
803 |
& baseTime, startTime, endTime, |
& baseTime, startTime, endTime, |
804 |
& chkPtFreq, pChkPtFreq, dumpFreq, adjDumpFreq, |
& chkPtFreq, pChkPtFreq, dumpFreq, adjDumpFreq, |
823 |
_RL delRc(Nr+1) |
_RL delRc(Nr+1) |
824 |
_RL xgOrigin |
_RL xgOrigin |
825 |
_RL ygOrigin |
_RL ygOrigin |
826 |
_RL Ro_SeaLevel |
_RL rSphere |
827 |
|
_RL recip_rSphere |
828 |
|
_RL radius_fromHorizGrid |
829 |
|
_RL seaLev_Z |
830 |
|
_RL top_Pres |
831 |
_RL rSigmaBnd |
_RL rSigmaBnd |
832 |
_RL deltaT |
_RL deltaT |
833 |
_RL deltaTClock |
_RL deltaTClock |
835 |
_RL dTtracerLev(Nr) |
_RL dTtracerLev(Nr) |
836 |
_RL deltaTFreeSurf |
_RL deltaTFreeSurf |
837 |
_RL abEps, alph_AB, beta_AB |
_RL abEps, alph_AB, beta_AB |
|
_RL rSphere |
|
|
_RL recip_rSphere |
|
|
_RL radius_fromHorizGrid |
|
838 |
_RL f0 |
_RL f0 |
839 |
_RL beta |
_RL beta |
840 |
_RL fPrime |
_RL fPrime |
906 |
_RL sRef(Nr) |
_RL sRef(Nr) |
907 |
_RL pRef4EOS(Nr) |
_RL pRef4EOS(Nr) |
908 |
_RL phiRef(2*Nr+1) |
_RL phiRef(2*Nr+1) |
|
_RL phi0Ref |
|
909 |
_RL dBdrRef(Nr) |
_RL dBdrRef(Nr) |
910 |
_RL rVel2wUnit(Nr+1), wUnit2rVel(Nr+1) |
_RL rVel2wUnit(Nr+1), wUnit2rVel(Nr+1) |
911 |
_RL mass2rUnit, rUnit2mass |
_RL mass2rUnit, rUnit2mass |