X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;ds=sidebyside;f=source%2Funres%2Fsrc-HCD-5D%2FCOMMON.BANK;h=2b9cff909b0167cc22c43277cebb24c3694d354b;hb=b8a8a950fcfe48a76002af386e3f4de3b510760c;hp=5b0fb348b93a9c332f01c512a426315795ae2485;hpb=020e579626d686ec20ecd9f0cc4c8313f474e152;p=unres.git diff --git a/source/unres/src-HCD-5D/COMMON.BANK b/source/unres/src-HCD-5D/COMMON.BANK index 5b0fb34..2b9cff9 100644 --- a/source/unres/src-HCD-5D/COMMON.BANK +++ b/source/unres/src-HCD-5D/COMMON.BANK @@ -1,9 +1,11 @@ - 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)