- Timestamp:
- 2019-10-24T10:30:30+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r11756_text_output/src/OCE/DOM/domain.F90
r11536 r11782 312 312 READ ( numnam_cfg, namrun, IOSTAT = ios, ERR = 902 ) 313 313 902 IF( ios > 0 ) CALL ctl_nam ( ios , 'namrun in configuration namelist' ) 314 IF(lwm ) WRITE ( numond, namrun )314 IF(lwm .AND. nprint > 2) WRITE ( numond, namrun ) 315 315 ! 316 316 IF(lwp) THEN ! control print … … 410 410 READ ( numnam_cfg, namdom, IOSTAT = ios, ERR = 904 ) 411 411 904 IF( ios > 0 ) CALL ctl_nam ( ios , 'namdom in configuration namelist' ) 412 IF(lwm ) WRITE( numond, namdom )412 IF(lwm .AND. nprint > 2) WRITE( numond, namdom ) 413 413 ! 414 414 IF(lwp) THEN … … 442 442 READ ( numnam_cfg, namnc4, IOSTAT = ios, ERR = 908 ) 443 443 908 IF( ios > 0 ) CALL ctl_nam ( ios , 'namnc4 in configuration namelist' ) 444 IF(lwm ) WRITE( numond, namnc4 )444 IF(lwm .AND. nprint > 2) WRITE( numond, namnc4 ) 445 445 446 446 IF(lwp) THEN ! control print
Note: See TracChangeset
for help on using the changeset viewer.