From c6369881ddd69c185541733f0dcd6cce421ba969 Mon Sep 17 00:00:00 2001 From: Quentin Rodier <quentin.rodier@meteo.fr> Date: Fri, 29 Mar 2019 15:32:07 +0100 Subject: [PATCH] Quentin 29/03/2019 : increase the maximum number of possible output files from 192 to 999 (useful for high frequent output with NAM_OUTPUT) --- src/MNH/modd_parameters.f90 | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/MNH/modd_parameters.f90 b/src/MNH/modd_parameters.f90 index a128c34b3..8b0c0a4fc 100644 --- a/src/MNH/modd_parameters.f90 +++ b/src/MNH/modd_parameters.f90 @@ -40,6 +40,7 @@ !! J.Escobar : 15/09/2015 : WENO5 & JPHEXT <> 1 !! B.VIE 2016 LIMA !! Philippe Wautelet: 05/2016-04/2018: new data structures and calls for I/O +!! Q. Rodier : 29/03/2019 : increase maximum number of outputs to 999 !------------------------------------------------------------------------------- ! !* 0. DECLARATIONS @@ -74,7 +75,7 @@ INTEGER, PARAMETER :: NNEGUNDEF = -999 ! default value for undefined or unused ! ! field (negative value guaranteed) INTEGER, PARAMETER :: JPDUMMY = 20 ! Size of dummy array ! -INTEGER, PARAMETER :: JPOUTMAX = 192 ! Maximum allowed number of OUTput files +INTEGER, PARAMETER :: JPOUTMAX = 999 ! Maximum allowed number of OUTput files INTEGER, PARAMETER :: JPOUTVARMAX = 192 ! Maximum allowed number of variables in an output file ! INTEGER, PARAMETER :: NMNHNAMELGTMAX = 32 ! Maximum length of a MNH variable name -- GitLab