Merge branch 'devel' into AFM

[unres.git] / source / wham / src-NEWSC-NEWCORR / COMMON.CONTACTS1

diff --git a/source/wham/src-NEWSC-NEWCORR/COMMON.CONTACTS1 b/source/wham/src-NEWSC-NEWCORR/COMMON.CONTACTS1
new file mode 100644 (file)
index 0000000..04affa9
--- /dev/null
+++ b/source/wham/src-NEWSC-NEWCORR/COMMON.CONTACTS1
@@ -0,0 +1,5 @@
+      integer ncont,ncont_ref,icont,icont_ref,num_cont,jcont,
+     & nsccont_frag_ref,isccont_frag_ref
+      common /contacts/ ncont,ncont_ref,icont(2,maxcont),
+     & icont_ref(2,maxcont),nsccont_frag_ref(mmaxfrag),
+     & isccont_frag_ref(2,maxcont,mmaxfrag)