Skip to content
Snippets Groups Projects
Commit c13d35b2 authored by Guillaume Samson's avatar Guillaume Samson :snowman2:
Browse files

Merge branch 'clem_2021_debug' into 'main'

make ICE_AGRIF work. It probably did not in debug mode.

See merge request nemo/core!13
parents fff940c9 39953b60
No related branches found
No related tags found
No related merge requests found
......@@ -129,9 +129,9 @@ CONTAINS
ssu_m(:,:) = 0._wp
ssv_m(:,:) = 0._wp
ssh_m(:,:) = 0._wp
IF( .NOT. ln_linssh ) e3t_m(:,:) = e3t_0(:,:,1) !clem: necessary at least for sas2D
e3t_m(:,:) = e3t_0(:,:,1) !clem: necessary at least for sas2D
frq_m(:,:) = 1._wp ! - -
ssh (:,:,Kmm) = 0._wp ! - -
ssh (:,:,Kmm) = 0._wp ! - -
ENDIF
IF ( nn_ice == 1 ) THEN
......@@ -159,7 +159,7 @@ CONTAINS
CALL iom_put( 'sst_m', sst_m )
CALL iom_put( 'sss_m', sss_m )
CALL iom_put( 'ssh_m', ssh_m )
IF( .NOT.ln_linssh ) CALL iom_put( 'e3t_m', e3t_m )
CALL iom_put( 'e3t_m', e3t_m )
IF( ln_read_frq ) CALL iom_put( 'frq_m', frq_m )
ENDIF
!
......
......@@ -104,7 +104,7 @@
!-----------------------------------------------------------------------
&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,6 +104,7 @@
!-----------------------------------------------------------------------
&namagrif ! AGRIF zoom ("key_agrif")
!-----------------------------------------------------------------------
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