c c RESULT OF HISTOGRAM FITTING c c Impact parameter and Z clusters: i=1,3 for adc distribution, c calibrated energy, and calibrated and hv corrected energy c In case of noise runs, the index i runs on particle type c c imp_clus_mean(i) c imp_clus_mean_err(i) c imp_clus_sig(i) c imp_clus_sig_err(i) c imp_clus_noent(i) c imp_clus_chi2(i) c z_clus_mean(i) c z_clus_mean_err(i) c z_clus_sig(i) c z_clus_sig_err(i) c z_clus_noent(i) c z_clus_chi2(i) c real imp_clus_mean(3),imp_clus_mean_err(3),imp_clus_sig(3), & imp_clus_sig_err(3),imp_clus_chi2(3) real z_clus_mean(3),z_clus_mean_err(3),z_clus_sig(3), & z_clus_sig_err(3),z_clus_chi2(3) integer imp_clus_noent(3) integer z_clus_noent(3) common /histfit/ imp_clus_mean, & imp_clus_mean_err, & imp_clus_sig, & imp_clus_sig_err, & imp_clus_noent, & imp_clus_chi2, & z_clus_mean, & z_clus_mean_err, & z_clus_sig, & z_clus_sig_err, & z_clus_noent, & z_clus_chi2