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)