Ignore:
Timestamp:
2019-09-18T17:52:11+02:00 (13 months ago)
Author:
mathiot
Message:

ENHANCE-02_ISF: fix compatibility issue between rn_hmin and ice shelf (ticket #2142)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • NEMO/branches/2019/ENHANCE-02_ISF_domcfg/src/domzgr.F90

    r11308 r11568  
    612612         zhmin = gdepw_1d(ik+1)                                                        ! minimum depth = ik+1 w-levels  
    613613         WHERE( bathy(:,:) <= 0._wp )   ;   bathy(:,:) = 0._wp                         ! min=0     over the lands 
    614          ELSE WHERE                     ;   bathy(:,:) = MAX(  zhmin , bathy(:,:)  )   ! min=zhmin over the oceans 
     614         ELSE WHERE ( risfdep == 0._wp );   bathy(:,:) = MAX(  zhmin , bathy(:,:)  )   ! min=zhmin over the oceans 
    615615         END WHERE 
    616616         IF(lwp) write(numout,*) 'Minimum ocean depth: ', zhmin, ' minimum number of ocean levels : ', ik 
Note: See TracChangeset for help on using the changeset viewer.