X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Fmaxlik%2Fsrc_CSA%2FCOMMON.CALC-single;fp=source%2Fmaxlik%2Fsrc_CSA%2FCOMMON.CALC-single;h=0000000000000000000000000000000000000000;hp=34f332446570367db8843a6a148fafbe9a5e49b2;hb=af72f8e89a5d33f0d86ba898d6c5bbbda4b25b84;hpb=f9e536df1fd1627429123fe8990edfcdc2cc1a9a diff --git a/source/maxlik/src_CSA/COMMON.CALC-single b/source/maxlik/src_CSA/COMMON.CALC-single deleted file mode 100644 index 34f3324..0000000 --- a/source/maxlik/src_CSA/COMMON.CALC-single +++ /dev/null @@ -1,12 +0,0 @@ - integer nene,nT,nconf,iweight(maxene),mask(maxene), - & maskel(3*nnbase) - double precision enetb(maxene,maxconf), - & rmstab(maxconf), - & qtab(maxconf),rgytab(maxcon),wsq, - & entfac(maxconf),weight(maxene), - & temper(maxT),ft(2,maxT),sigma2,frac(maxT),heat(maxT) - double precision ener0(maxconf),ener(maxconf) - common/calc/enetb,sig0,rmstab,qtab,rgytab,entfac, - & ener0,ener,temper,weight,weightel,ft,sigma2,wsq,fave,frac,heat, - & iweight,mask,maskel,nT,nconf,nene -