181 |
#ifdef ALLOW_MONITOR |
#ifdef ALLOW_MONITOR |
182 |
IF ( MASTER_CPU_IO(myThid) ) THEN |
IF ( MASTER_CPU_IO(myThid) ) THEN |
183 |
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 |
184 |
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): |
185 |
|
|
186 |
IF (monitor_stdio) THEN |
IF (monitor_stdio) THEN |
187 |
mon_write_stdout = .TRUE. |
mon_write_stdout = .TRUE. |