Zmina 21 na ntyp1 w wham src i src-M
[unres.git] / source / unres / src_CSA / COMMON.CSA
1       integer ngroup,igroup,ntotgr,numch,irestart,ndiff,nbankm,iucut
2       double precision diffcut
3       common/alphaa/ ngroup(mxgr),igroup(3,mxang,mxgr),ntotgr,numch
4       common/csa_input/cut1,cut2,eglob_csa,estop,jstart,jend,
5      & n1,n2,n3,n4,n5,n6,n7,n8,n9,n14,n15,n16,n17,n18,n0,
6      & is1,is2,nseed,ntotal,icmax,nstmax,irestart,nran0,nran1,irr,
7      & nglob_csa,nmin_csa,ndiff,nbankm,iucut
8       logical ldih_bias,tm_score
9       common/dih_control/rdih_bias,ldih_bias,tm_score
10       common/diffcuta/ diffcut
11