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

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

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

revision 1.20 by jmc, Wed Apr 6 18:29:53 2005 UTC revision 1.21 by jmc, Fri Mar 17 04:24:34 2006 UTC
# Line 38  C     Set model variables to initial/res Line 38  C     Set model variables to initial/res
38          CALL INI_EP( myThid )          CALL INI_EP( myThid )
39  #endif  #endif
40          IF (nonHydrostatic) CALL INI_PNH( myThid )          IF (nonHydrostatic) CALL INI_PNH( myThid )
41        ELSE        ELSEIF ( .NOT.useOffLine ) THEN
42  c       IF ( nIter0 .EQ. 0 ) THEN  c       IF ( nIter0 .EQ. 0 ) THEN
43  c         nIter0 = INT(startTime/deltaTClock )  c         nIter0 = INT(startTime/deltaTClock )
44  c       ENDIF  c       ENDIF
Legend:
Removed from v.1.20  
changed lines
  Added in v.1.21
  ViewVC Help
Powered by ViewVC 1.1.22