source/unres/src-HCD-5D/COMMON.CSA

   1       integer ngroup,igroup,ntotgr,numch,irestart,ndiff,nglob_csa,
   2      & nmin_csa,n1,n2,n3,n4,n5,n6,n7,n8,n9,n14,n15,n16,n17,n18,n0,
   3      & is1,is2,nseed,ntotal,icmax,nstmax,nran0,nran1,irr,jstart,jend
   4       double precision diffcut,eglob_csa,estop,cut1,cut2,rdih_bias
   5       common/alphaa/ ngroup(mxgr),igroup(3,mxang,mxgr),ntotgr,numch
   6       common/csa_input/cut1,cut2,eglob_csa,estop,jstart,jend,
   7      & n1,n2,n3,n4,n5,n6,n7,n8,n9,n14,n15,n16,n17,n18,n0,
   8      & is1,is2,nseed,ntotal,icmax,nstmax,irestart,nran0,nran1,irr,
   9      & nglob_csa,nmin_csa,ndiff
  10       logical ldih_bias
  11       common/dih_control/rdih_bias,ldih_bias
  12       common/diffcuta/ diffcut
  13