/[MITgcm]/MITgcm/model/src/convective_adjustment.F
ViewVC logotype

Diff of /MITgcm/model/src/convective_adjustment.F

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

revision 1.12 by heimbach, Sun Mar 24 02:08:21 2002 UTC revision 1.13 by heimbach, Thu May 30 22:48:33 2002 UTC
# Line 88  C-      Initialisation of Convection Cou Line 88  C-      Initialisation of Convection Cou
88  #endif /* ALLOW_AUTODIFF_TAMC */  #endif /* ALLOW_AUTODIFF_TAMC */
89    
90  #ifdef  ALLOW_KPP  #ifdef  ALLOW_KPP
91    C--       CONVECT not needed with KPP mixing
92          IF (          IF (
93       &      (.NOT.useKPP) ! CONVECT not needed with KPP mixing       &      (.NOT.useKPP)
94       &     ) THEN       &     ) THEN
95  #endif  /* ALLOW_KPP */  #endif  /* ALLOW_KPP */
96    
Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13
  ViewVC Help
Powered by ViewVC 1.1.22