/[MITgcm]/MITgcm/model/inc/GRID.h
ViewVC logotype

Diff of /MITgcm/model/inc/GRID.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.40 by jmc, Sun Jan 31 17:32:10 2010 UTC revision 1.41 by jmc, Sat Sep 11 21:23:09 2010 UTC
# Line 388  C                      orthogonal coordi Line 388  C                      orthogonal coordi
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
# Line 414  C     fCoriCos  :: Coriolis Cos(phi) par Line 423  C     fCoriCos  :: Coriolis Cos(phi) par
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
# Line 471  c     _RS maskH          (1-OLx:sNx+OLx, Line 482  c     _RS maskH          (1-OLx:sNx+OLx,
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)

Legend:
Removed from v.1.40  
changed lines
  Added in v.1.41

  ViewVC Help
Powered by ViewVC 1.1.22