Skip to content
Snippets Groups Projects
Commit eece361f authored by jchanut's avatar jchanut
Browse files

Fixes issues #4 and #5

Remove silly change on mbku/mbkv/mbkf at the surface: this is useless
and is not compatible with 1 layer configurations (e.g. SWG and
ICE_AGRIF). Revert changes to namelists in ICE_AGRIF
parent 1a493a4d
No related branches found
No related tags found
No related merge requests found
......@@ -160,9 +160,6 @@ CONTAINS
! In case of a coarsened grid, account her for possibly aditionnal
! masked points; these have been read in the mesh file and stored in mbku, mbkv, mbkf
DO_2D( 0, 0, 0, 0 )
IF (mbku(ji,jj)<=1 ) umask(ji,jj,:) = 0._wp
IF (mbkv(ji,jj)<=1 ) vmask(ji,jj,:) = 0._wp
IF (mbkf(ji,jj)<=1 ) fmask(ji,jj,:) = 0._wp
IF ( MAXVAL(umask(ji,jj,:))/=0._wp ) umask(ji,jj,mbku(ji,jj)+1:jpk) = 0._wp
IF ( MAXVAL(vmask(ji,jj,:))/=0._wp ) vmask(ji,jj,mbkv(ji,jj)+1:jpk) = 0._wp
IF ( MAXVAL(fmask(ji,jj,:))/=0._wp ) fmask(ji,jj,mbkf(ji,jj)+1:jpk) = 0._wp
......
......@@ -105,7 +105,6 @@
&namagrif ! AGRIF zoom ("key_agrif")
!-----------------------------------------------------------------------
ln_init_chfrpar = .true. ! initialize child grids from parent
ln_chk_bathy = .false. ! =T check the parent bathymetry
/
!!======================================================================
!! *** Top/Bottom boundary condition *** !!
......
......@@ -104,8 +104,6 @@
!-----------------------------------------------------------------------
&namagrif ! AGRIF zoom ("key_agrif")
!-----------------------------------------------------------------------
ln_init_chfrpar = .true. ! initialize child grids from parent
ln_chk_bathy = .false. ! =T check the parent bathymetry
/
!!======================================================================
!! *** Top/Bottom boundary condition *** !!
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment