1 logical tree,plot_tree,lgrp,min_var
3 double precision totfree_gr
5 double precision enetb,entfac,totfree,energy,rmstb,gdt_ts_tb,
7 integer ncut,ngr,licz,nconf,iass,icc,mult,list_conf,
8 & nss_all,ihpb_all,jhpb_all,iass_tot,iscore,nprop,nclust
9 real*8 rmsave,rms_closest,gdt_ts_ave,gdt_ts_closest,
10 & gdt_ha_ave,gdt_ha_closest,tmscore_ave,tmscore_closest
11 common /clu/ diss(maxdist),energy(0:maxconf),
12 & enetb(max_ene,maxconf),ecut,
13 & entfac(maxconf),totfree(0:maxconf),totfree_gr(maxgr),
14 & rcutoff(max_cut+1),ncut,nclust,min_var,tree,plot_tree,lgrp
15 common /clu1/ ngr,licz(maxgr),nconf(maxgr,maxingr),iass(maxgr),
16 & iass_tot(maxgr,max_cut),list_conf(maxconf)
17 common /alles/ allcart(3,maxres2,maxconf),rmstb(maxconf),
18 & gdt_ts_tb(maxconf),gdt_ha_tb(maxconf),tmscore_tb(maxconf),
19 & rmsave(maxgr),rms_closest(maxgr),gdt_ts_ave(maxgr),
20 & gdt_ts_closest(maxgr),gdt_ha_ave(maxgr),gdt_ha_closest(maxgr),
21 & tmscore_ave(maxgr),tmscore_closest(maxgr),
23 & mult(maxres),nss_all(maxconf),ihpb_all(maxss,maxconf),
24 & jhpb_all(maxss,maxconf),iscore(maxconf),nprop