- Timestamp:
- 2019-07-22T17:00:21+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/dev_r11265_ASINTER-01_Guillaume_ABL1D/src/ABL/sbcabl.F90
r11305 r11322 64 64 & nn_dyn_restore, & 65 65 & rn_ldyn_min , rn_ldyn_max, rn_ltra_min, rn_ltra_max, & 66 & nn_amxl, rn_cm, rn_ct, rn_ce, rn_ceps, rn_Rod, rn_Ric 66 & nn_amxl, rn_cm, rn_ct, rn_ce, rn_ceps, rn_Rod, rn_Ric, & 67 & ln_smth_pblh 67 68 !!--------------------------------------------------------------------- 68 69 … … 113 114 END SELECT 114 115 ! 116 IF( ln_smth_pblh ) WRITE(numout,*) ' ABL -- Smoothing of PBL height is activated' 117 ! 115 118 ENDIF 116 119 … … 271 274 !ENDIF 272 275 !!GS restart case not supported 273 276 274 277 END SUBROUTINE sbc_abl_init 275 278 … … 339 342 END SUBROUTINE sbc_abl 340 343 341 342 344 !!====================================================================== 343 345 END MODULE sbcabl
Note: See TracChangeset
for help on using the changeset viewer.