Merge branch 'adasko' into bartek with corrections

[unres.git] / source / unres / src_CSA_DiL / COMMON.SCCOR

diff --git a/source/unres/src_CSA_DiL/COMMON.SCCOR b/source/unres/src_CSA_DiL/COMMON.SCCOR
index 4d15b73..5217de7 100644 (file)
--- a/source/unres/src_CSA_DiL/COMMON.SCCOR
+++ b/source/unres/src_CSA_DiL/COMMON.SCCOR
@@ -1,6 +1,6 @@
 C Parameters of the SCCOR term
       double precision v1sccor,v2sccor
       integer nterm_sccor
-      common/torsion/v1sccor(maxterm_sccor,-ntyp:ntyp,-ntyp:ntyp),
-     &    v2sccor(maxterm_sccor,-ntyp:ntyp,-ntyp:ntyp),
-     &    nterm_sccor(-ntyp:ntyp,-ntyp:ntyp)
+      common/torsion/v1sccor(maxterm_sccor,20,20),
+     &    v2sccor(maxterm_sccor,20,20),
+     &    nterm_sccor