Parent Directory | Revision Log | Revision Graph | Patch
revision 1.31 by jmc, Fri Jan 8 19:44:05 2010 UTC | revision 1.32 by jmc, Wed Jan 13 01:42:48 2010 UTC | |
---|---|---|
# | Line 136 C---+----1----+----2----+----3----+----4 | Line 136 C---+----1----+----2----+----3----+----4 |
136 | C- wait for everyone before setting arrays to zero: | C- wait for everyone before setting arrays to zero: |
137 | _BARRIER | _BARRIER |
138 | ENDIF | ENDIF |
139 | IF ( modelEnd ) THEN | |
140 | C Close all Stat-diags output files | |
141 | CALL DIAGSTATS_CLOSE_IO( myThid ) | |
142 | ENDIF | |
143 | ||
144 | C-- Clear storage space: | C-- Clear storage space: |
145 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |