From 57bbe6650bb0c4e8fa8af8bdb817b2aeae176174 Mon Sep 17 00:00:00 2001
From: Clement Rousset <clement.rousset@locean.ipsl.fr>
Date: Fri, 10 Feb 2023 14:37:34 +0000
Subject: [PATCH] Update mppini.F90
---
src/OCE/LBC/mppini.F90 | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/src/OCE/LBC/mppini.F90 b/src/OCE/LBC/mppini.F90
index 5c25eca9..ec314a26 100644
--- a/src/OCE/LBC/mppini.F90
+++ b/src/OCE/LBC/mppini.F90
@@ -65,7 +65,7 @@ CONTAINS
!!----------------------------------------------------------------------
!
nn_comm = 1
- nn_hls = 1
+ nn_hls = 2
jpiglo = Ni0glo + 2 * nn_hls
jpjglo = Nj0glo + 2 * nn_hls
jpimax = jpiglo
@@ -169,7 +169,7 @@ CONTAINS
READ ( numnam_cfg, nammpp, IOSTAT = ios, ERR = 902 )
902 IF( ios > 0 ) CALL ctl_nam ( ios , 'nammpp in configuration namelist' )
!
- nn_hls = MAX(1, nn_hls) ! nn_hls must be > 0
+ nn_hls = MAX(2, nn_hls) ! nn_hls must be > 1
# if defined key_mpi2
WRITE(numout,*) ' use key_mpi2, we force nn_comm = 1'
nn_comm = 1
--
GitLab