/[MITgcm]/MITgcm/pkg/ggl90/ggl90_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/ggl90/ggl90_readparms.F

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

revision 1.2 by mlosch, Mon Sep 27 08:02:04 2004 UTC revision 1.3 by mlosch, Tue Jun 6 16:18:18 2006 UTC
# Line 36  C--   GGL90 vertical mixing parameters Line 36  C--   GGL90 vertical mixing parameters
36       &     GGL90diffTKEh,       &     GGL90diffTKEh,
37       &     GGL90mixingMaps, GGL90writeState,       &     GGL90mixingMaps, GGL90writeState,
38       &     GGL90ck, GGL90ceps, GGL90alpha, GGL90m2,       &     GGL90ck, GGL90ceps, GGL90alpha, GGL90m2,
39       &     GGL90TKEmin, GGL90TKEbottom,       &     GGL90TKEmin, GGL90TKEsurfMin, GGL90TKEbottom,
40       &     GGL90mixingLengthMin, GGL90viscMax, GGL90diffMax,       &     GGL90mixingLengthMin, GGL90viscMax, GGL90diffMax,
41       &     GGL90TKEFile       &     GGL90TKEFile
42        _BEGIN_MASTER(myThid)        _BEGIN_MASTER(myThid)
# Line 59  C--   set default TKE vertical mixing pa Line 59  C--   set default TKE vertical mixing pa
59        GGL90ck              = 0.1 _d 0        GGL90ck              = 0.1 _d 0
60        GGL90ceps            = 0.7 _d 0        GGL90ceps            = 0.7 _d 0
61        GGL90alpha           = 1.0 _d 0        GGL90alpha           = 1.0 _d 0
62        GGL90m2              = 3.0 _d 0  C     Blanke and Delecluse (1993, JPO) use
63          GGL90m2              = 3.75 _d 0
64        GGL90TKEmin          = 1.0 _d -11        GGL90TKEmin          = 1.0 _d -11
65    C     Blanke and Delecluse (1993, JPO) use
66          GGL90TKEsurfMin      = 1.0 _d -04
67        GGL90TKEbottom       = UNSET_RL        GGL90TKEbottom       = UNSET_RL
68        GGL90viscMax         = 1.0 _d 0        GGL90viscMax         = 1.0 _d 0
69        GGL90diffMax         = 1.0 _d 1        GGL90diffMax         = 1.0 _d 1
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22