New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 7434 for branches/2016/dev_merge_2016/NEMOGCM/NEMO/OPA_SRC/DYN/wet_dry.F90 – NEMO

Ignore:
Timestamp:
2016-12-02T11:50:44+01:00 (8 years ago)
Author:
timgraham
Message:

Replace bathy with ht_0

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2016/dev_merge_2016/NEMOGCM/NEMO/OPA_SRC/DYN/wet_dry.F90

    r7433 r7434  
    511511      do jj = 1,jpj 
    512512         do ji = 1,jpi 
    513             IF( bathy(ji,jj) + sshn(ji,jj) < rn_wdmin1 ) THEN 
    514                sshn(ji,jj) = tmask(ji,jj,1)*( rn_wdmin1 - bathy(ji,jj) ) 
     513            IF( ht_0(ji,jj) + sshn(ji,jj) < rn_wdmin1 ) THEN 
     514               sshn(ji,jj) = tmask(ji,jj,1)*( rn_wdmin1 - ht_0(ji,jj) ) 
    515515            ENDIF 
    516516         end do 
Note: See TracChangeset for help on using the changeset viewer.