/[MITgcm]/MITgcm/pkg/kpp/kpp_readparms.F
ViewVC logotype

Diff of /MITgcm/pkg/kpp/kpp_readparms.F

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

revision 1.10 by edhill, Sun Oct 10 06:08:49 2004 UTC revision 1.11 by jmc, Thu Oct 14 20:29:21 2004 UTC
# Line 67  C--   set default KPP vertical mixing pa Line 67  C--   set default KPP vertical mixing pa
67        kpp_taveFreq  = taveFreq        kpp_taveFreq  = taveFreq
68        KPPmixingMaps = .FALSE.        KPPmixingMaps = .FALSE.
69        KPPwriteState = .FALSE.        KPPwriteState = .FALSE.
70        minKPPhbl     = drF(1)*0.5        IF ( setCenterDr ) THEN
71            minKPPhbl   = delRc(1)
72          ELSE
73            minKPPhbl   = delR(1)*0.5
74          ENDIF
75    
76  C-----------------------------------------------------------------------  C-----------------------------------------------------------------------
77  C define some non-dimensional constants and  C define some non-dimensional constants and
Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11
  ViewVC Help
Powered by ViewVC 1.1.22