/[MITgcm]/MITgcm/diags/src/write_time_averages.F
ViewVC logotype

Diff of /MITgcm/diags/src/write_time_averages.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.6 by adcroft, Mon May 24 15:15:10 1999 UTC revision 1.7 by adcroft, Fri Jul 30 15:42:55 1999 UTC
# Line 25  C     myIter - Iteration number Line 25  C     myIter - Iteration number
25  C     myCurrentTime - Current time of simulation ( s )  C     myCurrentTime - Current time of simulation ( s )
26        INTEGER myThid        INTEGER myThid
27        INTEGER myIter        INTEGER myIter
28        REAL    myCurrentTime        _RL     myCurrentTime
29        INTEGER prevPrec        INTEGER prevPrec
30    
31  C     == Local variables ==  C     == Local variables ==
32  C     suff - Hold suffix part of a filename  C     suff - Hold suffix part of a filename
33  C     TimeAve - total time over average  C     TimeAve - total time over average
34        CHARACTER*(MAX_LEN_FNAM) suff        CHARACTER*(MAX_LEN_FNAM) suff
35        REAL DDTT        _RL DDTT
36        INTEGER bi,bj,k        INTEGER bi,bj,k
37        INTEGER beginIOErrCount        INTEGER beginIOErrCount
38        INTEGER endIOErrCount        INTEGER endIOErrCount
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7
  ViewVC Help
Powered by ViewVC 1.1.22