From 52002f654e512acd2366f374f28fabae05e927b1 Mon Sep 17 00:00:00 2001 From: Martin Diehl Date: Wed, 22 Aug 2018 09:14:16 +0200 Subject: [PATCH] to converge at one point to one (or two) string lenth values --- src/prec.f90 | 1 + 1 file changed, 1 insertion(+) diff --git a/src/prec.f90 b/src/prec.f90 index caf59cfe8..959ee77ba 100644 --- a/src/prec.f90 +++ b/src/prec.f90 @@ -23,6 +23,7 @@ module prec NO SUITABLE PRECISION FOR INTEGER SELECTED, STOPPING COMPILATION #endif + integer, parameter, public :: pStringLen = 256 !< default string lenth integer, parameter, public :: pLongInt = 8 !< integer representation 64 bit (was selected_int_kind(12), number with at least up to +- 1e12) real(pReal), parameter, public :: tol_math_check = 1.0e-8_pReal !< tolerance for internal math self-checks (rotation)