/[MITgcm]/MITgcm/pkg/offline/offline_state.F
ViewVC logotype

Diff of /MITgcm/pkg/offline/offline_state.F

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

revision 1.3 by jmc, Wed Apr 27 14:10:06 2005 UTC revision 1.4 by jmc, Sun May 15 03:04:57 2005 UTC
# Line 25  C     == Global variables === Line 25  C     == Global variables ===
25  #include "DYNVARS.h"  #include "DYNVARS.h"
26  #include "GRID.h"  #include "GRID.h"
27  #include "EOS.h"  #include "EOS.h"
28        LOGICAL  DIFF_BASE_MULTIPLE        LOGICAL  DIFFERENT_MULTIPLE
29        EXTERNAL DIFF_BASE_MULTIPLE        EXTERNAL DIFFERENT_MULTIPLE
30        INTEGER  IO_ERRCOUNT        INTEGER  IO_ERRCOUNT
31        EXTERNAL IO_ERRCOUNT        EXTERNAL IO_ERRCOUNT
32    
# Line 44  C     !LOCAL VARIABLES: Line 44  C     !LOCAL VARIABLES:
44  CEOP  CEOP
45    
46        IF (        IF (
47       &     DIFF_BASE_MULTIPLE(baseTime,dumpFreq,       &     DIFFERENT_MULTIPLE(dumpFreq,myTime,deltaTClock) .OR.
      &     myTime,deltaTClock) .OR.  
48       &     myTime.EQ.endTime .OR.       &     myTime.EQ.endTime .OR.
49       &     myTime.EQ.startTime       &     myTime.EQ.startTime
50       &     ) THEN       &     ) THEN

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

  ViewVC Help
Powered by ViewVC 1.1.22