/[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.8 by adcroft, Thu Aug 26 17:47:37 1999 UTC revision 1.9 by adcroft, Wed Mar 15 16:00:48 2000 UTC
# Line 71  C      Write to files Line 71  C      Write to files
71         _BEGIN_MASTER( myThid )         _BEGIN_MASTER( myThid )
72    
73  C--     Set IO "context" for writing state  C--     Set IO "context" for writing state
74    #ifdef USE_DFILE
75          CALL DFILE_SET_RW          CALL DFILE_SET_RW
76          CALL DFILE_SET_CONT_ON_ERROR          CALL DFILE_SET_CONT_ON_ERROR
77    #endif
78  C--     Read IO error counter  C--     Read IO error counter
79          beginIOErrCount = IO_ERRCOUNT(myThid)          beginIOErrCount = IO_ERRCOUNT(myThid)
80          prevPrec = writeBinaryPrec          prevPrec = writeBinaryPrec
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.9
  ViewVC Help
Powered by ViewVC 1.1.22