X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_CSA_DiL%2FCOMMON.TORSION;h=a51c1a923c01edd7be95a1f20e9a4b36c1547544;hb=03f945f08803ac33d94abb35d001684a49080647;hp=c42ea1dd78aeb2a98b0331e67952dd42a68e62aa;hpb=112d5a40499d065fa16ade60c2eb3f815f136ca4;p=unres.git

diff --git a/source/unres/src_CSA_DiL/COMMON.TORSION b/source/unres/src_CSA_DiL/COMMON.TORSION
index c42ea1d..a51c1a9 100644
--- a/source/unres/src_CSA_DiL/COMMON.TORSION
+++ b/source/unres/src_CSA_DiL/COMMON.TORSION
@@ -1,9 +1,9 @@
 C Torsional constants of the rotation about virtual-bond dihedral angles
       double precision v1,v2,vlor1,vlor2,vlor3,v0
       integer itortyp,ntortyp,nterm,nlor,nterm_old
-      common/torsion/v0(-maxtor:maxtor,-maxtor:maxtor),
-     &    v1(maxterm,-maxtor:maxtor,-maxtor:maxtor),
-     &    v2(maxterm,-maxtor:maxtor,-maxtor:maxtor),
+      common/torsion/v0(-maxtor:maxtor,-maxtor:maxtor,2),
+     &    v1(maxterm,-maxtor:maxtor,-maxtor:maxtor,2),
+     &    v2(maxterm,-maxtor:maxtor,-maxtor:maxtor,2),
      &    vlor1(maxlor,maxtor,maxtor),
      &    vlor2(maxlor,maxtor,maxtor),vlor3(maxlor,maxtor,maxtor),
      &    itortyp(-ntyp:ntyp),ntortyp,