From 59e52b8bf8d2a55a5a8b06ffd0c0dbbdbc1a02e2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?J=C3=A9r=C3=B4me=20Chanut?=
<jerome.chanut@mercator-ocean.fr>
Date: Tue, 9 Aug 2022 15:02:58 +0000
Subject: [PATCH] Resolve "Issues with ssh initialization in iceinit with vvl
and AGRIF"
---
src/OCE/IOM/restart.F90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/OCE/IOM/restart.F90 b/src/OCE/IOM/restart.F90
index 5e3c1301a..88a8a9ad3 100644
--- a/src/OCE/IOM/restart.F90
+++ b/src/OCE/IOM/restart.F90
@@ -452,8 +452,8 @@ CONTAINS
ssh(:,:,Kbb) = ssh(:,:,Kbb) - Agrif_Parent(rsshadj)
ENDWHERE
ENDIF
- ENDIF
#endif
+ ENDIF
#endif
!
ssh(:,:,Kmm) = ssh(:,:,Kbb) !* set now values from to before ones
--
GitLab