Changeset 7588 for branches/2016/dev_merge_2016/NEMOGCM/NEMO/OPA_SRC/DOM

Timestamp:

2017-01-20T16:24:07+01:00 (7 years ago)

Author:

acc

Message:

Branch dev_merge_2016. Wetting and drying enhancements. Added the reading of bathymetry with land elevations (negative depths) from domain configuration files (if ln_wd is .true.). Also added better detection of convergence in the limiter iterations (wet_dry.F90)

File:

• branches/2016/dev_merge_2016/NEMOGCM/NEMO/OPA_SRC/DOM/domzgr.F90 (modified) (2 diffs)

branches/2016/dev_merge_2016/NEMOGCM/NEMO/OPA_SRC/DOM/domzgr.F90

@@ -30 +30 @@
    USE usrdef_zgr     ! user defined vertical coordinate system
    USE depth_e3       ! depth <=> e3
+   USE wet_dry, ONLY: ln_wd, ht_wd
    !
    USE in_out_manager ! I/O manager
@@ -256 +257 @@
       CALL iom_get( inum, jpdom_data, 'bottom_level' , z2d  , lrowattr=ln_use_jattr )   ! last wet T-points
       k_bot(:,:) = INT( z2d(:,:) )
+      !
+      ! bathymetry with orography (wetting and drying only)
+      IF( ln_wd )  CALL iom_get( inum, jpdom_data, 'ht_wd' , ht_wd  , lrowattr=ln_use_jattr )
       !
       CALL iom_close( inum )