X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc-HCD-5D%2FDIMENSIONS;h=8f84c08d8c0fc9acc0e8bfe4f3051b11b776eca1;hb=a9f1b123976804db7a99d09f2f43296d9fd1cf0d;hp=113d3d2e855f0a2ece7c33c930f42b2314896267;hpb=5673961eec8f29bcff4be10a73b31f835ac927db;p=unres.git

diff --git a/source/unres/src-HCD-5D/DIMENSIONS b/source/unres/src-HCD-5D/DIMENSIONS
index 113d3d2..8f84c08 100644
--- a/source/unres/src-HCD-5D/DIMENSIONS
+++ b/source/unres/src-HCD-5D/DIMENSIONS
@@ -40,7 +40,8 @@ C Max. number of groups of interactions that a given SC is involved in
 C Max. number of derivatives of virtual-bond and side-chain vectors in theta
 C or phi.
       integer maxdim
-      parameter (maxdim=(maxres_chain-1)*(maxres_chain-2)/2)
+c      parameter (maxdim=(maxres_chain-1)*(maxres_chain-2)/2)
+      parameter (maxdim=(maxres-1)*(maxres-2)/2)
 C Max. number of SC contacts
       integer maxcont
       parameter (maxcont=12*maxres)