/[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.2 by adcroft, Tue May 29 14:01:36 2001 UTC revision 1.3 by jmc, Mon Aug 27 18:41:44 2001 UTC
# Line 18  C     recip_Bo     = 1/Bo_surf Line 18  C     recip_Bo     = 1/Bo_surf
18        _RL  recip_Bo(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL  recip_Bo(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
19    
20  C--   COMMON /SURF_INDEX/ Common block for surface related index  C--   COMMON /SURF_INDEX/ Common block for surface related index
21  C     k_surf - vertical index of the surface tracer cell  C     ksurfC - vertical index of the surface tracer cell
22        COMMON /SURF_INDEX/ k_surf  C     ksurfW - vertical index of the surface U point
23        INTEGER k_surf(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)  C     ksurfS - vertical index of the surface V point
24    C IMPORTANT:  ksurfC,W,S = Nr+1  where the fluid column is empty (continent)
25          COMMON /SURF_INDEX/ ksurfC, ksurfW, ksurfS
26          INTEGER ksurfC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
27          INTEGER ksurfW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
28          INTEGER ksurfS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
29    
30    #ifdef NONLIN_FRSURF
31    C--   COMMON /SURF_CHANGE/ transient varariable used for Non-Lin Free-Surf
32    C     hFac_surfC - New thickness factor of the surface level
33    C                        center (Tracer point)
34    C     hFac_surfW - idem, West  interface (U point)
35    C     hFac_surfS - idem, South interface (V point)
36          COMMON /SURF_CHANGE/
37         &     hFac_surfC, hFac_surfW, hFac_surfS
38          _RS  hFac_surfC(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
39          _RS  hFac_surfW(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
40          _RS  hFac_surfS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
41    #endif /* NONLIN_FRSURF */
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22