- Timestamp:
- 2019-12-13T10:19:48+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r11943_MERGE_2019/src/TOP/PISCES/P4Z/p4zrem.F90
r11960 r12236 208 208 END DO 209 209 210 IF( ln_ctl) THEN ! print mean trends (used for debugging)210 IF(sn_cfctl%l_prttrc) THEN ! print mean trends (used for debugging) 211 211 WRITE(charout, FMT="('rem1')") 212 212 CALL prt_ctl_trc_info(charout) … … 234 234 END DO 235 235 236 IF( ln_ctl) THEN ! print mean trends (used for debugging)236 IF(sn_cfctl%l_prttrc) THEN ! print mean trends (used for debugging) 237 237 WRITE(charout, FMT="('rem2')") 238 238 CALL prt_ctl_trc_info(charout) … … 269 269 END DO 270 270 271 IF( ln_ctl) THEN ! print mean trends (used for debugging)271 IF(sn_cfctl%l_prttrc) THEN ! print mean trends (used for debugging) 272 272 WRITE(charout, FMT="('rem3')") 273 273 CALL prt_ctl_trc_info(charout)
Note: See TracChangeset
for help on using the changeset viewer.