/[MITgcm]/MITgcm/pkg/monitor/mon_set_iounit.F
ViewVC logotype

Diff of /MITgcm/pkg/monitor/mon_set_iounit.F

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

revision 1.2 by edhill, Sat Apr 3 21:17:10 2004 UTC revision 1.3 by jmc, Tue Oct 17 19:01:48 2006 UTC
# Line 30  C     Dont change before everyone is rea Line 30  C     Dont change before everyone is rea
30        CALL BAR2( myThid )        CALL BAR2( myThid )
31    
32  C     Set monitor I/O unit  C     Set monitor I/O unit
33        mon_ioUnit = standardMessageUnit        _BEGIN_MASTER(myThid)
34          mon_ioUnit = unit
35          _END_MASTER(myThid)
36    
37  C     Make sure everyone sees the change  C     Make sure everyone sees the change
38        CALL BAR2( myThid )        CALL BAR2( myThid )
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22