- Timestamp:
- 2019-11-06T17:01:36+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/fix_sn_cfctl_ticket2328/src/TOP/PISCES/P4Z/p4zrem.F90
r11536 r11869 207 207 END DO 208 208 209 IF(ln_ctl ) THEN ! print mean trends (used for debugging)209 IF(ln_ctl .OR. sn_cfctl%l_mpptop) THEN ! print mean trends (used for debugging) 210 210 WRITE(charout, FMT="('rem1')") 211 211 CALL prt_ctl_trc_info(charout) … … 233 233 END DO 234 234 235 IF(ln_ctl ) THEN ! print mean trends (used for debugging)235 IF(ln_ctl .OR. sn_cfctl%l_mpptop) THEN ! print mean trends (used for debugging) 236 236 WRITE(charout, FMT="('rem2')") 237 237 CALL prt_ctl_trc_info(charout) … … 268 268 END DO 269 269 270 IF(ln_ctl ) THEN ! print mean trends (used for debugging)270 IF(ln_ctl .OR. sn_cfctl%l_mpptop) THEN ! print mean trends (used for debugging) 271 271 WRITE(charout, FMT="('rem3')") 272 272 CALL prt_ctl_trc_info(charout)
Note: See TracChangeset
for help on using the changeset viewer.