- Timestamp:
- 2017-12-06T09:16:26+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/ROMS_WAD_7832/NEMOGCM/NEMO/OPA_SRC/DYN/wet_dry.F90
r8870 r8907 34 34 !! --------------------------------------------------------------------- 35 35 36 REAL(wp), PUBLIC, ALLOCATABLE, DIMENSION(:,:) :: wdmask !: u- and v- limiter 37 ! (can include negative depths) 38 REAL(wp), PUBLIC, ALLOCATABLE, DIMENSION(:,:) :: wdramp, wdrampu, wdrampv ! for hpg limiting 36 REAL(wp), PUBLIC, ALLOCATABLE, DIMENSION(:,:) :: wdmask !: u- and v- limiter (can include negative depths) 37 REAL(wp), PUBLIC, ALLOCATABLE, DIMENSION(:,:) :: wdramp, wdrampu, wdrampv !: for hpg limiting 39 38 40 39 LOGICAL, PUBLIC :: ln_wd_il !: Wetting/drying il activation switch (T:on,F:off) … … 43 42 REAL(wp), PUBLIC :: rn_wdmin1 !: minimum water depth on dried cells 44 43 REAL(wp), PUBLIC :: rn_wdmin2 !: tolerance of minimum water depth on dried cells 45 REAL(wp), PUBLIC :: rn_wdld !: land elevation below which wetting/drying 46 !: will be considered 44 REAL(wp), PUBLIC :: rn_wdld !: land elevation below which wetting/drying will be considered 47 45 INTEGER , PUBLIC :: nn_wdit !: maximum number of iteration for W/D limiter 48 46 LOGICAL, PUBLIC :: ln_wd_dl_bc !: DL scheme: True implies 3D velocities are set to the barotropic values at points
Note: See TracChangeset
for help on using the changeset viewer.