/[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.5 by gforget, Fri Aug 6 18:37:05 2010 UTC revision 1.6 by gforget, Wed Aug 8 22:22:42 2012 UTC
# Line 33  C     GGL90TKEmin     - minimum kinetic Line 33  C     GGL90TKEmin     - minimum kinetic
33  C     GGL90TKEbottom  - bottom bounardy condition for kinetic energy  C     GGL90TKEbottom  - bottom bounardy condition for kinetic energy
34  C                      (default=GGL90TKEmin)  C                      (default=GGL90TKEmin)
35  C     GGL90TKEFile    - File with initial field of TKE  C     GGL90TKEFile    - File with initial field of TKE
36    C     GGL90mixingLengthMin - Mininum mixing length
37    C     mxlMaxFlag      - Flag for limiting mixing-length method (default=0)
38    C     mxlSurfFlag     - Flag to force mixing near ocean surface (default=.FALSE.)
39  C  C
40  C     GGL90dumpFreq   - analogue of dumpFreq (= default)  C     GGL90dumpFreq   - analogue of dumpFreq (= default)
41  C     GGL90taveFreq   - analogue of taveFreq (= default)  C     GGL90taveFreq   - analogue of taveFreq (= default)
# Line 84  c      _RL recip_hFacI(1-OLx:sNx+OLx,1-O Line 87  c      _RL recip_hFacI(1-OLx:sNx+OLx,1-O
87  c     &     ,recip_hFacI  c     &     ,recip_hFacI
88    
89        LOGICAL GGL90isOn, GGL90mixingMaps, GGL90writeState        LOGICAL GGL90isOn, GGL90mixingMaps, GGL90writeState
90          LOGICAL mxlSurfFlag
91        COMMON /GGL90_PARMS_L/        COMMON /GGL90_PARMS_L/
92       &     GGL90isOn, GGL90mixingMaps, GGL90writeState       &     GGL90isOn, GGL90mixingMaps, GGL90writeState,
93         &     mxlSurfFlag
94    
95  #ifdef ALLOW_GGL90_SMOOTH  #ifdef ALLOW_GGL90_SMOOTH
96        COMMON /GGL90_CORNER/ mskCor        COMMON /GGL90_CORNER/ mskCor
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22