/[MITgcm]/MITgcm/pkg/gmredi/GMREDI.h
ViewVC logotype

Diff of /MITgcm/pkg/gmredi/GMREDI.h

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

revision 1.26 by m_bates, Sat Sep 28 17:59:30 2013 UTC revision 1.27 by m_bates, Mon Oct 21 18:46:05 2013 UTC
# Line 23  C     GM_MDSIO         :: Line 23  C     GM_MDSIO         ::
23  C     GM_useK3D        :: use the 3 dimensional calculation for K  C     GM_useK3D        :: use the 3 dimensional calculation for K
24  C     GM_K3D_beta_eq_0 :: Ignores the beta term when calculating grad(q)  C     GM_K3D_beta_eq_0 :: Ignores the beta term when calculating grad(q)
25  C     GM_K3D_likeGM    :: Makes the PV closure similar to the GM closure (for debugging only!)  C     GM_K3D_likeGM    :: Makes the PV closure similar to the GM closure (for debugging only!)
26  C     GM_K3D_PVsheet   :: Use a PV sheet (should pretty much always be true)  C     GM_K3D_ThickSheet:: Use a thick PV sheet (should pretty much always be false)
27  C     GM_K3D_smooth    :: Expand PV closure in terms of baroclinic modes (for debugging only!)  C     GM_K3D_smooth    :: Expand PV closure in terms of baroclinic modes (for debugging only!)
28        LOGICAL GM_AdvForm        LOGICAL GM_AdvForm
29        LOGICAL GM_AdvSeparate        LOGICAL GM_AdvSeparate
# Line 35  C     GM_K3D_smooth    :: Expand PV clos Line 35  C     GM_K3D_smooth    :: Expand PV clos
35        LOGICAL GM_MDSIO        LOGICAL GM_MDSIO
36        LOGICAL GM_useK3D        LOGICAL GM_useK3D
37        LOGICAL GM_K3D_likeGM        LOGICAL GM_K3D_likeGM
38        LOGICAL GM_K3D_PVsheet        LOGICAL GM_K3D_ThickSheet
39        LOGICAL GM_K3D_beta_eq_0        LOGICAL GM_K3D_beta_eq_0
40        LOGICAL GM_K3D_smooth        LOGICAL GM_K3D_smooth
41        COMMON /GM_PARAMS_L/        COMMON /GM_PARAMS_L/
# Line 44  C     GM_K3D_smooth    :: Expand PV clos Line 44  C     GM_K3D_smooth    :: Expand PV clos
44       &                   GM_ExtraDiag, GM_MNC, GM_MDSIO,       &                   GM_ExtraDiag, GM_MNC, GM_MDSIO,
45       &                   GM_InMomAsStress,       &                   GM_InMomAsStress,
46       &                   GM_useK3D, GM_K3D_likeGM, GM_K3D_smooth,       &                   GM_useK3D, GM_K3D_likeGM, GM_K3D_smooth,
47       &                   GM_K3D_beta_eq_0, GM_K3D_PVsheet       &                   GM_K3D_beta_eq_0, GM_K3D_ThickSheet
48    
49  C--   GM/Redi Integer-type parameters  C--   GM/Redi Integer-type parameters
50  C     GM_BVP_modeNumber :: vertical mode number used for speed "c" in BVP transport  C     GM_BVP_modeNumber :: vertical mode number used for speed "c" in BVP transport
# Line 91  C     subMeso_LfMin  :: minimum value fo Line 91  C     subMeso_LfMin  :: minimum value fo
91  C     subMeso_Lmax   :: maximum horizontal grid-scale length [m]  C     subMeso_Lmax   :: maximum horizontal grid-scale length [m]
92  C     Variable K with PV diffusion parameters:  C     Variable K with PV diffusion parameters:
93  C     GM_K3D_gamma   :: mixing efficiency for 3D eddy diffusivity [-]  C     GM_K3D_gamma   :: mixing efficiency for 3D eddy diffusivity [-]
94    C     GM_K3D_b1      :: an empirically determined constant of O(1)
95  C     GM_K3D_EadyMinDepth :: upper depth for Eady calculation  C     GM_K3D_EadyMinDepth :: upper depth for Eady calculation
96  C     GM_K3D_EadyMaxDepth :: lower depth for Eady calculation  C     GM_K3D_EadyMaxDepth :: lower depth for Eady calculation
97  C     GM_maxK3D      :: Upper bound on the diffusivity  C     GM_maxK3D      :: Upper bound on the diffusivity
98  C     GM_K3D_constK  :: Constant diffusivity to use when GM_useK3D=.TRUE. and GM_K3D_likeGM=.TRUE.  C     GM_K3D_constK  :: Constant diffusivity to use when GM_useK3D=.TRUE. and GM_K3D_likeGM=.TRUE.
99  C     GM_K3D_maxLurms:: Upper bound on th length scale used for calculating urms  C     GM_K3D_Rmax    :: Upper bound on the length scale used for calculating urms
100  C     GM_K3D_minLurms:: Lower bound on th length scale used for calculating urms  C     GM_K3D_Rmin    :: Lower bound on the length scale used for calculating the eddy radius
101  C     GM_K3D_minCori :: minimum value for f (to stop things blowing up near the equator)  C     GM_K3D_minCori :: minimum value for f (to stop things blowing up near the equator)
102  C     GM_K3D_minN2   :: minimum value for the square of the buoyancy frequency  C     GM_K3D_minN2   :: minimum value for the square of the buoyancy frequency
103  C     GM_K3D_surfMinDepth :: minimum value for the depth of the surface layer  C     GM_K3D_surfMinDepth :: minimum value for the depth of the surface layer
# Line 116  C     GM_K3D_vecFreq :: Frequency at whi Line 117  C     GM_K3D_vecFreq :: Frequency at whi
117        _RL GM_Visbeck_minVal_K        _RL GM_Visbeck_minVal_K
118        _RL GM_Visbeck_maxVal_K        _RL GM_Visbeck_maxVal_K
119        _RL GM_K3D_gamma        _RL GM_K3D_gamma
120          _RL GM_K3D_b1
121        _RL GM_K3D_EadyMinDepth        _RL GM_K3D_EadyMinDepth
122        _RL GM_K3D_EadyMaxDepth        _RL GM_K3D_EadyMaxDepth
123        _RL GM_K3D_Lambda        _RL GM_K3D_Lambda
124        _RL GM_K3D_smallK        _RL GM_K3D_smallK
       _RL GM_K3D_maxSlope  
125        _RL GM_K3D_maxC        _RL GM_K3D_maxC
126        _RL GM_maxK3D        _RL GM_maxK3D
127        _RL GM_K3D_constK        _RL GM_K3D_constK
128        _RL GM_K3D_maxLurms        _RL GM_K3D_Rmax
129        _RL GM_K3D_minLurms        _RL GM_K3D_Rmin
130        _RL GM_K3D_minCori        _RL GM_K3D_minCori
131        _RL GM_K3D_minN2        _RL GM_K3D_minN2
132        _RL GM_K3D_surfMinDepth        _RL GM_K3D_surfMinDepth
# Line 149  C     GM_K3D_vecFreq :: Frequency at whi Line 150  C     GM_K3D_vecFreq :: Frequency at whi
150       &                   GM_Visbeck_depth,       &                   GM_Visbeck_depth,
151       &                   GM_Visbeck_minDepth, GM_Visbeck_maxSlope,       &                   GM_Visbeck_minDepth, GM_Visbeck_maxSlope,
152       &                   GM_Visbeck_minVal_K, GM_Visbeck_maxVal_K,       &                   GM_Visbeck_minVal_K, GM_Visbeck_maxVal_K,
153       &                   GM_K3D_gamma, GM_K3D_EadyMinDepth,       &                   GM_K3D_gamma, GM_K3D_b1, GM_K3D_EadyMinDepth,
154       &                   GM_K3D_EadyMaxDepth, GM_K3D_Lambda,       &                   GM_K3D_EadyMaxDepth, GM_K3D_Lambda,
155       &                   GM_K3D_smallK, GM_K3D_maxSlope, GM_K3D_maxC,       &                   GM_K3D_smallK, GM_K3D_maxC,
156       &                   GM_maxK3D, GM_K3D_minCori, GM_K3D_minN2,       &                   GM_maxK3D, GM_K3D_minCori, GM_K3D_minN2,
157       &                   GM_K3D_surfMinDepth, GM_K3D_maxLurms,       &                   GM_K3D_surfMinDepth, GM_K3D_Rmax, GM_K3D_Rmin,
158       &                   GM_K3D_constK, GM_K3D_vecFreq, GM_K3D_minLurms,       &                   GM_K3D_constK, GM_K3D_vecFreq,
159       &                   GM_facTrL2dz, GM_facTrL2ML, GM_maxTransLay,       &                   GM_facTrL2dz, GM_facTrL2ML, GM_maxTransLay,
160       &                   GM_Scrit, GM_Sd, GM_BVP_cMin,       &                   GM_Scrit, GM_Sd, GM_BVP_cMin,
161       &                   subMeso_Ceff, subMeso_invTau, subMeso_LfMin       &                   subMeso_Ceff, subMeso_invTau, subMeso_LfMin

Legend:
Removed from v.1.26  
changed lines
  Added in v.1.27

  ViewVC Help
Powered by ViewVC 1.1.22