Parent Directory | Revision Log | Revision Graph | Patch
revision 1.8 by jmc, Mon Aug 6 16:54:40 2012 UTC | revision 1.9 by jmc, Tue Aug 20 20:22:35 2013 UTC | |
---|---|---|
# | Line 85 C- write a pickup for each package wh | Line 85 C- write a pickup for each package wh |
85 | I permPickup, myTime, myIter, myThid ) | I permPickup, myTime, myIter, myThid ) |
86 | ||
87 | C- write main model pickup | C- write main model pickup |
88 | IF ( .NOT.useOffLine ) THEN | IF ( .NOT.useOffLine .OR. nonlinFreeSurf.GT.0 ) THEN |
89 | CALL WRITE_PICKUP( | CALL WRITE_PICKUP( |
90 | I permPickup, myTime, myIter, myThid ) | I permPickup, myTime, myIter, myThid ) |
91 | ENDIF | ENDIF |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |