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

   1       double precision dihang,etot,bvar,bene,rene,rvar,avedif,difmin,
   2      & ebmin,ebmax,ebmaxt,cutdif,dij,dihang_in,difcut,dele,rmscut,
   3      & pnccut,rmsn,pncn,brmsn,rrmsn,bpncn,rpncn,parent,dihang_in2
   4       integer ibank,is,jbank,ibmin,ibmax,nbank,nconf,iuse,nstep,icycle,
   5      & iseed,ntbank,ntbankm,iref,nconf_in,indb,ilastnstep,
   6      & bvar_nss,bvar_ss,bvar_ns,bvar_s,movenx,movernx,nstatnx,
   7      & nstatnx_tot,nss_in,iss_in,jss_in,nadd,nss_out,iss_out,jss_out,
   8      & isend2,iff_in,idata
   9       common/varin/dihang_in(mxang,maxres,mxch,mxio),nss_in(mxio),
  10      &                iss_in(maxss,mxio),jss_in(maxss,mxio)
  11       common/minvar/dihang(mxang,maxres,mxch,mxio),etot(mxio),rmsn(mxio)
  12      &                 ,pncn(mxio),nss_out(mxio),
  13      &                 iss_out(maxss,mxio),jss_out(maxss,mxio)
  14       common/bank/
  15      *  bvar(mxang,maxres,mxch,mxio),bene(mxio),rene(mxio),
  16      *  brmsn(mxio),rrmsn(mxio),
  17      *  bpncn(mxio),rpncn(mxio),
  18      *  rvar(mxang,maxres,mxch,mxio),ibank(mxio),is(mxio),
  19      *  avedif,difmin,ebmin,ebmax,ebmaxt,dele,difcut,cutdif,
  20      *  rmscut,pnccut,
  21      *  jbank(mxio),dij(mxio,mxio),ibmin,ibmax,
  22      *  nbank,ntbank,ntbankm,nconf,iuse,nstep,icycle,iseed,iref,
  23      *  nconf_in,ilastnstep,nadd
  24       common/bank_disulfid/ bvar_nss(mxio),bvar_ss(2,maxss,mxio),
  25      *                      bvar_ns(mxio),bvar_s(maxss,mxio)
  26       common/mvstat/ movenx(mxio),movernx(mxio),
  27      &    nstatnx(0:mxmv,3),nstatnx_tot(0:mxmv,3),indb(mxio,9),
  28      &    parent(3,mxio)
  29       common/send2/isend2(mxio),iff_in(maxres,mxio2),
  30      &               dihang_in2(mxang,maxres,mxch,mxio2),
  31      &               idata(5,mxio)