/[MITgcm]/MITgcm/pkg/ptracers/ptracers_monitor.F
ViewVC logotype

Diff of /MITgcm/pkg/ptracers/ptracers_monitor.F

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

revision 1.4 by mlosch, Mon Nov 29 17:11:41 2004 UTC revision 1.5 by mlosch, Wed Dec 1 21:30:46 2004 UTC
# Line 85  C     Ptracers field monitor start Line 85  C     Ptracers field monitor start
85          IF ( PTRACERS_monitorFreq .NE. monitorFreq ) THEN          IF ( PTRACERS_monitorFreq .NE. monitorFreq ) THEN
86  C     repeat printing of time to make grepping easier, default is not  C     repeat printing of time to make grepping easier, default is not
87  C     to do this, because the default is to use the same monitorFreq  C     to do this, because the default is to use the same monitorFreq
88  C     for ptracers than for the dynamics variables.  C     for ptracers as for the dynamics variables.
89           CALL MON_SET_PREF('trctime',myThid)           CALL MON_SET_PREF('trctime',myThid)
90           CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid)           CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid)
91           CALL MON_OUT_RL('_secondsf', myTime,mon_string_none,myThid)           CALL MON_OUT_RL('_secondsf', myTime,mon_string_none,myThid)
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.22