/[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.10 by adcroft, Tue May 29 14:01:37 2001 UTC revision 1.11 by adcroft, Fri Jun 29 17:14:49 2001 UTC
# Line 32  C--   Set model variables to initial/res Line 32  C--   Set model variables to initial/res
32         CALL INI_THETA( myThid )         CALL INI_THETA( myThid )
33         CALL INI_SALT( myThid )         CALL INI_SALT( myThid )
34         CALL INI_PSURF( myThid )         CALL INI_PSURF( myThid )
35           IF (nonHydrostatic) CALL INI_PNH( myThid )
36        ELSE        ELSE
37         IF ( nIter0 .EQ. 0 ) THEN         IF ( nIter0 .EQ. 0 ) THEN
38          nIter0 = INT(startTime/deltaTClock )          nIter0 = INT(startTime/deltaTClock )

Legend:
Removed from v.1.10  
changed lines
  Added in v.1.11

  ViewVC Help
Powered by ViewVC 1.1.22