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

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

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

revision 1.5 by heimbach, Thu Nov 8 20:57:51 2001 UTC revision 1.6 by jmc, Sat Feb 9 23:38:55 2002 UTC
# Line 46  C     hFac_surfC ::  New thickness facto Line 46  C     hFac_surfC ::  New thickness facto
46  C                        center (Tracer point)  C                        center (Tracer point)
47  C     hFac_surfW ::  idem, West  interface (U point)  C     hFac_surfW ::  idem, West  interface (U point)
48  C     hFac_surfS ::  idem, South interface (V point)  C     hFac_surfS ::  idem, South interface (V point)
49    C     PmEpR :: keep the fresh water input (=-EmPmR) of the previous time step
50        COMMON /SURF_CHANGE/        COMMON /SURF_CHANGE/
51       &     hFac_surfC, hFac_surfW, hFac_surfS       &     hFac_surfC, hFac_surfW, hFac_surfS,
52         &     PmEpR
53        _RS  hFac_surfC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS  hFac_surfC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
54        _RS  hFac_surfW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS  hFac_surfW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
55        _RS  hFac_surfS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RS  hFac_surfS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
56          _RS  PmEpR(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
57    
58  #endif /* NONLIN_FRSURF */  #endif /* NONLIN_FRSURF */
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22