/[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.35 by jmc, Sun Nov 23 01:28:05 2003 UTC revision 1.36 by jmc, Mon Dec 15 02:07:29 2003 UTC
# Line 144  C--   Do ptracer diagnostics. Line 144  C--   Do ptracer diagnostics.
144  #endif  #endif
145  cswdptr -- end add ---  cswdptr -- end add ---
146    
147    #ifdef COMPONENT_MODULE
148          IF ( useCoupler )
149         &  CALL CPL_WRITE_DIAGS( myTime, myIter, myThid )
150    #endif
151    
152        RETURN        RETURN
153        END        END
Legend:
Removed from v.1.35  
changed lines
  Added in v.1.36
  ViewVC Help
Powered by ViewVC 1.1.22