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

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

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

revision 1.1 by jmc, Fri Jan 28 01:00:13 2005 UTC revision 1.2 by jmc, Sat Nov 5 01:00:57 2005 UTC
# Line 38  C     myThid - Thread number for this in Line 38  C     myThid - Thread number for this in
38        _RL     myTime        _RL     myTime
39        INTEGER myIter        INTEGER myIter
40        INTEGER myThid        INTEGER myThid
   
41  CEOP  CEOP
42    
43    #ifdef ALLOW_TIMEAVE
44  C     !LOCAL VARIABLES:  C     !LOCAL VARIABLES:
45  C     == Local variables  C     == Local variables
46        INTEGER bi,bj        INTEGER bi,bj
47    
 #ifdef ALLOW_TIMEAVE  
48  C--   Fill-in TimeAve pkg diagnostics (for state-variables)  C--   Fill-in TimeAve pkg diagnostics (for state-variables)
49    
50        DO bj=myByLo(myThid),myByHi(myThid)        DO bj=myByLo(myThid),myByHi(myThid)
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22