/[MITgcm]/MITgcm_contrib/submesoscale/code/calc_oce_mxlayer.F
ViewVC logotype

Diff of /MITgcm_contrib/submesoscale/code/calc_oce_mxlayer.F

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

revision 1.1 by dimitri, Fri May 30 23:16:24 2008 UTC revision 1.2 by dimitri, Fri May 30 23:18:08 2008 UTC
# Line 67  CEOP Line 67  CEOP
67        calcMixLayerDepth = .FALSE.        calcMixLayerDepth = .FALSE.
68  #ifdef ALLOW_GMREDI  #ifdef ALLOW_GMREDI
69        IF ( useGMRedi ) calcMixLayerDepth = GM_taper_scheme.EQ.'fm07'        IF ( useGMRedi ) calcMixLayerDepth = GM_taper_scheme.EQ.'fm07'
70          IF ( useGMRedi .AND. GM_SM_Ce.GT.0.0 ) calcMixLayerDepth = .TRUE.
71  #endif  #endif
72  #ifdef ALLOW_DIAGNOSTICS  #ifdef ALLOW_DIAGNOSTICS
73        IF ( useDiagnostics.AND. .NOT.calcMixLayerDepth ) THEN        IF ( useDiagnostics.AND. .NOT.calcMixLayerDepth ) THEN
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22