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

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

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

revision 1.110 by mlosch, Sun Nov 28 23:49:03 2004 UTC revision 1.111 by jmc, Mon Dec 20 01:55:37 2004 UTC
# Line 129  c************************************** Line 129  c**************************************
129  c**************************************  c**************************************
130  #endif  #endif
131    
132    C--   Switch on/off diagnostics for snap-shot output:
133    #ifdef ALLOW_DIAGNOSTICS
134          IF ( useDiagnostics ) THEN
135            CALL DIAGNOSTICS_SWITCH_ONOFF( myIter, myThid )
136          ENDIF
137    #endif
138    
139  C--   Call external forcing package  C--   Call external forcing package
140  #ifdef ALLOW_BULK_FORCE  #ifdef ALLOW_BULK_FORCE
141        IF ( useBulkForce ) THEN        IF ( useBulkForce ) THEN
Legend:
Removed from v.1.110  
changed lines
  Added in v.1.111
  ViewVC Help
Powered by ViewVC 1.1.22