Merge branch 'devel' into AFM

[unres.git] / source / unres / src_MD-M-newcorr / COMMON.CSA

diff --git a/source/unres/src_MD-M-newcorr/COMMON.CSA b/source/unres/src_MD-M-newcorr/COMMON.CSA
new file mode 100644 (file)
index 0000000..273a268
--- /dev/null
+++ b/source/unres/src_MD-M-newcorr/COMMON.CSA
@@ -0,0 +1,11 @@
+      integer ngroup,igroup,ntotgr,numch,irestart,ndiff
+      double precision diffcut
+      common/alphaa/ ngroup(mxgr),igroup(3,mxang,mxgr),ntotgr,numch
+      common/csa_input/cut1,cut2,eglob_csa,estop,jstart,jend,
+     & n1,n2,n3,n4,n5,n6,n7,n8,n9,n14,n15,n16,n17,n18,n0,
+     & is1,is2,nseed,ntotal,icmax,nstmax,irestart,nran0,nran1,irr,
+     & nglob_csa,nmin_csa,ndiff
+      logical ldih_bias
+      common/dih_control/rdih_bias,ldih_bias
+      common/diffcuta/ diffcut
+