- 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/SBC/sbcfwb.F90
r10570 r11782 187 187 erp(:,:) = erp(:,:) + zerp_cor(:,:) 188 188 ! 189 IF( nprint == 1.AND. lwp ) THEN ! control print189 IF( nprint > 3 .AND. lwp ) THEN ! control print 190 190 IF( z_fwf < 0._wp ) THEN 191 191 WRITE(numout,*)' z_fwf < 0'
Note: See TracChangeset
for help on using the changeset viewer.