- real*8 dihang,etot,bvar,bene,rene,rvar,avedif,difmin,
- & ebmin,ebmax,ebmaxt,cutdif,dij,dihang_in
+ double precision dihang,etot,bvar,bene,rene,rvar,avedif,difmin,
+ & ebmin,ebmax,ebmaxt,cutdif,dij,dihang_in,difcut,dele,rmscut,
+ & pnccut,rmsn,pncn,brmsn,rrmsn,bpncn,rpncn,parent,dihang_in2
integer ibank,is,jbank,ibmin,ibmax,nbank,nconf,iuse,nstep,icycle,
& iseed,ntbank,ntbankm,iref,nconf_in,indb,ilastnstep,
- & bvar_nss,bvar_ss,bvar_ns,bvar_s,
- & nss_in,iss_in,jss_in,nadd
+ & bvar_nss,bvar_ss,bvar_ns,bvar_s,movenx,movernx,nstatnx,
+ & nstatnx_tot,nss_in,iss_in,jss_in,nadd,nss_out,iss_out,jss_out,
+ & isend2,iff_in,idata
common/varin/dihang_in(mxang,maxres,mxch,mxio),nss_in(mxio),
& iss_in(maxss,mxio),jss_in(maxss,mxio)
common/minvar/dihang(mxang,maxres,mxch,mxio),etot(mxio),rmsn(mxio)