From 3172f0009d1956faa9474429a70e2af99b951253 Mon Sep 17 00:00:00 2001
From: clem <clement.rousset@locean.ipsl.fr>
Date: Fri, 7 Oct 2022 12:22:07 +0200
Subject: [PATCH] debug ice1d for debug mode
---
src/ICE/ice1d.F90 | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/ICE/ice1d.F90 b/src/ICE/ice1d.F90
index 8683822be..ffa8b8eaf 100644
--- a/src/ICE/ice1d.F90
+++ b/src/ICE/ice1d.F90
@@ -179,7 +179,7 @@ CONTAINS
!! *** ROUTINE ice1D_alloc ***
!!---------------------------------------------------------------------!
INTEGER :: ice1D_alloc ! return value
- INTEGER :: ierr(8), ii
+ INTEGER :: ierr(9), ii
!!---------------------------------------------------------------------!
ierr(:) = 0
--
GitLab