corrections

[unres.git] / source / cluster / wham / src-HCD / wrtclust.f

diff --git a/source/cluster/wham/src-HCD/wrtclust.f b/source/cluster/wham/src-HCD/wrtclust.f
index fa08111..91fc05e 100644 (file)
--- a/source/cluster/wham/src-HCD/wrtclust.f
+++ b/source/cluster/wham/src-HCD/wrtclust.f
@@ -24,7 +24,7 @@
       DATA EXTEN /'.pdb'/,extmol /'.mol2'/,NUMM /'000'/,MUMM /'000'/
       external ilen
       logical viol_nmr
-      integer ib,list_peak_viol(maxdim)
+      integer ib,list_peak_viol(maxdim_cont)
       double precision Esaxs_all(maxgr),Pcalc_all(maxsaxs,maxgr)
 
       do i=1,64