corrections

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

diff --git a/source/unres/src-HCD-5D/minim_jlee.F b/source/unres/src-HCD-5D/minim_jlee.F
index 7162afb..5551640 100644 (file)
--- a/source/unres/src-HCD-5D/minim_jlee.F
+++ b/source/unres/src-HCD-5D/minim_jlee.F
@@ -37,11 +37,11 @@ c  controls minimization and sorting routines
       include 'COMMON.GEO'
       include 'COMMON.FFIELD'
       include 'COMMON.SBRIDGE'
-      include 'COMMON.DISTFIT'
+c      include 'COMMON.DISTFIT'
       include 'COMMON.CHAIN'
       dimension var(maxvar),erg(mxch*(mxch+1)/2+1)
       dimension var2(maxvar)
-      integer iffr(maxres),ihpbt(maxdim),jhpbt(maxdim)
+      integer iffr(maxres),ihpbt(maxdim_cont),jhpbt(maxdim_cont)
       double precision d(maxvar),garbage(maxvar),g(maxvar)
       double precision energia(0:n_ene),time0s,time1s
       dimension indx(9),info(12)