388 |
C metric terms). |
C metric terms). |
389 |
C rC :: R-coordinate of center of cell f[Z] (units of r). |
C rC :: R-coordinate of center of cell f[Z] (units of r). |
390 |
C rF :: R-coordinate of face of cell f[Z] (units of r). |
C rF :: R-coordinate of face of cell f[Z] (units of r). |
391 |
|
C - *HybSigm* - :: Hybrid-Sigma vert. Coord coefficients |
392 |
|
C aHybSigmF at level-interface (*HybSigmF) and level-center (*HybSigmC) |
393 |
|
C aHybSigmC aHybSigm* = constant r part, bHybSigm* = sigma part, such as |
394 |
|
C bHybSigmF r(ij,k,t) = rLow(ij) + aHybSigm(k)*[rF(1)-rF(Nr+1)] |
395 |
|
C bHybSigmC + bHybSigm(k)*[eta(ij,t)+Ro_surf(ij) - rLow(ij)] |
396 |
|
C dAHybSigF :: vertical increment of Hybrid-Sigma coefficient: constant r part, |
397 |
|
C dAHybSigC between interface (dAHybSigF) and between center (dAHybSigC) |
398 |
|
C dBHybSigF :: vertical increment of Hybrid-Sigma coefficient: sigma part, |
399 |
|
C dBHybSigC between interface (dBHybSigF) and between center (dBHybSigC) |
400 |
C tanPhiAtU :: tan of the latitude at U point. Used for spherical polar |
C tanPhiAtU :: tan of the latitude at U point. Used for spherical polar |
401 |
C metric term in U equation. |
C metric term in U equation. |
402 |
C tanPhiAtV :: tan of the latitude at V point. Used for spherical polar |
C tanPhiAtV :: tan of the latitude at V point. Used for spherical polar |
423 |
& maskC, maskW, maskS, |
& maskC, maskW, maskS, |
424 |
& recip_rA,recip_rAw,recip_rAs,recip_rAz, |
& recip_rA,recip_rAw,recip_rAs,recip_rAz, |
425 |
& drC, drF, recip_drC, recip_drF, rC, rF, |
& drC, drF, recip_drC, recip_drF, rC, rF, |
426 |
|
& aHybSigmF, bHybSigmF, aHybSigmC, bHybSigmC, |
427 |
|
& dAHybSigF, dBHybSigF, dBHybSigC, dAHybSigC, |
428 |
& tanPhiAtU, tanPhiAtV, angleCosC, angleSinC, |
& tanPhiAtU, tanPhiAtV, angleCosC, angleSinC, |
429 |
& fCori, fCoriG, fCoriCos |
& fCori, fCoriG, fCoriCos |
430 |
c & , maskH |
c & , maskH |
482 |
_RS recip_drF (Nr) |
_RS recip_drF (Nr) |
483 |
_RS rC (Nr) |
_RS rC (Nr) |
484 |
_RS rF (Nr+1) |
_RS rF (Nr+1) |
485 |
|
_RS aHybSigmF (Nr+1) |
486 |
|
_RS bHybSigmF (Nr+1) |
487 |
|
_RS aHybSigmC (Nr) |
488 |
|
_RS bHybSigmC (Nr) |
489 |
|
_RS dAHybSigF (Nr) |
490 |
|
_RS dBHybSigF (Nr) |
491 |
|
_RS dBHybSigC (Nr+1) |
492 |
|
_RS dAHybSigC (Nr+1) |
493 |
_RS tanPhiAtU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS tanPhiAtU (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
494 |
_RS tanPhiAtV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS tanPhiAtV (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
495 |
_RS angleCosC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
_RS angleCosC (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |