/[MITgcm]/MITgcm/pkg/shelfice/shelfice_output.F
ViewVC logotype

Diff of /MITgcm/pkg/shelfice/shelfice_output.F

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

revision 1.2 by jmc, Sun Jan 3 00:39:46 2010 UTC revision 1.3 by jmc, Thu Jun 7 17:09:47 2012 UTC
# Line 45  C     == Local variables == Line 45  C     == Local variables ==
45  #ifdef ALLOW_TIMEAVE  #ifdef ALLOW_TIMEAVE
46        INTEGER i, j, bi, bj        INTEGER i, j, bi, bj
47        LOGICAL dumpFiles        LOGICAL dumpFiles
48          _RL zeroRL
49          PARAMETER( zeroRL = 0. _d 0 )
50  #endif  #endif
51  #ifdef ALLOW_MNC  #ifdef ALLOW_MNC
52        CHARACTER*(1) pf        CHARACTER*(1) pf
# Line 131  C     Dump files and restart average com Line 133  C     Dump files and restart average com
133       &     DIFFERENT_MULTIPLE(SHELFICE_taveFreq,myTime,deltaTClock)       &     DIFFERENT_MULTIPLE(SHELFICE_taveFreq,myTime,deltaTClock)
134  #ifdef ALLOW_CAL  #ifdef ALLOW_CAL
135          IF ( useCAL ) THEN          IF ( useCAL ) THEN
136            CALL CAL_TIME2DUMP( SHELFICE_taveFreq, deltaTClock,            CALL CAL_TIME2DUMP( zeroRL, SHELFICE_taveFreq, deltaTClock,
137       U                        dumpFiles,       U                        dumpFiles,
138       I                        myTime, myIter, myThid )       I                        myTime, myIter, myThid )
139          ENDIF          ENDIF
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22