From 35bb8a2b6894caa1e15008a190786913154b725a Mon Sep 17 00:00:00 2001
From: Gaelle Tanguy <gaelle.tanguy@meteo.fr>
Date: Tue, 29 Apr 2014 12:46:23 +0000
Subject: [PATCH] Gaelle 29/04/2014 : increase len(youtfile) to 50

---
 src/MNH/spectre.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/MNH/spectre.f90 b/src/MNH/spectre.f90
index 9e8ce25ab..7f29c03fb 100644
--- a/src/MNH/spectre.f90
+++ b/src/MNH/spectre.f90
@@ -45,7 +45,7 @@ IMPLICIT NONE
 !*       0.1   declarations of local variables
 !
 CHARACTER (LEN=28), DIMENSION(1) :: YINIFILE      ! names of the INPUT FM-file
-CHARACTER (LEN=28)               :: YOUTFILE      ! names of the OUTPUT FM-file
+CHARACTER (LEN=50)               :: YOUTFILE      ! names of the OUTPUT FM-file
 INTEGER                          :: IRESP         ! return code in FM routines
 INTEGER                          :: ILUOUT0       ! Logical unit number for the output listing
 INTEGER                          :: ILUNAM        ! Logical unit numbers for the namelist file
-- 
GitLab