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

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

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

revision 1.16 by adcroft, Wed Jun 21 19:09:47 2000 UTC revision 1.17 by heimbach, Mon Sep 11 23:00:49 2000 UTC
# Line 79  C--   Do time averages Line 79  C--   Do time averages
79    
80  #ifdef ALLOW_GMREDI  #ifdef ALLOW_GMREDI
81  C--   Do KPP diagnostics.  C--   Do KPP diagnostics.
82        IF (use_GMRedi)        IF (useGMRedi)
83       & CALL GMREDI_DIAGS( myCurrentTime, myIter, myThid )       & CALL GMREDI_DIAGS( myCurrentTime, myIter, myThid )
84  #endif  #endif
85    
86  #ifdef ALLOW_KPP  #ifdef ALLOW_KPP
87  C--   Do KPP diagnostics.  C--   Do KPP diagnostics.
88        IF (use_KPPmixing)        IF (useKPP)
89       & CALL KPP_DO_DIAGS( myCurrentTime, myIter, myThid )       & CALL KPP_DO_DIAGS( myCurrentTime, myIter, myThid )
90  #endif  #endif
91    
Legend:
Removed from v.1.16  
changed lines
  Added in v.1.17
  ViewVC Help
Powered by ViewVC 1.1.22