/[MITgcm]/MITgcm/pkg/ggl90/GGL90.h
ViewVC logotype

Diff of /MITgcm/pkg/ggl90/GGL90.h

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

revision 1.4 by dfer, Fri Jan 30 02:23:56 2009 UTC revision 1.5 by gforget, Fri Aug 6 18:37:05 2010 UTC
# Line 74  CEOP Line 74  CEOP
74       &     GGL90viscMax, GGL90diffMax,       &     GGL90viscMax, GGL90diffMax,
75       &     GGL90dumpFreq, GGL90taveFreq, mxlMaxFlag       &     GGL90dumpFreq, GGL90taveFreq, mxlMaxFlag
76    
77        _RL GGL90TKE   (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL GGL90TKE    (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
78        _RL GGL90viscAr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL GGL90viscArU(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
79        _RL GGL90diffKr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)        _RL GGL90viscArV(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
80          _RL GGL90diffKr (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
81  c      _RL recip_hFacI(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)  c      _RL recip_hFacI(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)
82        COMMON /GGL90_FIELDS/ GGL90TKE,        COMMON /GGL90_FIELDS/ GGL90TKE,
83       &     GGL90viscAr, GGL90diffKr       &     GGL90viscArU, GGL90viscArV, GGL90diffKr
84  c     &     ,recip_hFacI  c     &     ,recip_hFacI
85    
86        LOGICAL GGL90isOn, GGL90mixingMaps, GGL90writeState        LOGICAL GGL90isOn, GGL90mixingMaps, GGL90writeState
# Line 87  c     &     ,recip_hFacI Line 88  c     &     ,recip_hFacI
88       &     GGL90isOn, GGL90mixingMaps, GGL90writeState       &     GGL90isOn, GGL90mixingMaps, GGL90writeState
89    
90  #ifdef ALLOW_GGL90_SMOOTH  #ifdef ALLOW_GGL90_SMOOTH
91        COMMON /GGL90_CORNER/ mskCor, GGL90diffKrS        COMMON /GGL90_CORNER/ mskCor
92        _RL mskCor(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)        _RL mskCor(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
       _RL GGL90diffKrS(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy)  
93  #endif  #endif
94    
95  #endif /* ALLOW_GGL90 */  #endif /* ALLOW_GGL90 */
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22