Merge pull request #13660 from mcgratta/master

FDS Source: Length string dimension
firemodels · Oct 30, 2024 · ed7d684 · ed7d684
2 parents a4243d6 + ac7b087
commit ed7d684
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/Source/prec.f90 b/Source/prec.f90
@@ -27,8 +27,8 @@ MODULE PRECISION_PARAMETERS
 INTEGER, PARAMETER :: CHID_LENGTH=50                 !< Maximum length of job ID
 INTEGER, PARAMETER :: FILE_LENGTH=200                !< Maximum length of filenames ID
 INTEGER, PARAMETER :: NAMELIST_LENGTH=300            !< Maximum length of NAMELIST line in input file (see SEARCH_INPUT_FILE)
-INTEGER, PARAMETER :: MESH_STRING_LENGTH=LABEL_LENGTH + 80 !< Length for storage of strings
-INTEGER, PARAMETER :: FN_LENGTH=FILE_LENGTH+CHID_LENGTH    !< Length for output filename strings (includes output directory)
+INTEGER, PARAMETER :: MESH_STRING_LENGTH=LABEL_LENGTH + 100 !< Length for storage of strings
+INTEGER, PARAMETER :: FN_LENGTH=FILE_LENGTH+CHID_LENGTH     !< Length for output filename strings (includes output directory)
 INTEGER, PARAMETER :: N_OUTPUT_QUANTITIES=600        !< Dimension of array that holds names of output quantities
 INTEGER, PARAMETER :: POINTS_ARRAY_DIM=100           !< Dimension of arrays of linear device coordinates