704 |
|
|
705 |
void CaloLong::Clear(){ |
void CaloLong::Clear(){ |
706 |
// |
// |
707 |
|
if ( debug ) printf(" Clear called \n"); |
708 |
|
// |
709 |
memset(eplane,0, 2*22*sizeof(Float_t)); |
memset(eplane,0, 2*22*sizeof(Float_t)); |
710 |
// |
// |
711 |
chi2 = 0.; |
chi2 = 0.; |
858 |
// |
// |
859 |
// inclination factor (stolen from Daniele's code) |
// inclination factor (stolen from Daniele's code) |
860 |
// |
// |
861 |
Float_t ytgx = 0; |
Float_t ytgx = 0.; |
862 |
Float_t ytgy = 0; |
Float_t ytgy = 0.; |
863 |
ytgx = 0.76 * clp->tanx[0]; |
ytgx = 0.76 * clp->tanx[0]; |
864 |
ytgy = 0.76 * clp->tany[0]; |
ytgy = 0.76 * clp->tany[0]; |
865 |
X0pl = sqrt( pow(0.76,2.) + pow(ytgx,2.) + pow(ytgy,2.) ); |
X0pl = sqrt( pow(0.76,2.) + pow(ytgx,2.) + pow(ytgy,2.) ); |
953 |
}; |
}; |
954 |
}; |
}; |
955 |
// |
// |
956 |
|
if ( !clp && debug ) printf(" ERROR!! no CaloLevel2 obj!!\n"); |
957 |
|
// |
958 |
// inclination factor (stolen from Daniele's code) |
// inclination factor (stolen from Daniele's code) |
959 |
// |
// |
960 |
Float_t ytgx = 0; |
Float_t ytgx = 0.; |
961 |
Float_t ytgy = 0; |
Float_t ytgy = 0.; |
962 |
ytgx = 0.76 * clp->tanx[0]; |
ytgx = 0.76 * clp->tanx[0]; |
963 |
ytgy = 0.76 * clp->tany[0]; |
ytgy = 0.76 * clp->tany[0]; |
964 |
X0pl = sqrt( pow(0.76,2.) + pow(ytgx,2.) + pow(ytgy,2.) ); |
X0pl = sqrt( pow(0.76,2.) + pow(ytgx,2.) + pow(ytgy,2.) ); |
965 |
|
if ( debug ) printf(" X0pl %f tanx %f tany %f \n",X0pl,ytgx,ytgy); |
966 |
// |
// |
967 |
// Find experimental plane of maximum |
// Find experimental plane of maximum |
968 |
// |
// |
983 |
// |
// |
984 |
if ( vmax == 0 ) pmax++; |
if ( vmax == 0 ) pmax++; |
985 |
etmax = pmax * X0pl; |
etmax = pmax * X0pl; |
986 |
if ( letmax < 0. ) letmax = etmax; |
letmax = etmax; |
987 |
// |
// |
988 |
if ( debug ) this->Print(); |
if ( debug ) this->Print(); |
989 |
if ( debug ) printf(" exit \n"); |
if ( debug ) printf(" exit \n"); |
1168 |
if ( xpos > letmax && enemip > lmipth && heavytail) eyy[numpo] = (sqrt(enemip*3.)+sqrt(5.))/numpo; |
if ( xpos > letmax && enemip > lmipth && heavytail) eyy[numpo] = (sqrt(enemip*3.)+sqrt(5.))/numpo; |
1169 |
numpo++; |
numpo++; |
1170 |
// th->Fill(xpos,enemip); |
// th->Fill(xpos,enemip); |
1171 |
if ( debug ) printf(" AVE Filling: st %i xpos %f energy %f \n",st,xpos,enemip); |
if ( debug ) printf(" AVE Filling: st %i xpos %f energy %f error %f letmax %f lmpith %f \n",st,xpos,enemip,eyy[numpo-1],letmax,lmipth); |
1172 |
}; |
}; |
1173 |
} else { |
} else { |
1174 |
for (Int_t jj=0; jj<2; jj++){ |
for (Int_t jj=0; jj<2; jj++){ |
1239 |
TF1 *lfit = dynamic_cast<TF1*>(gDirectory->FindObject(fnam)); |
TF1 *lfit = dynamic_cast<TF1*>(gDirectory->FindObject(fnam)); |
1240 |
if ( lfit ) lfit->Delete(); |
if ( lfit ) lfit->Delete(); |
1241 |
lfit = new TF1(fnam,ccurve,0.,xmax,3); |
lfit = new TF1(fnam,ccurve,0.,xmax,3); |
1242 |
|
// if ( !lfit ){ |
1243 |
|
// lfit = new TF1(fnam,ccurve,0.,xmax,3); |
1244 |
|
// }; |
1245 |
|
// lfit->Clear(); |
1246 |
|
// lfit->SetName(fnam); |
1247 |
|
// lfit->SetRange(0.,xmax); |
1248 |
|
// lfit->Print(); |
1249 |
|
// |
1250 |
if ( debug ) printf("qtot %f qtotparz %f \n",clp->qtot,qtotparz); |
if ( debug ) printf("qtot %f qtotparz %f \n",clp->qtot,qtotparz); |
1251 |
E0 = qtotparz; |
E0 = qtotparz; |
1252 |
// E0 = clp->qtot; |
// E0 = clp->qtot; |
1270 |
if ( debug ) printf(" OK, start the fitting procedure... options: %s \n",optio.Data()); |
if ( debug ) printf(" OK, start the fitting procedure... options: %s \n",optio.Data()); |
1271 |
// |
// |
1272 |
// fitresult = th->Fit("lfit",optio); |
// fitresult = th->Fit("lfit",optio); |
1273 |
|
// lfit->Update(); |
1274 |
fitresult = gh->Fit("lfit",optio); |
fitresult = gh->Fit("lfit",optio); |
1275 |
|
// fitresult = gh->Fit("lfit","ROQW"); |
1276 |
// |
// |
1277 |
if ( debug ) printf(" the fit is done! result: %i \n",fitresult); |
if ( debug ) printf(" the fit is done! result: %i \n",fitresult); |
1278 |
// |
// |
1316 |
delete w; |
delete w; |
1317 |
delete xp; |
delete xp; |
1318 |
delete wp; |
delete wp; |
1319 |
|
delete xpp; |
1320 |
|
delete wpp; |
1321 |
// Float_t i10max = lfit->Integral(0.,10.*tmax); |
// Float_t i10max = lfit->Integral(0.,10.*tmax); |
1322 |
if ( debug ) printf(" Integral: %f \n",i10max); |
if ( debug ) printf(" Integral: %f \n",i10max); |
1323 |
// |
// |
1368 |
if ( th ) th->Delete(); |
if ( th ) th->Delete(); |
1369 |
}; |
}; |
1370 |
// |
// |
1371 |
|
// gMinuit->SetPrintLevel(1); |
1372 |
|
// gMinuit->mnamin(); |
1373 |
|
// // gMinuit->mnfree(0); |
1374 |
|
// gMinuit->mncler(); |
1375 |
|
// gMinuit->mnrset(1); |
1376 |
|
// gMinuit->Delete(); |
1377 |
|
//ROOT::Math::Minimizer::Clear(); |
1378 |
|
// gMinuit->mnhelp("*"); |
1379 |
|
// |
1380 |
// delete lfit; |
// delete lfit; |
1381 |
// |
// |
1382 |
}; |
}; |