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

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

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

revision 1.6 by mlosch, Mon Feb 25 20:57:24 2008 UTC revision 1.8 by jmc, Mon Aug 6 16:54:40 2012 UTC
# Line 67  C     msgBuf     :: message buffer Line 67  C     msgBuf     :: message buffer
67    
68  #ifdef ALLOW_CAL  #ifdef ALLOW_CAL
69        IF ( useCAL ) THEN        IF ( useCAL ) THEN
70           CALL CAL_TIME2DUMP( pChkPtFreq, deltaTClock,           CALL CAL_TIME2DUMP( zeroRL, pChkPtFreq, deltaTClock,
71       U                       permPickup,       U                       permPickup,
72       I                       myTime, myIter, myThid )       I                       myTime, myIter, myThid )
73           CALL CAL_TIME2DUMP( chkPtFreq,  deltaTClock,           CALL CAL_TIME2DUMP( zeroRL, chkPtFreq,  deltaTClock,
74       U                       tempPickup,       U                       tempPickup,
75       I                       myTime, myIter, myThid )       I                       myTime, myIter, myThid )
76        ENDIF        ENDIF
Legend:
Removed from v.1.6  
changed lines
  Added in v.1.8
  ViewVC Help
Powered by ViewVC 1.1.22