Parent Directory
|
Revision Log
|
Revision Graph
|
Patch
revision 1.13 by jahn, Wed Dec 4 21:21:33 2013 UTC | revision 1.14 by jahn, Fri Dec 27 17:29:00 2013 UTC | |
---|---|---|
# | Line 481 c ANNA end TAVE | Line 481 c ANNA end TAVE |
481 | #endif | #endif |
482 | c CALL TIMEAVE_RESET(SURave, 1, bi, bj, myThid) | c CALL TIMEAVE_RESET(SURave, 1, bi, bj, myThid) |
483 | ||
484 | do k=1,Nr | DAR_timeAve(bi,bj)=0. _d 0 |
DAR_TimeAve(bi,bj,k)=0. _d 0 | ||
enddo | ||
485 | ENDDO | ENDDO |
486 | ENDDO | ENDDO |
487 | #endif /* ALLOW_TIMEAVE */ | #endif /* ALLOW_TIMEAVE */ |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |