Parent Directory | Revision Log | Revision Graph | Patch
revision 1.4 by jmc, Tue Aug 12 22:26:39 2008 UTC | revision 1.5 by dfer, Wed Oct 29 22:28:51 2008 UTC | |
---|---|---|
# | Line 65 CEOP | Line 65 CEOP |
65 | ||
66 | calcMixLayerDepth = .FALSE. | calcMixLayerDepth = .FALSE. |
67 | #ifdef ALLOW_GMREDI | #ifdef ALLOW_GMREDI |
68 | IF ( useGMRedi ) calcMixLayerDepth = GM_taper_scheme.EQ.'fm07' | IF ( useGMRedi ) THEN |
69 | IF ( .NOT.useKPP ) calcMixLayerDepth = GM_taper_scheme.EQ.'fm07' | |
70 | ENDIF | |
71 | #endif | #endif |
72 | #ifdef ALLOW_DIAGNOSTICS | #ifdef ALLOW_DIAGNOSTICS |
73 | IF ( useDiagnostics.AND. .NOT.calcMixLayerDepth ) THEN | IF ( useDiagnostics.AND. .NOT.calcMixLayerDepth ) THEN |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |