/[MITgcm]/MITgcm/pkg/gmredi/gmredi_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/gmredi/gmredi_readparms.F

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

revision 1.7 by heimbach, Thu Nov 14 22:43:49 2002 UTC revision 1.8 by jmc, Mon Jan 13 19:02:45 2003 UTC
# Line 26  C     === Routine arguments === Line 26  C     === Routine arguments ===
26  #ifdef ALLOW_GMREDI  #ifdef ALLOW_GMREDI
27    
28  C--   GM/Redi parameter  C--   GM/Redi parameter
29    C     GM_Small_Number :: epsilon used in computing the slope
30    C     GM_slopeSqCutoff :: slope^2 cut-off value
31        NAMELIST /GM_PARM01/        NAMELIST /GM_PARM01/
32       &          GM_AdvForm, GM_AdvSeparate,       &          GM_AdvForm, GM_AdvSeparate,
33       &          GM_isopycK,       &          GM_isopycK,
# Line 33  C--   GM/Redi parameter Line 35  C--   GM/Redi parameter
35       &          GM_taper_scheme,       &          GM_taper_scheme,
36       &          GM_maxSlope,       &          GM_maxSlope,
37       &          GM_Kmin_horiz,       &          GM_Kmin_horiz,
38         &          GM_Small_Number, GM_slopeSqCutoff,
39       &          GM_Visbeck_alpha,       &          GM_Visbeck_alpha,
40       &          GM_Visbeck_length,       &          GM_Visbeck_length,
41       &          GM_Visbeck_depth,       &          GM_Visbeck_depth,
# Line 72  C--   Default values GM/Redi Line 75  C--   Default values GM/Redi
75        GM_background_K     = 0.        GM_background_K     = 0.
76        GM_maxslope         = 1.0D-2        GM_maxslope         = 1.0D-2
77        GM_Kmin_horiz       = 0.        GM_Kmin_horiz       = 0.
78          GM_Small_Number     = 1. _d -12
79          GM_slopeSqCutoff   = 1. _d +48
80        GM_taper_scheme     = ' '        GM_taper_scheme     = ' '
81        GM_Scrit            = 0.004        GM_Scrit            = 0.004
82        GM_Sd               = 0.001        GM_Sd               = 0.001
Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22