Parent Directory | Revision Log | Revision Graph | Patch
revision 1.5 by adcroft, Wed Dec 9 16:11:52 1998 UTC | revision 1.6 by adcroft, Wed Apr 5 17:52:37 2000 UTC | |
---|---|---|
# | Line 31 C-- Set model variables to initial/res | Line 31 C-- Set model variables to initial/res |
31 | CALL INI_VVEL( myThid ) | CALL INI_VVEL( myThid ) |
32 | CALL INI_THETA( myThid ) | CALL INI_THETA( myThid ) |
33 | CALL INI_SALT( myThid ) | CALL INI_SALT( myThid ) |
34 | CALL INI_PSURF( myThid ) | |
35 | ELSE | ELSE |
36 | IF ( nIter0 .EQ. 0 ) THEN | IF ( nIter0 .EQ. 0 ) THEN |
37 | nIter0 = INT(startTime/deltaTClock ) | nIter0 = INT(startTime/deltaTClock ) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |