/[MITgcm]/MITgcm/model/src/packages_write_pickup.F
ViewVC logotype

Diff of /MITgcm/model/src/packages_write_pickup.F

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

revision 1.13 by jmc, Wed Apr 6 18:29:53 2005 UTC revision 1.14 by jmc, Sun May 15 03:02:08 2005 UTC
# Line 28  C     !USES: Line 28  C     !USES:
28  #include "EEPARAMS.h"  #include "EEPARAMS.h"
29  #include "PARAMS.h"  #include "PARAMS.h"
30    
31        LOGICAL  DIFF_BASE_MULTIPLE        LOGICAL  DIFFERENT_MULTIPLE
32        EXTERNAL DIFF_BASE_MULTIPLE        EXTERNAL DIFFERENT_MULTIPLE
33        INTEGER  IO_ERRCOUNT        INTEGER  IO_ERRCOUNT
34        EXTERNAL IO_ERRCOUNT        EXTERNAL IO_ERRCOUNT
35    
# Line 60  CEOP Line 60  CEOP
60        permCheckPoint = .FALSE.        permCheckPoint = .FALSE.
61        tempCheckPoint = .FALSE.        tempCheckPoint = .FALSE.
62        permCheckPoint=        permCheckPoint=
63       &     DIFF_BASE_MULTIPLE(baseTime,pChkptFreq,myTime,deltaTClock)       &     DIFFERENT_MULTIPLE(pChkptFreq,myTime,deltaTClock)
64        tempCheckPoint=        tempCheckPoint=
65       &     DIFF_BASE_MULTIPLE(baseTime, ChkptFreq,myTime,deltaTClock)       &     DIFFERENT_MULTIPLE( ChkptFreq,myTime,deltaTClock)
66    
67  #ifdef ALLOW_CAL  #ifdef ALLOW_CAL
68        IF ( calendarDumps ) THEN        IF ( calendarDumps ) THEN
Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14
  ViewVC Help
Powered by ViewVC 1.1.22