corrections

[unres.git] / source / unres / src-HCD-5D / regularize.F

diff --git a/source/unres/src-HCD-5D/regularize.F b/source/unres/src-HCD-5D/regularize.F
index c506b8a..72d92da 100644 (file)
--- a/source/unres/src-HCD-5D/regularize.F
+++ b/source/unres/src-HCD-5D/regularize.F
@@ -7,7 +7,8 @@
       include 'COMMON.HEADER'
       include 'COMMON.IOUNITS'
       include 'COMMON.MINIM'
-      double precision przes(3),obrot(3,3),fhpb0(maxdim),varia(maxvar)
+      double precision przes(3),obrot(3,3),fhpb0(maxdim_cont),
+     & varia(maxvar)
       double precision cref0(3,ncart)
       double precision energia(0:n_ene)
       logical non_conv