- Timestamp:
- 2019-10-24T10:30:30+02:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r11756_text_output/src/OCE/BDY/bdyini.F90
r11536 r11782 96 96 READ ( numnam_cfg, nambdy, IOSTAT = ios, ERR = 902 ) 97 97 902 IF( ios > 0 ) CALL ctl_nam ( ios , 'nambdy in configuration namelist' ) 98 IF(lwm ) WRITE ( numond, nambdy )98 IF(lwm .AND. nprint > 2) WRITE ( numond, nambdy ) 99 99 100 100 IF( .NOT. Agrif_Root() ) ln_bdy = .FALSE. ! forced for Agrif children … … 1088 1088 READ ( numnam_cfg, nambdy_index, IOSTAT = ios, ERR = 904 ) 1089 1089 904 IF( ios /= 0 ) CALL ctl_nam ( ios , 'nambdy_index in configuration namelist' ) 1090 IF(lwm ) WRITE ( numond, nambdy_index )1090 IF(lwm .AND. nprint > 2) WRITE ( numond, nambdy_index ) 1091 1091 1092 1092 SELECT CASE ( TRIM(ctypebdy) )
Note: See TracChangeset
for help on using the changeset viewer.