Parent Directory | Revision Log | Revision Graph | Patch
revision 1.8 by jmc, Mon Mar 12 20:41:02 2001 UTC | revision 1.9 by heimbach, Sun Mar 25 22:33:52 2001 UTC | |
---|---|---|
# | Line 30 C-- Set model variables to initial/res | Line 30 C-- Set model variables to initial/res |
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_UVEL( myThid ) |
32 | CALL INI_VVEL( myThid ) | CALL INI_VVEL( myThid ) |
33 | CALL INI_WVEL( myThid ) | |
34 | CALL INI_THETA( myThid ) | CALL INI_THETA( myThid ) |
35 | CALL INI_SALT( myThid ) | CALL INI_SALT( myThid ) |
36 | CALL INI_PSURF( myThid ) | CALL INI_PSURF( myThid ) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |