- Timestamp:
- 2017-12-01T10:48:12+01:00 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/ROMS_WAD_7832/NEMOGCM/NEMO/OPA_SRC/DOM/domzgr.F90
r8865 r8870 30 30 USE usrdef_zgr ! user defined vertical coordinate system 31 31 USE depth_e3 ! depth <=> e3 32 USE wet_dry, ONLY: ln_wd , ln_rwd, rn_ssh_ref32 USE wet_dry, ONLY: ln_wd_il, ln_wd_dl, rn_ssh_ref 33 33 ! 34 34 USE in_out_manager ! I/O manager … … 259 259 ! 260 260 ! reference depth for negative bathy (wetting and drying only) 261 IF( ln_wd .OR. ln_rwd) CALL iom_get( inum, 'rn_wd_ref_depth' , rn_ssh_ref )261 IF( ln_wd_il .OR. ln_wd_dl ) CALL iom_get( inum, 'rn_wd_ref_depth' , rn_ssh_ref ) 262 262 ! 263 263 CALL iom_close( inum )
Note: See TracChangeset
for help on using the changeset viewer.