/[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.30 by stephd, Wed Jun 25 21:06:35 2003 UTC revision 1.31 by heimbach, Fri Jun 27 01:51:10 2003 UTC
# Line 154  C--   Do seaice diagnostics. Line 154  C--   Do seaice diagnostics.
154  cswdice -- end add ---  cswdice -- end add ---
155    
156  cswdptr ---  add ---  cswdptr ---  add ---
157  #ifdef ALLOW_PTRACERS  #ifdef ALLOW_GCHEM
158  C--   Do ptracer diagnostics.  C--   Do ptracer diagnostics.
159        IF (usePTRACERS)        IF (usePTRACERS)
160       & CALL GCHEM_DIAGS( myCurrentTime, myIter, myThid )       & CALL GCHEM_DIAGS( myCurrentTime, myIter, myThid )
Legend:
Removed from v.1.30  
changed lines
  Added in v.1.31
  ViewVC Help
Powered by ViewVC 1.1.22