From 86ee3397e00923b812cd08ad85c4af941009895e Mon Sep 17 00:00:00 2001 From: Sasha Fonari Date: Fri, 13 Sep 2019 11:40:08 -0400 Subject: [PATCH] Update HP output filename len --- HP/src/hp_postproc.f90 | 2 +- Modules/version.f90 | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/HP/src/hp_postproc.f90 b/HP/src/hp_postproc.f90 index 9e0dab2d35..72b620e926 100644 --- a/HP/src/hp_postproc.f90 +++ b/HP/src/hp_postproc.f90 @@ -61,7 +61,7 @@ SUBROUTINE hp_postproc eps3 = 1.d-4 ! the same threshold for the comparison of distances ! as in PW/src/inter_V.f90 DFT+U+V ! - CHARACTER(len=50) :: filenameU + CHARACTER(len=256) :: filenameU INTEGER, EXTERNAL :: find_free_unit ! CALL start_clock('hp_calc_U') diff --git a/Modules/version.f90 b/Modules/version.f90 index f4ddcf18e4..df9b48258c 100644 --- a/Modules/version.f90 +++ b/Modules/version.f90 @@ -12,7 +12,7 @@ MODULE global_version ! SAVE ! - CHARACTER (LEN=6) :: version_number = '6.4.1' + CHARACTER (LEN=18) :: version_number = '6.4.1 Schrodinger' CHARACTER (LEN=12) :: svn_revision = 'unknown' ! END MODULE global_version