96 |
#ifdef ALLOW_MONITOR |
#ifdef ALLOW_MONITOR |
97 |
IF ( MASTER_CPU_IO(myThid) ) THEN |
IF ( MASTER_CPU_IO(myThid) ) THEN |
98 |
C-- only the master thread is allowed to switch On/Off mon_write_stdout |
C-- only the master thread is allowed to switch On/Off mon_write_stdout |
99 |
C & mon_write_mnc (since it's the only thread that uses those flags): |
C & mon_write_mnc (since it is the only thread that uses those flags): |
100 |
|
|
101 |
IF (monitor_stdio) THEN |
IF (monitor_stdio) THEN |
102 |
mon_write_stdout = .TRUE. |
mon_write_stdout = .TRUE. |