From 305f5ad5c5e20f79836a9a60408d123e7d5b948c Mon Sep 17 00:00:00 2001
From: Wautelet Philippe <waup@aeropc45.aero.obs-mip.fr>
Date: Tue, 26 Oct 2021 15:42:20 +0200
Subject: [PATCH] Philippe 26/10/2021: increase NMSGLGTMAX (necessary for
 PRINT_FLATPOOL_STATS)

---
 src/LIB/SURCOUCHE/src/mode_msg.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/LIB/SURCOUCHE/src/mode_msg.f90 b/src/LIB/SURCOUCHE/src/mode_msg.f90
index 80d2f6677..a3d919399 100644
--- a/src/LIB/SURCOUCHE/src/mode_msg.f90
+++ b/src/LIB/SURCOUCHE/src/mode_msg.f90
@@ -19,7 +19,7 @@ use modd_io, only: NVERB_FATAL, NVERB_ERROR, NVERB_WARNING, NVERB_INFO, NVERB_DE
 
 implicit none
 
-integer, parameter :: NMSGLGTMAX   = 100 ! Maximum length for a message
+integer, parameter :: NMSGLGTMAX   = 132 ! Maximum length for a message
 integer, parameter :: NMSGLLINEMAX = 10  ! Maximum number of lines for a message
 
 character(len=NMSGLGTMAX), dimension(NMSGLLINEMAX) :: cmnhmsg = ''
-- 
GitLab