From ab3ccd6a7afc8bd6c37f6f24e5002b3c06990a0f Mon Sep 17 00:00:00 2001 From: Paolo Giannozzi Date: Sat, 6 Jun 2020 21:37:45 +0200 Subject: [PATCH] Error message was truncated --- Modules/latgen.f90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Modules/latgen.f90 b/Modules/latgen.f90 index 8daee4b6e..a11149845 100644 --- a/Modules/latgen.f90 +++ b/Modules/latgen.f90 @@ -798,7 +798,7 @@ SUBROUTINE latgen(ibrav,celldm,a1,a2,a3,omega) real(DP), INTENT(inout) :: a1(3), a2(3), a3(3) real(DP), INTENT(out) :: omega ! - character(len=32) :: errormsg + character(len=54) :: errormsg integer :: ierr CALL latgen_lib(ibrav,celldm,a1,a2,a3,omega, ierr, errormsg)