X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Fmaxlik%2Fsrc_CSA%2FCOMMON.CALC;fp=source%2Fmaxlik%2Fsrc_CSA%2FCOMMON.CALC;h=0000000000000000000000000000000000000000;hp=8efc9daf7fbf4e4ef99febc1b3c2401cbd4429fa;hb=af72f8e89a5d33f0d86ba898d6c5bbbda4b25b84;hpb=f9e536df1fd1627429123fe8990edfcdc2cc1a9a

diff --git a/source/maxlik/src_CSA/COMMON.CALC b/source/maxlik/src_CSA/COMMON.CALC
deleted file mode 100644
index 8efc9da..0000000
--- a/source/maxlik/src_CSA/COMMON.CALC
+++ /dev/null
@@ -1,14 +0,0 @@
-      integer nene,nT,nconf(maxprot),iweight(maxene),mask(maxene),
-     &  nprot
-      character*8 protname(maxprot)
-      double precision enetb(maxene,maxconf,maxprot),
-     &   rmstab(maxconf,maxprot),
-     &   qtab(maxconf,maxprot),rgytab(maxconf,maxprot),wsq,
-     &   entfac(maxconf,maxprot),weight(maxene),sig0,
-     &   temper(maxT),ft(2,maxT),sigma2,frac(maxT),heat(maxT),
-     &   sumlik(maxT,maxprot),rmsave(maxT,maxprot)
-      double precision ener0(maxconf,maxprot),ener(maxconf,maxprot)
-      common/calc/enetb,sig0,rmstab,qtab,rgytab,entfac,
-     &   ener0,ener,temper,weight,ft,sigma2,wsq,heat,
-     &   rmsave,sumlik,iweight,mask,nT,nconf,nene,nprot
-      common /names/ protname