Parent Directory | Revision Log | Revision Graph | Patch
revision 1.7 by cnh, Sun Feb 4 14:38:47 2001 UTC | revision 1.10 by adcroft, Tue May 29 14:01:37 2001 UTC | |
---|---|---|
# | Line 28 CEndOfInterface | Line 28 CEndOfInterface |
28 | ||
29 | C-- Set model variables to initial/restart conditions | C-- Set model variables to initial/restart conditions |
30 | IF ( startTime .EQ. 0. .AND. nIter0 .EQ. 0 ) THEN | IF ( startTime .EQ. 0. .AND. nIter0 .EQ. 0 ) THEN |
31 | CALL INI_UVEL( myThid ) | CALL INI_VEL( 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 ) | CALL INI_PSURF( myThid ) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |