/[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.39 by molod, Thu Feb 26 02:25:01 2004 UTC revision 1.40 by dimitri, Tue Mar 2 08:45:46 2004 UTC
# Line 127  C--   Do SBO diagnostics. Line 127  C--   Do SBO diagnostics.
127        ENDIF        ENDIF
128  #endif  #endif
129    
130    #ifdef  ALLOW_SEAICE
131            IF ( useSEAICE ) THEN
132               CALL SEAICE_DO_DIAGS( myTime, myIter, myThid )
133            ENDIF
134    #endif  /* ALLOW_SEAICE */
135    
136  #ifdef ALLOW_BULK_FORCE  #ifdef ALLOW_BULK_FORCE
137  C--   Do bulkf diagnostics.  C--   Do bulkf diagnostics.
138        IF (useBulkForce .AND. myIter.NE.nIter0 )        IF (useBulkForce .AND. myIter.NE.nIter0 )
Legend:
Removed from v.1.39  
changed lines
  Added in v.1.40
  ViewVC Help
Powered by ViewVC 1.1.22