/*
$Log$
+Revision 1.19.2.4 2000/06/26 07:39:42 kowal2
+Changes to obey the coding rules
+
+Revision 1.19.2.3 2000/06/25 08:38:41 kowal2
+Splitted from AliTPCtracking
+
+Revision 1.19.2.2 2000/06/16 12:59:28 kowal2
+Changed parameter settings
+
+Revision 1.19.2.1 2000/06/09 07:15:07 kowal2
+
+Defaults loaded automatically (hard-wired)
+Optional parameters can be set via macro called in the constructor
+
+Revision 1.19 2000/04/18 19:00:59 fca
+Small bug fixes to TPC files
+
+Revision 1.18 2000/04/17 09:37:33 kowal2
+removed obsolete AliTPCDigitsDisplay.C
+
Revision 1.17.2.2 2000/04/10 08:15:12 kowal2
New, experimental data structure from M. Ivanov
// //
///////////////////////////////////////////////////////////////////////////////
+//
+
#include <TMath.h>
#include <TRandom.h>
#include <TVector.h>
#include <TObjectTable.h>
#include "TParticle.h"
#include "AliTPC.h"
+#include <TFile.h>
#include "AliRun.h"
#include <iostream.h>
#include <fstream.h>
#include "AliMC.h"
-#include "AliTPCParam.h"
+#include "AliTPCParamSR.h"
#include "AliTPCPRF2D.h"
#include "AliTPCRF1D.h"
#include "AliDigits.h"
#include "AliTPCClustersRow.h"
#include "AliTPCClustersArray.h"
+#include "AliTPCcluster.h"
+#include "AliTPCclusterer.h"
+#include "AliTPCtracker.h"
+#include <TInterpreter.h>
ClassImp(AliTPC)
// Default constructor
//
fIshunt = 0;
- fClusters = 0;
fHits = 0;
fDigits = 0;
- fTracks = 0;
fNsectors = 0;
- fNtracks = 0;
- fNclusters= 0;
//MI changes
fDigitsArray = 0;
fClustersArray = 0;
- fTPCParam = 0;
+ fTPCParam=0;
}
//_____________________________________________________________________________
//
// Initialise arrays of hits and digits
fHits = new TClonesArray("AliTPChit", 176);
+ gAlice->AddHitList(fHits);
//MI change
fDigitsArray = 0;
fClustersArray= 0;
- fTPCParam = 0;
//
// Initialise counters
- fClusters = 0;
- fTracks = 0;
fNsectors = 0;
- fNtracks = 0;
- fNclusters= 0;
//
fIshunt = 0;
//
// Initialise color attributes
SetMarkerColor(kYellow);
+
+ //
+ // Set TPC parameters
+ //
+
+ if (!strcmp(title,"Default")) {
+ fTPCParam = new AliTPCParamSR;
+ } else {
+ cerr<<"AliTPC warning: in Config.C you must set non-default parameters\n";
+ fTPCParam=0;
+ }
+
}
//_____________________________________________________________________________
//
// TPC destructor
//
+
fIshunt = 0;
delete fHits;
delete fDigits;
- delete fClusters;
- delete fTracks;
- if (fDigitsArray!=0) delete fDigitsArray;
- if (fClustersArray!=0) delete fClustersArray;
-
- if (fTPCParam) delete fTPCParam;
+ delete fTPCParam;
}
-//_____________________________________________________________________________
-void AliTPC::AddCluster(Float_t *hits, Int_t *tracks)
-{
- //
- // Add a simulated cluster to the list
- //
- if(!fClusters) fClusters=new TClonesArray("AliTPCcluster",10000);
- TClonesArray &lclusters = *fClusters;
- new(lclusters[fNclusters++]) AliTPCcluster(hits,tracks);
-}
-
-//_____________________________________________________________________________
-void AliTPC::AddCluster(const AliTPCcluster &c)
-{
- //
- // Add a simulated cluster copy to the list
- //
- if(!fClusters) fClusters=new TClonesArray("AliTPCcluster",900000);
- TClonesArray &lclusters = *fClusters;
- new(lclusters[fNclusters++]) AliTPCcluster(c);
-}
-
//_____________________________________________________________________________
void AliTPC::AddHit(Int_t track, Int_t *vol, Float_t *hits)
{
new(lhits[fNhits++]) AliTPChit(fIshunt,track,vol,hits);
}
-//_____________________________________________________________________________
-void AliTPC::AddTrack(Float_t *hits)
-{
- //
- // Add a track to the list of tracks
- //
- TClonesArray <racks = *fTracks;
- new(ltracks[fNtracks++]) AliTPCtrack(hits);
-}
-
-//_____________________________________________________________________________
-void AliTPC::AddTrack(const AliTPCtrack& t)
-{
- //
- // Add a track copy to the list of tracks
- //
- if(!fTracks) fTracks=new TClonesArray("AliTPCtrack",10000);
- TClonesArray <racks = *fTracks;
- new(ltracks[fNtracks++]) AliTPCtrack(t);
-}
-
//_____________________________________________________________________________
void AliTPC::BuildGeometry()
{
//
// Build TPC ROOT TNode geometry for the event display
//
- TNode *Node, *Top;
+ TNode *nNode, *nTop;
TTUBS *tubs;
Int_t i;
const int kColorTPC=19;
const Double_t kRaddeg=180./TMath::Pi();
- Float_t InnerOpenAngle = fTPCParam->GetInnerAngle();
- Float_t OuterOpenAngle = fTPCParam->GetOuterAngle();
+ Float_t innerOpenAngle = fTPCParam->GetInnerAngle();
+ Float_t outerOpenAngle = fTPCParam->GetOuterAngle();
- Float_t InnerAngleShift = fTPCParam->GetInnerAngleShift();
- Float_t OuterAngleShift = fTPCParam->GetOuterAngleShift();
+ Float_t innerAngleShift = fTPCParam->GetInnerAngleShift();
+ Float_t outerAngleShift = fTPCParam->GetOuterAngleShift();
Int_t nLo = fTPCParam->GetNInnerSector()/2;
Int_t nHi = fTPCParam->GetNOuterSector()/2;
- const Double_t loAng = (Double_t)TMath::Nint(InnerOpenAngle*kRaddeg);
- const Double_t hiAng = (Double_t)TMath::Nint(OuterOpenAngle*kRaddeg);
- const Double_t loAngSh = (Double_t)TMath::Nint(InnerAngleShift*kRaddeg);
- const Double_t hiAngSh = (Double_t)TMath::Nint(OuterAngleShift*kRaddeg);
+ const Double_t kloAng = (Double_t)TMath::Nint(innerOpenAngle*kRaddeg);
+ const Double_t khiAng = (Double_t)TMath::Nint(outerOpenAngle*kRaddeg);
+ const Double_t kloAngSh = (Double_t)TMath::Nint(innerAngleShift*kRaddeg);
+ const Double_t khiAngSh = (Double_t)TMath::Nint(outerAngleShift*kRaddeg);
- const Double_t loCorr = 1/TMath::Cos(0.5*loAng*kDegrad);
- const Double_t hiCorr = 1/TMath::Cos(0.5*hiAng*kDegrad);
+ const Double_t kloCorr = 1/TMath::Cos(0.5*kloAng*kDegrad);
+ const Double_t khiCorr = 1/TMath::Cos(0.5*khiAng*kDegrad);
Double_t rl,ru;
// Get ALICE top node
//
- Top=gAlice->GetGeometry()->GetNode("alice");
+ nTop=gAlice->GetGeometry()->GetNode("alice");
// inner sectors
sprintf(title,"TPC low sector %3d",i);
title[24]='\0';
- tubs = new TTUBS(name,title,"void",rl*loCorr,ru*loCorr,250.,
- loAng*(i-0.5)+loAngSh,loAng*(i+0.5)+loAngSh);
+ tubs = new TTUBS(name,title,"void",rl*kloCorr,ru*kloCorr,250.,
+ kloAng*(i-0.5)+kloAngSh,kloAng*(i+0.5)+kloAngSh);
tubs->SetNumberOfDivisions(1);
- Top->cd();
- Node = new TNode(name,title,name,0,0,0,"");
- Node->SetLineColor(kColorTPC);
- fNodes->Add(Node);
+ nTop->cd();
+ nNode = new TNode(name,title,name,0,0,0,"");
+ nNode->SetLineColor(kColorTPC);
+ fNodes->Add(nNode);
}
// Outer sectors
name[4]='\0';
sprintf(title,"TPC upper sector %d",i);
title[24]='\0';
- tubs = new TTUBS(name,title,"void",rl*hiCorr,ru*hiCorr,250,
- hiAng*(i-0.5)+hiAngSh,hiAng*(i+0.5)+hiAngSh);
+ tubs = new TTUBS(name,title,"void",rl*khiCorr,ru*khiCorr,250,
+ khiAng*(i-0.5)+khiAngSh,khiAng*(i+0.5)+khiAngSh);
tubs->SetNumberOfDivisions(1);
- Top->cd();
- Node = new TNode(name,title,name,0,0,0,"");
- Node->SetLineColor(kColorTPC);
- fNodes->Add(Node);
+ nTop->cd();
+ nNode = new TNode(name,title,name,0,0,0,"");
+ nNode->SetLineColor(kColorTPC);
+ fNodes->Add(nNode);
}
-
-}
-
-
+}
//_____________________________________________________________________________
Int_t AliTPC::DistancetoPrimitive(Int_t , Int_t )
return 9999;
}
-//_____________________________________________________________________________
-static Double_t SigmaY2(Double_t r, Double_t tgl, Double_t pt)
-{
- //
- // Parametrised error of the cluster reconstruction (pad direction)
- //
- pt=TMath::Abs(pt)*1000.;
- Double_t x=r/pt;
- tgl=TMath::Abs(tgl);
- Double_t s=a_rphi - b_rphi*r*tgl + c_rphi*x*x + d_rphi*x;
- if (s<0.4e-3) s=0.4e-3;
- s*=1.3; //Iouri Belikov
- return s;
-}
-
-//_____________________________________________________________________________
-static Double_t SigmaZ2(Double_t r, Double_t tgl)
-{
- //
- // Parametrised error of the cluster reconstruction (drift direction)
- //
- tgl=TMath::Abs(tgl);
- Double_t s=a_z - b_z*r*tgl + c_z*tgl*tgl;
- if (s<0.4e-3) s=0.4e-3;
- s*=1.3; //Iouri Belikov
- return s;
-}
-
-//_____________________________________________________________________________
-inline Double_t f1(Double_t x1,Double_t y1,
- Double_t x2,Double_t y2,
- Double_t x3,Double_t y3)
-{
- //-----------------------------------------------------------------
- // Initial approximation of the track curvature
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- Double_t d=(x2-x1)*(y3-y2)-(x3-x2)*(y2-y1);
- Double_t a=0.5*((y3-y2)*(y2*y2-y1*y1+x2*x2-x1*x1)-
- (y2-y1)*(y3*y3-y2*y2+x3*x3-x2*x2));
- Double_t b=0.5*((x2-x1)*(y3*y3-y2*y2+x3*x3-x2*x2)-
- (x3-x2)*(y2*y2-y1*y1+x2*x2-x1*x1));
-
- Double_t xr=TMath::Abs(d/(d*x1-a)), yr=d/(d*y1-b);
-
- return -xr*yr/sqrt(xr*xr+yr*yr);
-}
-
-
-//_____________________________________________________________________________
-inline Double_t f2(Double_t x1,Double_t y1,
- Double_t x2,Double_t y2,
- Double_t x3,Double_t y3)
-{
- //-----------------------------------------------------------------
- // Initial approximation of the track curvature times center of curvature
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- Double_t d=(x2-x1)*(y3-y2)-(x3-x2)*(y2-y1);
- Double_t a=0.5*((y3-y2)*(y2*y2-y1*y1+x2*x2-x1*x1)-
- (y2-y1)*(y3*y3-y2*y2+x3*x3-x2*x2));
- Double_t b=0.5*((x2-x1)*(y3*y3-y2*y2+x3*x3-x2*x2)-
- (x3-x2)*(y2*y2-y1*y1+x2*x2-x1*x1));
-
- Double_t xr=TMath::Abs(d/(d*x1-a)), yr=d/(d*y1-b);
-
- return -a/(d*y1-b)*xr/sqrt(xr*xr+yr*yr);
-}
-
-//_____________________________________________________________________________
-inline Double_t f3(Double_t x1,Double_t y1,
- Double_t x2,Double_t y2,
- Double_t z1,Double_t z2)
-{
- //-----------------------------------------------------------------
- // Initial approximation of the tangent of the track dip angle
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- return (z1 - z2)/sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));
-}
-
-//_____________________________________________________________________________
-static Int_t FindProlongation(AliTPCtrack& t, const AliTPCSector *sec,
- Int_t s, Int_t rf=0)
-{
- //-----------------------------------------------------------------
- // This function tries to find a track prolongation.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- const Int_t ROWS_TO_SKIP=(t<10) ? 10 : Int_t(0.5*sec->GetNRows());
- const Float_t MAX_CHI2=12.;
- Int_t try_again=ROWS_TO_SKIP;
- Double_t alpha=sec->GetAlpha();
- Int_t ns=Int_t(2*TMath::Pi()/alpha+0.5);
-
- for (Int_t nr=sec->GetRowNumber(t.GetX())-1; nr>=rf; nr--) {
- Double_t x=sec->GetX(nr), ymax=sec->GetMaxY(nr);
- if (!t.PropagateTo(x)) return 0;
-
- AliTPCcluster *cl=0;
- Double_t max_chi2=MAX_CHI2;
- const AliTPCRow& row=sec[s][nr];
- Double_t sy2=SigmaY2(t.GetX(),t.GetTgl(),t.GetPt());
- Double_t sz2=SigmaZ2(t.GetX(),t.GetTgl());
- Double_t road=5.*sqrt(t.GetSigmaY2() + sy2), y=t.GetY(), z=t.GetZ();
-
- if (road>30) {
- if (t>4) cerr<<t<<" FindProlongation warning: Too broad road !\n";
- return 0;
- }
-
- if (row) {
- for (Int_t i=row.Find(y-road); i<row; i++) {
- AliTPCcluster* c=(AliTPCcluster*)(row[i]);
- if (c->fY > y+road) break;
- if (c->IsUsed()) continue;
- if ((c->fZ - z)*(c->fZ - z) > 25.*(t.GetSigmaZ2() + sz2)) continue;
- Double_t chi2=t.GetPredictedChi2(c);
- if (chi2 > max_chi2) continue;
- max_chi2=chi2;
- cl=c;
- }
- }
- if (cl) {
- t.Update(cl,max_chi2);
- cl->fdEdX=sec->GetPadPitchWidth()*TMath::Sqrt((1+t.GetTgl()*t.GetTgl())/
- (1-(t.GetC()*x-t.GetEta())*(t.GetC()*x-t.GetEta())));
- try_again=ROWS_TO_SKIP;
- } else {
- if (try_again==0) break;
- if (y > ymax) {
- s = (s+1) % ns;
- if (!t.Rotate(alpha)) return 0;
- } else if (y <-ymax) {
- s = (s-1+ns) % ns;
- if (!t.Rotate(-alpha)) return 0;
- }
- try_again--;
- }
- }
-
- return 1;
-
-}
-
-
-//_____________________________________________________________________________
-static void MakeSeeds(TObjArray& seeds,const AliTPCSector *sec, Int_t max_sec,
-Int_t i1, Int_t i2)
-{
- //-----------------------------------------------------------------
- // This function creates track seeds.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- TMatrix C(5,5); TVector x(5);
- Double_t alpha=sec->GetAlpha(), shift=sec->GetAlphaShift();
- Double_t cs=cos(alpha), sn=sin(alpha);
- for (Int_t ns=0; ns<max_sec; ns++) {
- Int_t nl=sec[(ns-1+max_sec)%max_sec][i2];
- Int_t nm=sec[ns][i2];
- Int_t nu=sec[(ns+1)%max_sec][i2];
- const AliTPCRow& r1=sec[ns][i1];
- for (Int_t is=0; is < r1; is++) {
- Double_t x1=sec->GetX(i1), y1=r1[is]->fY, z1=r1[is]->fZ;
- for (Int_t js=0; js < nl+nm+nu; js++) {
- const AliTPCcluster *cl;
- Int_t ks;
- Double_t x2=sec->GetX(i2), y2, z2, tmp;
-
- if (js<nl) {
- ks=(ns-1+max_sec)%max_sec;
- const AliTPCRow& r2=sec[(ns-1+max_sec)%max_sec][i2];
- cl=r2[js];
- y2=cl->fY; z2=cl->fZ;
- tmp= x2*cs+y2*sn;
- y2 =-x2*sn+y2*cs; x2=tmp;
- } else
- if (js<nl+nm) {
- ks=ns;
- const AliTPCRow& r2=sec[ns][i2];
- cl=r2[js-nl];
- y2=cl->fY; z2=cl->fZ;
- } else {
- ks=(ns+1)%max_sec;
- const AliTPCRow& r2=sec[(ns+1)%max_sec][i2];
- cl=r2[js-nl-nm];
- y2=cl->fY; z2=cl->fZ;
- tmp=x2*cs-y2*sn;
- y2 =x2*sn+y2*cs; x2=tmp;
- }
-
- Double_t zz=z1 - z1/x1*(x1-x2);
- if (TMath::Abs(zz-z2)>5) continue;
-
- Double_t d=(x2-x1)*(0.-y2)-(0.-x2)*(y2-y1);
- if (d==0.) {cerr<<"MakeSeeds warning: Straight seed !\n"; continue;}
-
- Double_t x3=0., y3=0.;//gRandom->Gaus(0.,TMath::Sqrt(cl->fSigmaY2));
-
- x(0)=y1;
- x(1)=z1;
- x(2)=f1(x1,y1,x2,y2,x3,y3);
- x(3)=f2(x1,y1,x2,y2,x3,y3);
- x(4)=f3(x1,y1,x2,y2,z1,z2);
-
- if (TMath::Abs(x(2)*x1-x(3)) >= 0.999) continue;
-
- if (TMath::Abs(x(4)) > 1.2) continue;
-
- Double_t a=asin(x(3));
- Double_t zv=z1 - x(4)/x(2)*(a+asin(x(2)*x1-x(3)));
- if (TMath::Abs(zv)>10.) continue;
-
- TMatrix X(6,6); X=0.;
- X(0,0)=r1[is]->fSigmaY2; X(1,1)=r1[is]->fSigmaZ2;
- X(2,2)=cl->fSigmaY2; X(3,3)=cl->fSigmaZ2;
- X(4,4)=cl->fSigmaY2; X(5,5)=cl->fSigmaZ2;
- //X(4,4)=3./12.; X(5,5)=3./12.;
- TMatrix F(5,6); F.UnitMatrix();
- Double_t sy=sqrt(X(0,0)), sz=sqrt(X(1,1));
- F(2,0)=(f1(x1,y1+sy,x2,y2,x3,y3)-x(2))/sy;
- F(2,2)=(f1(x1,y1,x2,y2+sy,x3,y3)-x(2))/sy;
- F(2,4)=(f1(x1,y1,x2,y2,x3,y3+sy)-x(2))/sy;
- F(3,0)=(f2(x1,y1+sy,x2,y2,x3,y3)-x(3))/sy;
- F(3,2)=(f2(x1,y1,x2,y2+sy,x3,y3)-x(3))/sy;
- F(3,4)=(f2(x1,y1,x2,y2,x3,y3+sy)-x(3))/sy;
- F(4,0)=(f3(x1,y1+sy,x2,y2,z1,z2)-x(4))/sy;
- F(4,1)=(f3(x1,y1,x2,y2,z1+sz,z2)-x(4))/sz;
- F(4,2)=(f3(x1,y1,x2,y2+sy,z1,z2)-x(4))/sy;
- F(4,3)=(f3(x1,y1,x2,y2,z1,z2+sz)-x(4))/sz;
- F(4,4)=0;
- F(3,3)=0;
-
- TMatrix t(F,TMatrix::kMult,X);
- C.Mult(t,TMatrix(TMatrix::kTransposed,F));
-
- AliTPCtrack *track=new AliTPCtrack(r1[is], x, C, x1, ns*alpha+shift);
- Int_t rc=FindProlongation(*track,sec,ns,i2);
- if (rc<0 || *track<(i1-i2)/2) delete track;
- else seeds.AddLast(track);
- }
- }
- }
-}
-
-//_____________________________________________________________________________
-AliTPCParam *AliTPCSector::param;
-void AliTPC::Clusters2Tracks()
-{
+void AliTPC::Clusters2Tracks(TFile *of) {
//-----------------------------------------------------------------
// This is a track finder.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
//-----------------------------------------------------------------
- if (!fClusters) return;
-
- AliTPCParam *p=fTPCParam;
- AliTPCSector::SetParam(p);
-
- const Int_t nis=p->GetNInnerSector()/2;
- AliTPCSSector *ssec=new AliTPCSSector[nis];
- Int_t nrow_low=ssec->GetNRows();
-
- const Int_t nos=p->GetNOuterSector()/2;
- AliTPCLSector *lsec=new AliTPCLSector[nos];
- Int_t nrow_up=lsec->GetNRows();
-
- Int_t ncl=fClusters->GetEntriesFast();
- while (ncl--) {
- AliTPCcluster *c=(AliTPCcluster*)fClusters->UncheckedAt(ncl);
- Int_t sec=c->fSector, row=c->fPadRow;
-
- if (sec<nis*2) {
- ssec[sec%nis][row].InsertCluster(c);
- } else {
- sec -= nis*2;
- lsec[sec%nos][row].InsertCluster(c);
- }
- }
-
- TObjArray seeds(20000);
-
- Int_t nrows=nrow_low+nrow_up;
- Int_t gap=Int_t(0.125*nrows), shift=Int_t(0.5*gap);
- MakeSeeds(seeds, lsec, nos, nrow_up-1, nrow_up-1-gap);
- MakeSeeds(seeds, lsec, nos, nrow_up-1-shift, nrow_up-1-shift-gap);
-
- seeds.Sort();
-
- Int_t found=0;
- Int_t nseed=seeds.GetEntriesFast();
-
- for (Int_t s=0; s<nseed; s++) {
- AliTPCtrack *pt=(AliTPCtrack*)seeds.UncheckedAt(s), &t=*pt;
- Double_t alpha=t.GetAlpha();
- if (alpha > 2.*TMath::Pi()) alpha -= 2.*TMath::Pi();
- if (alpha < 0. ) alpha += 2.*TMath::Pi();
- Int_t ns=Int_t(alpha/lsec->GetAlpha())%nos;
-
- if (!FindProlongation(t,lsec,ns)) continue;
-
- alpha=t.GetAlpha() + 0.5*ssec->GetAlpha() - ssec->GetAlphaShift();
- if (alpha > 2.*TMath::Pi()) alpha -= 2.*TMath::Pi();
- if (alpha < 0. ) alpha += 2.*TMath::Pi();
- ns=Int_t(alpha/ssec->GetAlpha())%nis; //index of the inner sector needed
-
- alpha=ns*ssec->GetAlpha() - t.GetAlpha();
- if (!t.Rotate(alpha)) continue;
-
- if (!FindProlongation(t,ssec,ns)) continue;
-
- if (t >= Int_t(0.4*nrows)) {
- AddTrack(t);
- t.UseClusters();
- cerr<<found++<<'\r';
- }
- delete pt;
- }
-
- delete[] ssec;
- delete[] lsec;
-
+ AliTPCtracker::Clusters2Tracks(fTPCParam,of);
}
//_____________________________________________________________________________
void AliTPC::CreateMaterials()
{
//-----------------------------------------------
- // Create Materials for for TPC
+ // Create Materials for for TPC simulations
//-----------------------------------------------
//-----------------------------------------------------------------
// Origin: Marek Kowalski IFJ, Krakow, Marek.Kowalski@ifj.edu.pl
//-----------------------------------------------------------------
- Int_t ISXFLD=gAlice->Field()->Integ();
- Float_t SXMGMX=gAlice->Field()->Max();
+ Int_t iSXFLD=gAlice->Field()->Integ();
+ Float_t sXMGMX=gAlice->Field()->Max();
Float_t amat[5]; // atomic numbers
Float_t zmat[5]; // z
Float_t wmat[5]; // proportions
Float_t density;
+ Float_t apure[2];
- // ********************* Gases *******************
- //--------------------------------------------------------------
+ //***************** Gases *************************
+
+ //-------------------------------------------------
// pure gases
- //--------------------------------------------------------------
+ //-------------------------------------------------
- // Ne
+ // Neon
- Float_t a_ne = 20.18;
- Float_t z_ne = 10.;
-
+ amat[0]= 20.18;
+ zmat[0]= 10.;
density = 0.0009;
+
+ apure[0]=amat[0];
- AliMaterial(20,"Ne",a_ne,z_ne,density,999.,999.);
+ AliMaterial(20,"Ne",amat[0],zmat[0],density,999.,999.);
- // Ar
+ // Argon
- Float_t a_ar = 39.948;
- Float_t z_ar = 18.;
+ amat[0]= 39.948;
+ zmat[0]= 18.;
+ density = 0.001782;
- density = 0.001782;
-
- AliMaterial(21,"Ar",a_ar,z_ar,density,999.,999.);
+ apure[1]=amat[0];
- Float_t a_pure[2];
-
- a_pure[0] = a_ne;
- a_pure[1] = a_ar;
-
+ AliMaterial(21,"Ar",amat[0],zmat[0],density,999.,999.);
+
//--------------------------------------------------------------
// gases - compounds
Float_t amol[3];
- // CO2
+ // CO2
amat[0]=12.011;
amat[1]=15.9994;
amol[0] = amat[0]*wmat[0]+amat[1]*wmat[1];
AliMixture(10,"CO2",amat,zmat,density,-2,wmat);
-
+
// CF4
amat[0]=12.011;
AliMixture(11,"CF4",amat,zmat,density,-2,wmat);
+
// CH4
amat[0]=12.011;
//----------------------------------------------------------------
// gases - mixtures, ID >= 20 pure gases, <= 10 ID < 20 -compounds
//----------------------------------------------------------------
-
- char namate[21];
-
+
+ char namate[21];
density = 0.;
Float_t am=0;
Int_t nc;
-
- Float_t a,z,rho,absl,X0,buf[1];
+ Float_t rho,absl,X0,buf[1];
Int_t nbuf;
+ Float_t a,z;
for(nc = 0;nc<fNoComp;nc++)
{
Int_t nnc = (fMixtComp[nc]>=20) ? fMixtComp[nc]%20 : fMixtComp[nc]%10;
- am += fMixtProp[nc]*((fMixtComp[nc]>=20) ? a_pure[nnc] : amol[nnc]);
+ am += fMixtProp[nc]*((fMixtComp[nc]>=20) ? apure[nnc] : amol[nnc]);
density += fMixtProp[nc]*rho; // density of the mixture
}
Int_t nnc = (fMixtComp[nc]>=20) ? fMixtComp[nc]%20 : fMixtComp[nc]%10;
- wmat[nc] = fMixtProp[nc]*((fMixtComp[nc]>=20) ? a_pure[nnc] : amol[nnc])/am;
+ wmat[nc] = fMixtProp[nc]*((fMixtComp[nc]>=20) ?
+ apure[nnc] : amol[nnc])/am;
+
+ }
+
+ // Drift gases 1 - nonsensitive, 2 - sensitive
- }
-
AliMixture(31,"Drift gas 1",amat,zmat,density,fNoComp,wmat);
AliMixture(32,"Drift gas 2",amat,zmat,density,fNoComp,wmat);
- AliMixture(33,"Drift gas 3",amat,zmat,density,fNoComp,wmat);
- AliMedium(2, "Drift gas 1", 31, 0, ISXFLD, SXMGMX, 10., 999.,.1, .001, .001);
- AliMedium(3, "Drift gas 2", 32, 0, ISXFLD, SXMGMX, 10., 999.,.1, .001, .001);
- AliMedium(4, "Drift gas 3", 33, 1, ISXFLD, SXMGMX, 10., 999.,.1, .001, .001);
- // Air
+ // Air
+
+ amat[0] = 14.61;
+ zmat[0] = 7.3;
+ density = 0.001205;
- AliMaterial(24, "Air", 14.61, 7.3, .001205, 30420., 67500.);
+ AliMaterial(24,"Air",amat[0],zmat[0],density,999.,999.);
- AliMedium(24, "Air", 24, 0, ISXFLD, SXMGMX, 10., .1, .1, .1, .1);
//----------------------------------------------------------------------
// solid materials
//----------------------------------------------------------------------
- // Al
- AliMaterial(30, "Al", 26.98, 13., 2.7, 8.9, 37.2);
+ // Kevlar C14H22O2N2
- AliMedium(0, "Al",30, 0, ISXFLD, SXMGMX, 10., .1, .1, .1, .1);
+ amat[0] = 12.011;
+ amat[1] = 1.;
+ amat[2] = 15.999;
+ amat[3] = 14.006;
- // Si
+ zmat[0] = 6.;
+ zmat[1] = 1.;
+ zmat[2] = 8.;
+ zmat[3] = 7.;
+
+ wmat[0] = 14.;
+ wmat[1] = 22.;
+ wmat[2] = 2.;
+ wmat[3] = 2.;
+
+ density = 1.45;
- AliMaterial(31, "Si", 28.086, 14.,2.33, 9.36, 999.);
+ AliMixture(34,"Kevlar",amat,zmat,density,-4,wmat);
- AliMedium(7, "Al",31, 0, ISXFLD, SXMGMX, 10., .1, .1, .1, .1);
+ // NOMEX
+
+ amat[0] = 12.011;
+ amat[1] = 1.;
+ amat[2] = 15.999;
+ amat[3] = 14.006;
+
+ zmat[0] = 6.;
+ zmat[1] = 1.;
+ zmat[2] = 8.;
+ zmat[3] = 7.;
+
+ wmat[0] = 14.;
+ wmat[1] = 22.;
+ wmat[2] = 2.;
+ wmat[3] = 2.;
+
+ density = 0.03;
+
+
+ AliMixture(35,"NOMEX",amat,zmat,density,-4,wmat);
+
+ // Makrolon C16H18O3
+
+ amat[0] = 12.011;
+ amat[1] = 1.;
+ amat[2] = 15.999;
+
+ zmat[0] = 6.;
+ zmat[1] = 1.;
+ zmat[2] = 8.;
+
+ wmat[0] = 16.;
+ wmat[1] = 18.;
+ wmat[2] = 3.;
+ density = 1.2;
+ AliMixture(36,"Makrolon",amat,zmat,density,-3,wmat);
+
// Mylar C5H4O2
amat[0]=12.011;
density = 1.39;
- AliMixture(32, "Mylar",amat,zmat,density,-3,wmat);
-
- AliMedium(5, "Mylar",32, 0, ISXFLD, SXMGMX, 10., .1, .1, .001, .01);
-
-
+ AliMixture(37, "Mylar",amat,zmat,density,-3,wmat);
-
- // Carbon (normal)
-
- AliMaterial(33,"C normal",12.011,6.,2.265,18.8,999.);
-
- AliMedium(6,"C normal",33,0, ISXFLD, SXMGMX, 10., .1, .1, .001, .01);
-
- // G10 for inner and outr field cage
- // G10 is 60% SiO2 + 40% epoxy, right now I use A and Z for SiO2
-
- Float_t rhoFactor;
+ // G10 60% SiO2 + 40% epoxy, I use A and Z for SiO2
amat[0]=28.086;
amat[1]=15.9994;
wmat[1]=2.;
density = 1.7;
-
- AliMixture(34,"G10 aux.",amat,zmat,density,-2,wmat);
+ AliMixture(38,"SiO2",amat,zmat,2.2,-2,wmat); //SiO2 - quartz
+
+ gMC->Gfmate((*fIdmate)[38],namate,amat[0],zmat[0],rho,X0,absl,buf,nbuf);
+ AliMaterial(39,"G10",amat[0],zmat[0],density,999.,999.);
- gMC->Gfmate((*fIdmate)[34],namate,a,z,rho,X0,absl,buf,nbuf);
+ // Al
- Float_t thickX0 = 0.0052; // field cage in X0 units
-
- Float_t thick = 2.; // in cm
+ amat[0] = 26.98;
+ zmat[0] = 13.;
- X0=19.4; // G10
+ density = 2.7;
- rhoFactor = X0*thickX0/thick;
- density = rho*rhoFactor;
+ AliMaterial(40,"Al",amat[0],zmat[0],density,999.,999.);
- AliMaterial(35,"G10-fc",a,z,density,999.,999.);
+ // Si
- AliMedium(8,"G10-fc",35,0, ISXFLD, SXMGMX, 10., .1, .1, .001, .01);
+ amat[0] = 28.086;
+ zmat[0] = 14.,
- thickX0 = 0.0027; // inner vessel (eta <0.9)
- thick=0.5;
- rhoFactor = X0*thickX0/thick;
- density = rho*rhoFactor;
+ density = 2.33;
- AliMaterial(36,"G10-iv",a,z,density,999.,999.);
+ AliMaterial(41,"Si",amat[0],zmat[0],density,999.,999.);
- AliMedium(9,"G10-iv",36,0, ISXFLD, SXMGMX, 10., .1, .1, .001, .01);
+ // Cu
- // Carbon fibre
-
- gMC->Gfmate((*fIdmate)[33],namate,a,z,rho,X0,absl,buf,nbuf);
+ amat[0] = 63.546;
+ zmat[0] = 29.;
- thickX0 = 0.0133; // outer vessel
- thick=3.0;
- rhoFactor = X0*thickX0/thick;
- density = rho*rhoFactor;
+ density = 8.96;
+ AliMaterial(42,"Cu",amat[0],zmat[0],density,999.,999.);
- AliMaterial(37,"C-ov",a,z,density,999.,999.);
+ // Tedlar C2H3F
- AliMedium(10,"C-ov",37,0, ISXFLD, SXMGMX, 10., .1, .1, .001, .01);
+ amat[0] = 12.011;
+ amat[1] = 1.;
+ amat[2] = 18.998;
- thickX0=0.015; // inner vessel (cone, eta > 0.9)
- thick=1.5;
- rhoFactor = X0*thickX0/thick;
- density = rho*rhoFactor;
+ zmat[0] = 6.;
+ zmat[1] = 1.;
+ zmat[2] = 9.;
- AliMaterial(38,"C-ivc",a,z,density,999.,999.);
+ wmat[0] = 2.;
+ wmat[1] = 3.;
+ wmat[2] = 1.;
- AliMedium(11,"C-ivc",38,0, ISXFLD, SXMGMX, 10., .1, .1, .001, .01);
+ density = 1.71;
- //
+ AliMixture(43, "Tedlar",amat,zmat,density,-3,wmat);
- AliMedium(12,"CO2",10,0, ISXFLD, SXMGMX, 10., 999.,.1, .001, .001);
-
-}
-//_____________________________________________________________________________
-struct Bin {
- UShort_t q;
- UInt_t mask;
- Bin();
-};
-Bin::Bin() {q=0; mask=0xFFFFFFFE;}
-
-struct Peak {
- Int_t k;
- UInt_t mask;
-};
-inline Bool_t IsMaximum(Int_t k, Int_t max, const Bin *bins) {
- UShort_t q=bins[k].q;
- if (q==1023) return kFALSE;
- if (bins[k-max].q > q) return kFALSE;
- if (bins[k-1 ].q > q) return kFALSE;
- if (bins[k+max].q > q) return kFALSE;
- if (bins[k+1 ].q > q) return kFALSE;
- if (bins[k-max-1].q > q) return kFALSE;
- if (bins[k+max-1].q > q) return kFALSE;
- if (bins[k+max+1].q > q) return kFALSE;
- if (bins[k-max+1].q > q) return kFALSE;
- return kTRUE;
-}
-static void FindPeaks(Int_t k, Int_t max, Bin *bins, Peak *peaks, Int_t& n) {
-//if (n>=31) return;
- if (n<31)
- if (IsMaximum(k,max,bins)) {
- peaks[n].k=k; peaks[n].mask=(2<<n);
- n++;
- }
- bins[k].mask=0;
- if (bins[k-max].mask&1) FindPeaks(k-max,max,bins,peaks,n);
- if (bins[k-1 ].mask&1) FindPeaks(k-1 ,max,bins,peaks,n);
- if (bins[k+max].mask&1) FindPeaks(k+max,max,bins,peaks,n);
- if (bins[k+1 ].mask&1) FindPeaks(k+1 ,max,bins,peaks,n);
-}
+ // Plexiglas C5H8O2
+
+ amat[0]=12.011;
+ amat[1]=1.;
+ amat[2]=15.9994;
-static void MarkPeak(Int_t k, Int_t max, Bin *bins, UInt_t m) {
- UShort_t q=bins[k].q;
+ zmat[0]=6.;
+ zmat[1]=1.;
+ zmat[2]=8.;
- bins[k].mask |= m;
+ wmat[0]=5.;
+ wmat[1]=8.;
+ wmat[2]=2.;
- if (bins[k-max].q <= q)
- if ((bins[k-max].mask&m) == 0) MarkPeak(k-max,max,bins,m);
- if (bins[k-1 ].q <= q)
- if ((bins[k-1 ].mask&m) == 0) MarkPeak(k-1 ,max,bins,m);
- if (bins[k+max].q <= q)
- if ((bins[k+max].mask&m) == 0) MarkPeak(k+max,max,bins,m);
- if (bins[k+1 ].q <= q)
- if ((bins[k+1 ].mask&m) == 0) MarkPeak(k+1 ,max,bins,m);
-}
+ density=1.18;
+
+ AliMixture(44,"Plexiglas",amat,zmat,density,-3,wmat);
-static void MakeCluster(Int_t k,Int_t max,Bin *bins,UInt_t m,AliTPCcluster &c){
- Float_t q=(Float_t)bins[k].q;
- Int_t i=k/max, j=k-i*max;
- c.fY += i*q;
- c.fZ += j*q;
- c.fSigmaY2 += i*i*q;
- c.fSigmaZ2 += j*j*q;
- c.fQ += q;
- bins[k].mask = 0xFFFFFFFE;
+
+ //----------------------------------------------------------
+ // tracking media for gases
+ //----------------------------------------------------------
+
+ AliMedium(0, "Air", 24, 0, iSXFLD, sXMGMX, 10., 999., .1, .01, .1);
+ AliMedium(1, "Drift gas 1", 31, 0, iSXFLD, sXMGMX, 10., 999.,.1,.001, .001);
+ AliMedium(2, "Drift gas 2", 32, 1, iSXFLD, sXMGMX, 10., 999.,.1,.001, .001);
+ AliMedium(3,"CO2",10,0, iSXFLD, sXMGMX, 10., 999.,.1, .001, .001);
+
+ //-----------------------------------------------------------
+ // tracking media for solids
+ //-----------------------------------------------------------
- if (bins[k-max].mask == m) MakeCluster(k-max,max,bins,m,c);
- if (bins[k-1 ].mask == m) MakeCluster(k-1 ,max,bins,m,c);
- if (bins[k+max].mask == m) MakeCluster(k+max,max,bins,m,c);
- if (bins[k+1 ].mask == m) MakeCluster(k+1 ,max,bins,m,c);
+ AliMedium(4,"Al",40,0, iSXFLD, sXMGMX, 10., 999., .1, .0005, .001);
+ AliMedium(5,"Kevlar",34,0, iSXFLD, sXMGMX, 10., 999., .1, .0005, .001);
+ AliMedium(6,"Nomex",35,0, iSXFLD, sXMGMX, 10., 999., .1, .001, .001);
+ AliMedium(7,"Makrolon",36,0, iSXFLD, sXMGMX, 10., 999., .1, .001, .001);
+ AliMedium(8,"Mylar",37,0, iSXFLD, sXMGMX, 10., 999., .1, .0005, .001);
+ AliMedium(9,"Tedlar",43,0, iSXFLD, sXMGMX, 10., 999., .1, .0005, .001);
+ AliMedium(10,"Cu",42,0, iSXFLD, sXMGMX, 10., 999., .1, .001, .001);
+ AliMedium(11,"Si",41,0, iSXFLD, sXMGMX, 10., 999., .1, .001, .001);
+ AliMedium(12,"G10",39,0, iSXFLD, sXMGMX, 10., 999., .1, .001, .001);
+ AliMedium(13,"Plexiglas",44,0, iSXFLD, sXMGMX, 10., 999., .1, .001, .001);
+
}
-//_____________________________________________________________________________
-void AliTPC::Digits2Clusters()
+
+void AliTPC::Digits2Clusters(TFile *of)
{
//-----------------------------------------------------------------
// This is a simple cluster finder.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
//-----------------------------------------------------------------
- AliTPCParam *par = fTPCParam;
- const Int_t MAXZ=par->GetMaxTBin()+2;
-
- TTree *t = (TTree *)gDirectory->Get("TreeD_75x40_100x60");
- AliSimDigits digarr, *dummy=&digarr;
- t->GetBranch("Segment")->SetAddress(&dummy);
- Stat_t sectors_by_rows = t->GetEntries();
- for (Int_t n=0; n<sectors_by_rows; n++) {
- t->GetEvent(n);
- Int_t sec, row;
- if (!par->AdjustSectorRow(digarr.GetID(),sec,row)) {
- cerr<<"AliTPC warning: invalid segment ID ! "<<digarr.GetID()<<endl;
- continue;
- }
-
- Float_t rx=par->GetPadRowRadii(sec,row);
-
- Int_t npads, sign;
- {
- Int_t nis=par->GetNInnerSector(), nos=par->GetNOuterSector();
- if (sec < nis) {
- npads = par->GetNPadsLow(row);
- sign = (sec < nis/2) ? 1 : -1;
- } else {
- npads = par->GetNPadsUp(row);
- sign = ((sec-nis) < nos/2) ? 1 : -1;
- }
- }
-
- const Int_t MAXBIN=MAXZ*(npads+2);
- Bin *bins=new Bin[MAXBIN];
-
- digarr.First();
- do {
- Short_t dig=digarr.CurrentDigit();
- if (dig<=par->GetZeroSup()) continue;
- Int_t j=digarr.CurrentRow()+1, i=digarr.CurrentColumn()+1;
- bins[i*MAXZ+j].q=dig;
- bins[i*MAXZ+j].mask=1;
- } while (digarr.Next());
-
- Int_t ncl=0;
- for (Int_t i=0; i<MAXBIN; i++) {
- if ((bins[i].mask&1) == 0) continue;
- Peak peaks[32]; Int_t npeaks=0;
- FindPeaks(i, MAXZ, bins, peaks, npeaks);
-
- if (npeaks>30) continue;
-
- Int_t k,l;
- for (k=0; k<npeaks-1; k++){//mark adjacent peaks
- if (peaks[k].k < 0) continue; //this peak is already removed
- for (l=k+1; l<npeaks; l++) {
- if (peaks[l].k < 0) continue; //this peak is already removed
- Int_t ki=peaks[k].k/MAXZ, kj=peaks[k].k - ki*MAXZ;
- Int_t li=peaks[l].k/MAXZ, lj=peaks[l].k - li*MAXZ;
- Int_t di=TMath::Abs(ki - li);
- Int_t dj=TMath::Abs(kj - lj);
- if (di>1 || dj>1) continue;
- if (bins[peaks[k].k].q > bins[peaks[l].k].q) {
- peaks[l].mask=peaks[k].mask;
- peaks[l].k*=-1;
- } else {
- peaks[k].mask=peaks[l].mask;
- peaks[k].k*=-1;
- break;
- }
- }
- }
-
- for (k=0; k<npeaks; k++) {
- MarkPeak(TMath::Abs(peaks[k].k), MAXZ, bins, peaks[k].mask);
- }
-
- for (k=0; k<npeaks; k++) {
- if (peaks[k].k < 0) continue; //removed peak
- AliTPCcluster c;
- MakeCluster(peaks[k].k, MAXZ, bins, peaks[k].mask, c);
- if (c.fQ < 5) continue; //noise cluster
- c.fY /= c.fQ;
- c.fZ /= c.fQ;
-
- Double_t s2 = c.fSigmaY2/c.fQ - c.fY*c.fY;
- c.fSigmaY2 = s2 + 1./12.;
- c.fSigmaY2 *= par->GetPadPitchWidth(sec)*par->GetPadPitchWidth(sec);
- if (s2 != 0.) {
- c.fSigmaY2 *= 0.064*1.3*1.3;
- if (sec<par->GetNInnerSector()) c.fSigmaY2 *= 1.44*1.44;
- }
-
- s2 = c.fSigmaZ2/c.fQ - c.fZ*c.fZ;
- c.fSigmaZ2 = s2 + 1./12.;
- c.fSigmaZ2 *= par->GetZWidth()*par->GetZWidth();
- if (s2 != 0.) {
- c.fSigmaZ2 *= 0.10*1.3*1.3;
- if (sec<par->GetNInnerSector()) c.fSigmaZ2 *= 1.33*1.33;
- }
-
- c.fY = (c.fY - 0.5 - 0.5*npads)*par->GetPadPitchWidth(sec);
- c.fZ = par->GetZWidth()*(c.fZ-1);
- c.fZ -= 3.*par->GetZSigma(); // PASA delay
- c.fZ = sign*(z_end - c.fZ);
-
- if (rx<230./250.*TMath::Abs(c.fZ)) continue;
-
- c.fSector=sec;
- c.fPadRow=row;
- Int_t ki=peaks[k].k/MAXZ, kj=peaks[k].k - ki*MAXZ;
- c.fTracks[0]=digarr.GetTrackID(kj-1,ki-1,0);
- c.fTracks[1]=digarr.GetTrackID(kj-1,ki-1,1);
- c.fTracks[2]=digarr.GetTrackID(kj-1,ki-1,2);
-
- c.fQ=bins[peaks[k].k].q;
-
- if (ki==1 || ki==npads || kj==1 || kj==MAXZ-2) {
- c.fSigmaY2 *= 25.;
- c.fSigmaZ2 *= 4.;
- }
-
- AddCluster(c); ncl++;
- }
- }
-
- cerr<<"sector, row, compressed digits, clusters: "
- <<sec<<' '<<row<<' '<<digarr.GetSize()<<' '<<ncl<<" \r";
-
- delete[] bins;
- }
+ AliTPCclusterer::Digits2Clusters(fTPCParam,of);
}
+extern Double_t SigmaY2(Double_t, Double_t, Double_t);
+extern Double_t SigmaZ2(Double_t, Double_t);
//_____________________________________________________________________________
-void AliTPC::Hits2Clusters()
+void AliTPC::Hits2Clusters(TFile *of)
{
//--------------------------------------------------------
// TPC simple cluster generator from hits
//-----------------------------------------------------------------
// Origin: Marek Kowalski IFJ, Krakow, Marek.Kowalski@ifj.edu.pl
//-----------------------------------------------------------------
+ // Adopted to Marian's cluster data structure by I.Belikov, CERN,
+ // Jouri.Belikov@cern.ch
+ //----------------------------------------------------------------
+
+ /////////////////////////////////////////////////////////////////////////////
+ //
+ //---------------------------------------------------------------------
+ // ALICE TPC Cluster Parameters
+ //--------------------------------------------------------------------
+
+
+
+ // Cluster width in rphi
+ const Float_t kACrphi=0.18322;
+ const Float_t kBCrphi=0.59551e-3;
+ const Float_t kCCrphi=0.60952e-1;
+ // Cluster width in z
+ const Float_t kACz=0.19081;
+ const Float_t kBCz=0.55938e-3;
+ const Float_t kCCz=0.30428;
+
+ TDirectory *savedir=gDirectory;
+
+ if (!of->IsOpen()) {
+ cerr<<"AliTPC::Hits2Clusters(): output file not open !\n";
+ return;
+ }
if(fTPCParam == 0){
printf("AliTPCParam MUST be created firstly\n");
return;
}
- Float_t sigma_rphi,sigma_z,cl_rphi,cl_z;
+ Float_t sigmaRphi,sigmaZ,clRphi,clZ;
//
TParticle *particle; // pointer to a given particle
AliTPChit *tpcHit; // pointer to a sigle TPC hit
- TClonesArray *Particles; //pointer to the particle list
+ TClonesArray *particles; //pointer to the particle list
Int_t sector,nhits;
Int_t ipart;
Float_t xyz[5];
// Get the access to the tracks
//---------------------------------------------------------------
- TTree *TH = gAlice->TreeH();
- Stat_t ntracks = TH->GetEntries();
+ TTree *tH = gAlice->TreeH();
+ Stat_t ntracks = tH->GetEntries();
+ particles=gAlice->Particles();
+
+ //Switch to the output file
+ of->cd();
+
+ fTPCParam->Write(fTPCParam->GetTitle());
+ AliTPCClustersArray carray;
+ carray.Setup(fTPCParam);
+ carray.SetClusterType("AliTPCcluster");
+ carray.MakeTree();
+
+ Int_t nclusters=0; //cluster counter
//------------------------------------------------------------
// Loop over all sectors (72 sectors for 20 deg
for(Int_t track=0;track<ntracks;track++){
ResetHits();
- TH->GetEvent(track);
+ tH->GetEvent(track);
//
- // Get number of the TPC hits and a pointer
- // to the particles
+ // Get number of the TPC hits
//
nhits=fHits->GetEntriesFast();
- Particles=gAlice->Particles();
//
// Loop over hits
//
sector=tpcHit->fSector; // sector number
if(sector != isec) continue; //terminate iteration
ipart=tpcHit->fTrack;
- particle=(TParticle*)Particles->UncheckedAt(ipart);
+ particle=(TParticle*)particles->UncheckedAt(ipart);
pl=particle->Pz();
pt=particle->Pt();
if(pt < 1.e-9) pt=1.e-9;
tanth = TMath::Abs(tanth);
rpad=TMath::Sqrt(tpcHit->fX*tpcHit->fX + tpcHit->fY*tpcHit->fY);
ratio=0.001*rpad/pt; // pt must be in MeV/c - historical reason
-
+
// space-point resolutions
- sigma_rphi=SigmaY2(rpad,tanth,pt);
- sigma_z =SigmaZ2(rpad,tanth );
+ sigmaRphi=SigmaY2(rpad,tanth,pt);
+ sigmaZ =SigmaZ2(rpad,tanth );
// cluster widths
- cl_rphi=ac_rphi-bc_rphi*rpad*tanth+cc_rphi*ratio*ratio;
- cl_z=ac_z-bc_z*rpad*tanth+cc_z*tanth*tanth;
+ clRphi=kACrphi-kBCrphi*rpad*tanth+kCCrphi*ratio*ratio;
+ clZ=kACz-kBCz*rpad*tanth+kCCz*tanth*tanth;
// temporary protection
- if(sigma_rphi < 0.) sigma_rphi=0.4e-3;
- if(sigma_z < 0.) sigma_z=0.4e-3;
- if(cl_rphi < 0.) cl_rphi=2.5e-3;
- if(cl_z < 0.) cl_z=2.5e-5;
+ if(sigmaRphi < 0.) sigmaRphi=0.4e-3;
+ if(sigmaZ < 0.) sigmaZ=0.4e-3;
+ if(clRphi < 0.) clRphi=2.5e-3;
+ if(clZ < 0.) clZ=2.5e-5;
//
// smearing --> rotate to the 1 (13) or to the 25 (49) sector,
// then the inaccuracy in a X-Y plane is only along Y (pad row)!
//
- //Float_t xprim= tpcHit->fX*cph + tpcHit->fY*sph;
+ Float_t xprim= tpcHit->fX*cph + tpcHit->fY*sph;
Float_t yprim=-tpcHit->fX*sph + tpcHit->fY*cph;
- xyz[0]=gRandom->Gaus(yprim,TMath::Sqrt(sigma_rphi)); // y
- xyz[1]=gRandom->Gaus(tpcHit->fZ,TMath::Sqrt(sigma_z)); // z
+ xyz[0]=gRandom->Gaus(yprim,TMath::Sqrt(sigmaRphi)); // y
+ Float_t alpha=(isec < fTPCParam->GetNInnerSector()) ?
+ fTPCParam->GetInnerAngle() : fTPCParam->GetOuterAngle();
+ Float_t ymax=xprim*TMath::Tan(0.5*alpha);
+ if (TMath::Abs(xyz[0])>ymax) xyz[0]=yprim;
+ xyz[1]=gRandom->Gaus(tpcHit->fZ,TMath::Sqrt(sigmaZ)); // z
+ if (TMath::Abs(xyz[1])>fTPCParam->GetZLength()) xyz[1]=tpcHit->fZ;
xyz[2]=tpcHit->fQ; // q
- xyz[3]=sigma_rphi; // fSigmaY2
- xyz[4]=sigma_z; // fSigmaZ2
-
- Int_t tracks[5]={tpcHit->fTrack, -1, -1, sector, tpcHit->fPadRow};
- AddCluster(xyz,tracks);
-
+ xyz[3]=sigmaRphi; // fSigmaY2
+ xyz[4]=sigmaZ; // fSigmaZ2
+
+ AliTPCClustersRow *clrow=carray.GetRow(sector,tpcHit->fPadRow);
+ if (!clrow) clrow=carray.CreateRow(sector,tpcHit->fPadRow);
+
+ Int_t tracks[3]={tpcHit->fTrack, -1, -1};
+ AliTPCcluster cluster(xyz,tracks);
+
+ clrow->InsertCluster(&cluster); nclusters++;
+
} // end of loop over hits
- } // end of loop over tracks
-
+
+ } // end of loop over tracks
+
+ Int_t nrows=fTPCParam->GetNRow(isec);
+ for (Int_t irow=0; irow<nrows; irow++) {
+ AliTPCClustersRow *clrow=carray.GetRow(isec,irow);
+ if (!clrow) continue;
+ carray.StoreRow(isec,irow);
+ carray.ClearRow(isec,irow);
+ }
+
} // end of loop over sectors
+
+ cerr<<"Number of made clusters : "<<nclusters<<" \n";
+
+ carray.GetTree()->Write();
+
+ savedir->cd(); //switch back to the input file
} // end of function
//
TParticle *particle; // pointer to a given particle
AliTPChit *tpcHit; // pointer to a sigle TPC hit
- TClonesArray *Particles; //pointer to the particle list
+ TClonesArray *particles; //pointer to the particle list
Int_t sector,nhits;
Int_t ipart;
- const Int_t cmaxhits=30000;
- TVector * xxxx = new TVector(cmaxhits*4);
+ const Int_t kcmaxhits=30000;
+ TVector * xxxx = new TVector(kcmaxhits*4);
TVector & xxx = *xxxx;
- Int_t maxhits = cmaxhits;
+ Int_t maxhits = kcmaxhits;
//construct array for each padrow
for (Int_t i=0; i<fTPCParam->GetNRow(isec);i++)
fClustersArray->CreateRow(isec,i);
// Get the access to the tracks
//---------------------------------------------------------------
- TTree *TH = gAlice->TreeH();
- Stat_t ntracks = TH->GetEntries();
- Particles=gAlice->Particles();
- Int_t npart = Particles->GetEntriesFast();
+ TTree *tH = gAlice->TreeH();
+ Stat_t ntracks = tH->GetEntries();
+ particles=gAlice->Particles();
+ Int_t npart = particles->GetEntriesFast();
//------------------------------------------------------------
// Loop over tracks
for(Int_t track=0;track<ntracks;track++){
ResetHits();
- TH->GetEvent(track);
+ tH->GetEvent(track);
//
// Get number of the TPC hits and a pointer
// to the particles
sector=tpcHit->fSector; // sector number
if(sector != isec) continue;
ipart=tpcHit->fTrack;
- if (ipart<npart) particle=(TParticle*)Particles->UncheckedAt(ipart);
+ if (ipart<npart) particle=(TParticle*)particles->UncheckedAt(ipart);
//find row number
if (lastrow<0) lastrow=currentrow;
if (currentrow==lastrow){
if ( currentIndex>=maxhits){
- maxhits+=cmaxhits;
+ maxhits+=kcmaxhits;
xxx.ResizeTo(4*maxhits);
}
xxx(currentIndex*4)=x[0];
sumx2z+=xxx(index*4+2)*x2;
sumq+=xxx(index*4+3);
}
- Float_t CentralPad = (fTPCParam->GetNPads(isec,lastrow)-1)/2;
+ Float_t centralPad = (fTPCParam->GetNPads(isec,lastrow)-1)/2;
Float_t det=currentIndex*(sumx2*sumx4-sumx3*sumx3)-sumx*(sumx*sumx4-sumx2*sumx3)+
sumx2*(sumx*sumx3-sumx2*sumx2);
Float_t detbz=currentIndex*(sumxz*sumx4-sumx2z*sumx3)-sumz*(sumx*sumx4-sumx2*sumx3)+
sumx2*(sumx*sumx2z-sumx2*sumxz);
- Float_t y=detay/det+CentralPad;
+ Float_t y=detay/det+centralPad;
Float_t z=detaz/det;
Float_t by=detby/det; //y angle
Float_t bz=detbz/det; //z angle
//-------------------------------------------------------
- TTree *TH = gAlice->TreeH(); // pointer to the hits tree
- Stat_t ntracks = TH->GetEntries();
+ TTree *tH = gAlice->TreeH(); // pointer to the hits tree
+ Stat_t ntracks = tH->GetEntries();
if( ntracks > 0){
row= new TObjArray* [nrows];
- MakeSector(isec,nrows,TH,ntracks,row);
+ MakeSector(isec,nrows,tH,ntracks,row);
//--------------------------------------------------------
// Digitize this sector, row by row
fDigitsArray->StoreRow(isec,i);
- Int_t ndig = dig->GetSize();
+ Int_t ndig = dig->GetDigitSize();
printf("*** Sector, row, compressed digits %d %d %d ***\n",isec,i,ndig);
fCurrentIndex[1]= isec;
- Int_t n_of_pads = fTPCParam->GetNPads(isec,irow);
- Int_t n_of_tbins = fTPCParam->GetMaxTBin();
- Int_t IndexRange[4];
+ Int_t nofPads = fTPCParam->GetNPads(isec,irow);
+ Int_t nofTbins = fTPCParam->GetMaxTBin();
+ Int_t indexRange[4];
//
// Integrated signal for this row
// and a single track signal
//
- TMatrix *m1 = new TMatrix(0,n_of_pads,0,n_of_tbins); // integrated
- TMatrix *m2 = new TMatrix(0,n_of_pads,0,n_of_tbins); // single
+ TMatrix *m1 = new TMatrix(0,nofPads,0,nofTbins); // integrated
+ TMatrix *m2 = new TMatrix(0,nofPads,0,nofTbins); // single
//
- TMatrix &Total = *m1;
+ TMatrix &total = *m1;
// Array of pointers to the label-signal list
- Int_t NofDigits = n_of_pads*n_of_tbins; // number of digits for this row
- Float_t **pList = new Float_t* [NofDigits];
+ Int_t nofDigits = nofPads*nofTbins; // number of digits for this row
+ Float_t **pList = new Float_t* [nofDigits];
Int_t lp;
Int_t i1;
- for(lp=0;lp<NofDigits;lp++)pList[lp]=0; // set all pointers to NULL
+ for(lp=0;lp<nofDigits;lp++)pList[lp]=0; // set all pointers to NULL
//
//calculate signal
//
fCurrentIndex[3]=irow;
if (row==irow){
m2->Zero(); // clear single track signal matrix
- Float_t TrackLabel = GetSignal(rows[row],i1,m2,m1,IndexRange);
- GetList(TrackLabel,n_of_pads,m2,IndexRange,pList);
+ Float_t trackLabel = GetSignal(rows[row],i1,m2,m1,indexRange);
+ GetList(trackLabel,nofPads,m2,indexRange,pList);
}
- else GetSignal(rows[row],i1,0,m1,IndexRange);
+ else GetSignal(rows[row],i1,0,m1,indexRange);
}
}
Int_t tracks[3];
AliDigits *dig = fDigitsArray->GetRow(isec,irow);
- for(Int_t ip=0;ip<n_of_pads;ip++){
- for(Int_t it=0;it<n_of_tbins;it++){
+ for(Int_t ip=0;ip<nofPads;ip++){
+ for(Int_t it=0;it<nofTbins;it++){
- Float_t q = Total(ip,it);
+ Float_t q = total(ip,it);
- Int_t gi =it*n_of_pads+ip; // global index
+ Int_t gi =it*nofPads+ip; // global index
q = gRandom->Gaus(q,fTPCParam->GetNoise()*fTPCParam->GetNoiseNormFac());
q = (Int_t)q;
if(q <=zerosup) continue; // do not fill zeros
- if(q > adc_sat) q = adc_sat; // saturation
+ if(q > fTPCParam->GetADCSat()) q = fTPCParam->GetADCSat(); // saturation
//
// "real" signal or electronic noise (list = -1)?
// This row has been digitized, delete nonused stuff
//
- for(lp=0;lp<NofDigits;lp++){
+ for(lp=0;lp<nofDigits;lp++){
if(pList[lp]) delete [] pList[lp];
}
//_____________________________________________________________________________
Float_t AliTPC::GetSignal(TObjArray *p1, Int_t ntr, TMatrix *m1, TMatrix *m2,
- Int_t *IndexRange)
+ Int_t *indexRange)
{
//---------------------------------------------------------------
TVector &v = *tv;
Float_t label = v(0);
- Int_t CentralPad = (fTPCParam->GetNPads(fCurrentIndex[1],fCurrentIndex[3])-1)/2;
+ Int_t centralPad = (fTPCParam->GetNPads(fCurrentIndex[1],fCurrentIndex[3])-1)/2;
Int_t nElectrons = (tv->GetNrows()-1)/4;
- IndexRange[0]=9999; // min pad
- IndexRange[1]=-1; // max pad
- IndexRange[2]=9999; //min time
- IndexRange[3]=-1; // max time
+ indexRange[0]=9999; // min pad
+ indexRange[1]=-1; // max pad
+ indexRange[2]=9999; //min time
+ indexRange[3]=-1; // max time
// Float_t IneffFactor = 0.5; // inefficiency in the gain close to the edge, as above
if (n>0) for (Int_t i =0; i<n; i++){
Int_t *index = fTPCParam->GetResBin(i);
- Int_t pad=index[1]+CentralPad; //in digit coordinates central pad has coordinate 0
+ Int_t pad=index[1]+centralPad; //in digit coordinates central pad has coordinate 0
if ( ( pad<(fTPCParam->GetNPads(fCurrentIndex[1],fCurrentIndex[3]))) && (pad>0)) {
Int_t time=index[2];
Float_t weight = fTPCParam->GetResWeight(i); //we normalise response to ADC channel
if (m1!=0) signal(pad,time)+=weight;
total(pad,time)+=weight;
- IndexRange[0]=TMath::Min(IndexRange[0],pad);
- IndexRange[1]=TMath::Max(IndexRange[1],pad);
- IndexRange[2]=TMath::Min(IndexRange[2],time);
- IndexRange[3]=TMath::Max(IndexRange[3],time);
+ indexRange[0]=TMath::Min(indexRange[0],pad);
+ indexRange[1]=TMath::Max(indexRange[1],pad);
+ indexRange[2]=TMath::Min(indexRange[2],time);
+ indexRange[3]=TMath::Max(indexRange[3],time);
}
}
} // end of loop over electrons
}
//_____________________________________________________________________________
-void AliTPC::GetList(Float_t label,Int_t np,TMatrix *m,Int_t *IndexRange,
+void AliTPC::GetList(Float_t label,Int_t np,TMatrix *m,Int_t *indexRange,
Float_t **pList)
{
//----------------------------------------------------------------------
// lop over nonzero digits
- for(Int_t it=IndexRange[2];it<IndexRange[3]+1;it++){
- for(Int_t ip=IndexRange[0];ip<IndexRange[1]+1;ip++){
+ for(Int_t it=indexRange[2];it<indexRange[3]+1;it++){
+ for(Int_t ip=indexRange[0];ip<indexRange[1]+1;ip++){
// accept only the contribution larger than 500 electrons (1/2 s_noise)
if(signal(ip,it)<0.5) continue;
- Int_t GlobalIndex = it*np+ip; // GlobalIndex starts from 0!
+ Int_t globalIndex = it*np+ip; // globalIndex starts from 0!
- if(!pList[GlobalIndex]){
+ if(!pList[globalIndex]){
//
// Create new list (6 elements - 3 signals and 3 labels),
//
- pList[GlobalIndex] = new Float_t [6];
+ pList[globalIndex] = new Float_t [6];
// set list to -1
- *pList[GlobalIndex] = -1.;
- *(pList[GlobalIndex]+1) = -1.;
- *(pList[GlobalIndex]+2) = -1.;
- *(pList[GlobalIndex]+3) = -1.;
- *(pList[GlobalIndex]+4) = -1.;
- *(pList[GlobalIndex]+5) = -1.;
+ *pList[globalIndex] = -1.;
+ *(pList[globalIndex]+1) = -1.;
+ *(pList[globalIndex]+2) = -1.;
+ *(pList[globalIndex]+3) = -1.;
+ *(pList[globalIndex]+4) = -1.;
+ *(pList[globalIndex]+5) = -1.;
- *pList[GlobalIndex] = label;
- *(pList[GlobalIndex]+3) = signal(ip,it);
+ *pList[globalIndex] = label;
+ *(pList[globalIndex]+3) = signal(ip,it);
}
else{
// check the signal magnitude
- Float_t highest = *(pList[GlobalIndex]+3);
- Float_t middle = *(pList[GlobalIndex]+4);
- Float_t lowest = *(pList[GlobalIndex]+5);
+ Float_t highest = *(pList[globalIndex]+3);
+ Float_t middle = *(pList[globalIndex]+4);
+ Float_t lowest = *(pList[globalIndex]+5);
//
// compare the new signal with already existing list
//
if (signal(ip,it)>highest){
- *(pList[GlobalIndex]+5) = middle;
- *(pList[GlobalIndex]+4) = highest;
- *(pList[GlobalIndex]+3) = signal(ip,it);
+ *(pList[globalIndex]+5) = middle;
+ *(pList[globalIndex]+4) = highest;
+ *(pList[globalIndex]+3) = signal(ip,it);
- *(pList[GlobalIndex]+2) = *(pList[GlobalIndex]+1);
- *(pList[GlobalIndex]+1) = *pList[GlobalIndex];
- *pList[GlobalIndex] = label;
+ *(pList[globalIndex]+2) = *(pList[globalIndex]+1);
+ *(pList[globalIndex]+1) = *pList[globalIndex];
+ *pList[globalIndex] = label;
}
else if (signal(ip,it)>middle){
- *(pList[GlobalIndex]+5) = middle;
- *(pList[GlobalIndex]+4) = signal(ip,it);
+ *(pList[globalIndex]+5) = middle;
+ *(pList[globalIndex]+4) = signal(ip,it);
- *(pList[GlobalIndex]+2) = *(pList[GlobalIndex]+1);
- *(pList[GlobalIndex]+1) = label;
+ *(pList[globalIndex]+2) = *(pList[globalIndex]+1);
+ *(pList[globalIndex]+1) = label;
}
else{
- *(pList[GlobalIndex]+5) = signal(ip,it);
- *(pList[GlobalIndex]+2) = label;
+ *(pList[globalIndex]+5) = signal(ip,it);
+ *(pList[globalIndex]+2) = label;
}
}
// of electrons, one TVector per each track.
//----------------------------------------------
+ Int_t *nofElectrons = new Int_t [nrows]; // electron counter for each row
+ TVector **tracks = new TVector* [nrows]; //pointers to the track vectors
for(i=0; i<nrows; i++){
row[i] = new TObjArray;
+ nofElectrons[i]=0;
+ tracks[i]=0;
}
- Int_t *n_of_electrons = new Int_t [nrows]; // electron counter for each row
- TVector **tracks = new TVector* [nrows]; //pointers to the track vectors
+
+
//--------------------------------------------------------------------
// Loop over tracks, the "track" contains the full history
for(i=0;i<nrows;i++){
if(previousTrack != -1){
- if(n_of_electrons[i]>0){
+ if(nofElectrons[i]>0){
TVector &v = *tracks[i];
v(0) = previousTrack;
- tracks[i]->ResizeTo(4*n_of_electrons[i]+1); // shrink if necessary
+ tracks[i]->ResizeTo(4*nofElectrons[i]+1); // shrink if necessary
row[i]->Add(tracks[i]);
}
else{
}
}
- n_of_electrons[i]=0;
+ nofElectrons[i]=0;
tracks[i] = new TVector(481); // TVectors for the next fTrack
} // end of loop over rows
previousTrack=currentTrack; // update track label
}
- Int_t QI = (Int_t) (tpcHit->fQ); // energy loss (number of electrons)
+ Int_t qI = (Int_t) (tpcHit->fQ); // energy loss (number of electrons)
//---------------------------------------------------
// Calculate the electron attachment probability
Float_t time = 1.e6*(fTPCParam->GetZLength()-TMath::Abs(tpcHit->fZ))
/fTPCParam->GetDriftV();
// in microseconds!
- Float_t AttProb = fTPCParam->GetAttCoef()*
+ Float_t attProb = fTPCParam->GetAttCoef()*
fTPCParam->GetOxyCont()*time; // fraction!
//-----------------------------------------------
//-----------------------------------------------
Int_t index[3];
index[1]=isec;
- for(Int_t nel=0;nel<QI;nel++){
+ for(Int_t nel=0;nel<qI;nel++){
// skip if electron lost due to the attachment
- if((gRandom->Rndm(0)) < AttProb) continue; // electron lost!
+ if((gRandom->Rndm(0)) < attProb) continue; // electron lost!
xyz[0]=tpcHit->fX;
xyz[1]=tpcHit->fY;
xyz[2]=tpcHit->fZ;
index[0]=1;
TransportElectron(xyz,index); //MI change -august
- Int_t row_number;
+ Int_t rowNumber;
fTPCParam->GetPadRow(xyz,index); //MI change august
- row_number = index[2];
+ rowNumber = index[2];
//transform position to local digit coordinates
//relative to nearest pad row
- if ((row_number<0)||row_number>=fTPCParam->GetNRow(isec)) continue;
- n_of_electrons[row_number]++;
+ if ((rowNumber<0)||rowNumber>=fTPCParam->GetNRow(isec)) continue;
+ nofElectrons[rowNumber]++;
//----------------------------------
// Expand vector if necessary
//----------------------------------
- if(n_of_electrons[row_number]>120){
- Int_t range = tracks[row_number]->GetNrows();
- if((n_of_electrons[row_number])>(range-1)/4){
+ if(nofElectrons[rowNumber]>120){
+ Int_t range = tracks[rowNumber]->GetNrows();
+ if((nofElectrons[rowNumber])>(range-1)/4){
- tracks[row_number]->ResizeTo(range+400); // Add 100 electrons
+ tracks[rowNumber]->ResizeTo(range+400); // Add 100 electrons
}
}
- TVector &v = *tracks[row_number];
- Int_t idx = 4*n_of_electrons[row_number]-3;
+ TVector &v = *tracks[rowNumber];
+ Int_t idx = 4*nofElectrons[rowNumber]-3;
v(idx)= xyz[0]; // X - pad row coordinate
v(idx+1)=xyz[1]; // Y - pad coordinate (along the pad-row)
//
for(i=0;i<nrows;i++){
- if(n_of_electrons[i]>0){
+ if(nofElectrons[i]>0){
TVector &v = *tracks[i];
v(0) = previousTrack;
- tracks[i]->ResizeTo(4*n_of_electrons[i]+1); // shrink if necessary
+ tracks[i]->ResizeTo(4*nofElectrons[i]+1); // shrink if necessary
row[i]->Add(tracks[i]);
}
else{
}
delete [] tracks;
- delete [] n_of_electrons;
+ delete [] nofElectrons;
} // end of MakeSector
AliDetector::MakeBranch(option);
- char *D = strstr(option,"D");
+ char *d = strstr(option,"D");
- if (fDigits && gAlice->TreeD() && D) {
+ if (fDigits && gAlice->TreeD() && d) {
gAlice->TreeD()->Branch(branchname,&fDigits, buffersize);
printf("Making Branch %s for digits\n",branchname);
}
-
- char *R = strstr(option,"R");
-
- if (fClusters && gAlice->TreeR() && R) {
- gAlice->TreeR()->Branch(branchname,&fClusters, buffersize);
- printf("Making Branch %s for Clusters\n",branchname);
- }
}
//_____________________________________________________________________________
{
//
// Reset number of digits and the digits array for this detector
- // reset clusters
//
fNdigits = 0;
if (fDigits) fDigits->Clear();
- fNclusters = 0;
- if (fClusters) fClusters->Clear();
}
//_____________________________________________________________________________
fSens = sens;
}
-void AliTPC::SetSide(Float_t side)
+void AliTPC::SetSide(Float_t side=0.)
{
+ // choice of the TPC side
+
fSide = side;
}
Float_t p2,Float_t p3)
{
+ // gax mixture definition
+
fNoComp = nc;
fMixtComp[0]=c1;
Float_t driftl=xyz[2];
if(driftl<0.01) driftl=0.01;
driftl=TMath::Sqrt(driftl);
- Float_t sig_t = driftl*(fTPCParam->GetDiffT());
- Float_t sig_l = driftl*(fTPCParam->GetDiffL());
- xyz[0]=gRandom->Gaus(xyz[0],sig_t);
- xyz[1]=gRandom->Gaus(xyz[1],sig_t);
- xyz[2]=gRandom->Gaus(xyz[2],sig_l);
+ Float_t sigT = driftl*(fTPCParam->GetDiffT());
+ Float_t sigL = driftl*(fTPCParam->GetDiffL());
+ xyz[0]=gRandom->Gaus(xyz[0],sigT);
+ xyz[1]=gRandom->Gaus(xyz[1],sigT);
+ xyz[2]=gRandom->Gaus(xyz[2],sigL);
// ExB
AliDetector::Streamer(R__b);
if (R__v < 2) return;
R__b >> fNsectors;
- R__b >> fNclusters;
- R__b >> fNtracks;
-
} else {
R__b.WriteVersion(AliTPC::IsA());
AliDetector::Streamer(R__b);
R__b << fNsectors;
- R__b << fNclusters;
- R__b << fNtracks;
}
}
-ClassImp(AliTPCcluster)
-
-//_____________________________________________________________________________
-AliTPCcluster::AliTPCcluster(Float_t *hits, Int_t *lab)
-{
- //
- // Creates a simulated cluster for the TPC
- //
- fTracks[0] = lab[0];
- fTracks[1] = lab[1];
- fTracks[2] = lab[2];
- fSector = lab[3];
- fPadRow = lab[4];
- fY = hits[0];
- fZ = hits[1];
- fQ = hits[2];
- fSigmaY2 = hits[3];
- fSigmaZ2 = hits[4];
-}
-
-//_____________________________________________________________________________
-void AliTPCcluster::GetXYZ(Float_t *x, const AliTPCParam *par) const
-{
- //
- // Transformation from local to global coordinate system
- //
- x[0]=par->GetPadRowRadii(fSector,fPadRow);
- x[1]=fY;
- x[2]=fZ;
- Float_t cs, sn, tmp;
- par->AdjustCosSin(fSector,cs,sn);
- tmp = x[0]*cs-x[1]*sn;
- x[1]= x[0]*sn+x[1]*cs; x[0]=tmp;
-}
-
-//_____________________________________________________________________________
-Int_t AliTPCcluster::Compare(TObject * o)
-{
- //
- // compare two clusters according y coordinata
- //
- AliTPCcluster *cl= (AliTPCcluster *)o;
- if (fY<cl->fY) return -1;
- if (fY==cl->fY) return 0;
- return 1;
-}
-
-Bool_t AliTPCcluster::IsSortable() const
-{
- //
- //make AliTPCcluster sortabale
- //
- return kTRUE;
-}
-
-
-
ClassImp(AliTPCdigit)
//_____________________________________________________________________________
fQ = hits[3];
}
-
-ClassImp(AliTPCtrack)
-
-//_____________________________________________________________________________
-AliTPCtrack::AliTPCtrack(Float_t *hits)
-{
- //
- // Default creator for a TPC reconstructed track object
- //
- fX=hits[0]; // This is dummy code !
-}
-//_________________________________________________________________________
-
-AliTPCtrack::AliTPCtrack(const AliTPCcluster *c,const TVector& xx,
- const TMatrix& CC, Double_t xref, Double_t alpha):
- x(xx),C(CC),fClusters(200)
-{
- //-----------------------------------------------------------------
- // This is the main track constructor.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- fX=xref;
- fAlpha=alpha;
- fChi2=0.;
- fClusters.AddLast((AliTPCcluster*)(c));
-}
-
-//_____________________________________________________________________________
-AliTPCtrack::AliTPCtrack(const AliTPCtrack& t) : x(t.x), C(t.C),
- fClusters(t.fClusters.GetEntriesFast())
-{
- //-----------------------------------------------------------------
- // This is a track copy constructor.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- fX=t.fX;
- fChi2=t.fChi2;
- fAlpha=t.fAlpha;
- Int_t n=t.fClusters.GetEntriesFast();
- for (Int_t i=0; i<n; i++) fClusters.AddLast(t.fClusters.UncheckedAt(i));
-}
-
-//_____________________________________________________________________________
-Int_t AliTPCtrack::Compare(TObject *o) {
- //-----------------------------------------------------------------
- // This function compares tracks according to the uncertainty of their
- // position in Y.
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- AliTPCtrack *t=(AliTPCtrack*)o;
- Double_t co=t->GetSigmaY2();
- Double_t c =GetSigmaY2();
- if (c>co) return 1;
- else if (c<co) return -1;
- return 0;
-}
-
-//_____________________________________________________________________________
-Int_t AliTPCtrack::PropagateTo(Double_t xk,Double_t x0,Double_t rho,Double_t pm)
-{
- //-----------------------------------------------------------------
- // This function propagates a track to a reference plane x=xk.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- if (TMath::Abs(x(2)*xk - x(3)) >= 0.999) {
- if (*this>4) cerr<<*this<<" AliTPCtrack warning: Propagation failed !\n";
- return 0;
- }
-
- Double_t x1=fX, x2=x1+(xk-x1), dx=x2-x1, y1=x(0), z1=x(1);
- Double_t c1=x(2)*x1 - x(3), r1=sqrt(1.- c1*c1);
- Double_t c2=x(2)*x2 - x(3), r2=sqrt(1.- c2*c2);
-
- x(0) += dx*(c1+c2)/(r1+r2);
- x(1) += dx*(c1+c2)/(c1*r2 + c2*r1)*x(4);
-
- TMatrix F(5,5); F.UnitMatrix();
- Double_t rr=r1+r2, cc=c1+c2, xx=x1+x2;
- F(0,2)= dx*(rr*xx + cc*(c1*x1/r1+c2*x2/r2))/(rr*rr);
- F(0,3)=-dx*(2*rr + cc*(c1/r1 + c2/r2))/(rr*rr);
- Double_t cr=c1*r2+c2*r1;
- F(1,2)= dx*x(4)*(cr*xx-cc*(r1*x2-c2*c1*x1/r1+r2*x1-c1*c2*x2/r2))/(cr*cr);
- F(1,3)=-dx*x(4)*(2*cr + cc*(c2*c1/r1-r1 + c1*c2/r2-r2))/(cr*cr);
- F(1,4)= dx*cc/cr;
- TMatrix tmp(F,TMatrix::kMult,C);
- C.Mult(tmp,TMatrix(TMatrix::kTransposed,F));
-
- fX=x2;
-
- //Multiple scattering******************
- Double_t ey=x(2)*fX - x(3);
- Double_t ex=sqrt(1-ey*ey);
- Double_t ez=x(4);
- TMatrix Q(5,5); Q=0.;
- Q(2,2)=ez*ez+ey*ey; Q(2,3)=-ex*ey; Q(2,4)=-ex*ez;
- Q(3,2)=Q(2,3); Q(3,3)= ez*ez+ex*ex; Q(3,4)=-ey*ez;
- Q(4,2)=Q(2,4); Q(4,3)= Q(3,4); Q(4,4)=1.;
-
- F=0;
- F(2,2)=-x(2)*ex; F(2,3)=-x(2)*ey;
- F(3,2)=-ex*(x(2)*fX-ey); F(3,3)=-(1.+ x(2)*fX*ey - ey*ey);
- F(4,2)=-ez*ex; F(4,3)=-ez*ey; F(4,4)=1.;
-
- tmp.Mult(F,Q);
- Q.Mult(tmp,TMatrix(TMatrix::kTransposed,F));
-
- Double_t p2=GetPt()*GetPt()*(1.+x(4)*x(4));
- Double_t beta2=p2/(p2 + pm*pm);
- Double_t d=sqrt((x1-fX)*(x1-fX)+(y1-x(0))*(y1-x(0))+(z1-x(1))*(z1-x(1)));
- Double_t theta2=14.1*14.1/(beta2*p2*1e6)*d/x0*rho;
- Q*=theta2;
- C+=Q;
-
- //Energy losses************************
- Double_t dE=0.153e-3/beta2*(log(5940*beta2/(1-beta2)) - beta2)*d*rho;
- if (x1 < x2) dE=-dE;
- x(2)*=(1.- sqrt(p2+pm*pm)/p2*dE);
- //x(3)*=(1.- sqrt(p2+pm*pm)/p2*dE);
-
- return 1;
-}
-
-//_____________________________________________________________________________
-void AliTPCtrack::PropagateToVertex(Double_t x0,Double_t rho,Double_t pm)
-{
- //-----------------------------------------------------------------
- // This function propagates tracks to the "vertex".
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- Double_t c=x(2)*fX - x(3);
- Double_t tgf=-x(3)/(x(2)*x(0) + sqrt(1-c*c));
- Double_t snf=tgf/sqrt(1.+ tgf*tgf);
- Double_t xv=(x(3)+snf)/x(2);
- PropagateTo(xv,x0,rho,pm);
-}
-
-//_____________________________________________________________________________
-void AliTPCtrack::Update(const AliTPCcluster *c, Double_t chisq)
-{
- //-----------------------------------------------------------------
- // This function associates a clusters with this track.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- TMatrix H(2,5); H.UnitMatrix();
- TMatrix Ht(TMatrix::kTransposed,H);
- TVector m(2); m(0)=c->fY; m(1)=c->fZ;
- TMatrix V(2,2); V(0,0)=c->fSigmaY2; V(0,1)=0.; V(1,0)=0.; V(1,1)=c->fSigmaZ2;
-
- TMatrix tmp(H,TMatrix::kMult,C);
- TMatrix R(tmp,TMatrix::kMult,Ht); R+=V;
-
- Double_t det=(Double_t)R(0,0)*R(1,1) - (Double_t)R(0,1)*R(1,0);
- R(0,1)=R(0,0); R(0,0)=R(1,1); R(1,1)=R(0,1);
- R(1,0)*=-1; R(0,1)=R(1,0);
- R*=1./det;
-
- //R.Invert();
-
- TMatrix K(C,TMatrix::kMult,Ht); K*=R;
-
- TVector savex=x;
- x*=H; x-=m;
-
- x*=-1; x*=K; x+=savex;
- if (TMath::Abs(x(2)*fX-x(3)) >= 0.999) {
- if (*this>4) cerr<<*this<<" AliTPCtrack warning: Filtering failed !\n";
- x=savex;
- return;
- }
-
- TMatrix saveC=C;
- C.Mult(K,tmp); C-=saveC; C*=-1;
-
- fClusters.AddLast((AliTPCcluster*)c);
- fChi2 += chisq;
-}
-
-//_____________________________________________________________________________
-Int_t AliTPCtrack::Rotate(Double_t alpha)
-{
- //-----------------------------------------------------------------
- // This function rotates this track.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- fAlpha += alpha;
-
- Double_t x1=fX, y1=x(0);
- Double_t ca=cos(alpha), sa=sin(alpha);
- Double_t r1=x(2)*fX - x(3);
-
- fX = x1*ca + y1*sa;
- x(0)=-x1*sa + y1*ca;
- x(3)=x(3)*ca + (x(2)*y1 + sqrt(1.- r1*r1))*sa;
-
- Double_t r2=x(2)*fX - x(3);
- if (TMath::Abs(r2) >= 0.999) {
- if (*this>4) cerr<<*this<<" AliTPCtrack warning: Rotation failed !\n";
- return 0;
- }
-
- Double_t y0=x(0) + sqrt(1.- r2*r2)/x(2);
- if ((x(0)-y0)*x(2) >= 0.) {
- if (*this>4) cerr<<*this<<" AliTPCtrack warning: Rotation failed !!!\n";
- return 0;
- }
-
- TMatrix F(5,5); F.UnitMatrix();
- F(0,0)=ca;
- F(3,0)=x(2)*sa;
- F(3,2)=(y1 - r1*x1/sqrt(1.- r1*r1))*sa;
- F(3,3)= ca + sa*r1/sqrt(1.- r1*r1);
- TMatrix tmp(F,TMatrix::kMult,C);
- // Double_t dy2=C(0,0);
- C.Mult(tmp,TMatrix(TMatrix::kTransposed,F));
- // C(0,0)+=dy2*sa*sa*r1*r1/(1.- r1*r1);
- // C(1,1)+=dy2*sa*sa*x(4)*x(4)/(1.- r1*r1);
-
- return 1;
-}
-
-//_____________________________________________________________________________
-void AliTPCtrack::UseClusters() const
-{
- //-----------------------------------------------------------------
- // This function marks clusters associated with this track.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- Int_t num_of_clusters=fClusters.GetEntriesFast();
- for (Int_t i=0; i<num_of_clusters; i++) {
- //if (i<=14) continue;
- AliTPCcluster *c=(AliTPCcluster*)fClusters.UncheckedAt(i);
- c->Use();
- }
-}
-
-//_____________________________________________________________________________
-Double_t AliTPCtrack::GetPredictedChi2(const AliTPCcluster *c) const
-{
- //-----------------------------------------------------------------
- // This function calculates a predicted chi2 increment.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- TMatrix H(2,5); H.UnitMatrix();
- TVector m(2); m(0)=c->fY; m(1)=c->fZ;
- TMatrix V(2,2); V(0,0)=c->fSigmaY2; V(0,1)=0.; V(1,0)=0.; V(1,1)=c->fSigmaZ2;
- TVector res=x; res*=H; res-=m; //res*=-1;
- TMatrix tmp(H,TMatrix::kMult,C);
- TMatrix R(tmp,TMatrix::kMult,TMatrix(TMatrix::kTransposed,H)); R+=V;
-
- Double_t det=(Double_t)R(0,0)*R(1,1) - (Double_t)R(0,1)*R(1,0);
- if (TMath::Abs(det) < 1.e-10) {
- if (*this>4) cerr<<*this<<" AliTPCtrack warning: Singular matrix !\n";
- return 1e10;
- }
- R(0,1)=R(0,0); R(0,0)=R(1,1); R(1,1)=R(0,1);
- R(1,0)*=-1; R(0,1)=R(1,0);
- R*=1./det;
-
- //R.Invert();
-
- TVector r=res;
- res*=R;
- return r*res;
-}
-
-//_____________________________________________________________________________
-struct S { Int_t lab; Int_t max; };
-Int_t AliTPCtrack::GetLabel(Int_t nrows) const
-{
- //-----------------------------------------------------------------
- // This function returns the track label. If label<0, this track is fake.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- Int_t num_of_clusters=fClusters.GetEntriesFast();
- S *s=new S[num_of_clusters];
- Int_t i;
- for (i=0; i<num_of_clusters; i++) s[i].lab=s[i].max=0;
-
- Int_t lab=123456789;
- for (i=0; i<num_of_clusters; i++) {
- AliTPCcluster *c=(AliTPCcluster*)fClusters.UncheckedAt(i);
- lab=TMath::Abs(c->fTracks[0]);
- Int_t j;
- for (j=0; j<num_of_clusters; j++)
- if (s[j].lab==lab || s[j].max==0) break;
- s[j].lab=lab;
- s[j].max++;
- }
-
- Int_t max=0;
- for (i=0; i<num_of_clusters; i++)
- if (s[i].max>max) {max=s[i].max; lab=s[i].lab;}
-
- delete[] s;
-
- for (i=0; i<num_of_clusters; i++) {
- AliTPCcluster *c=(AliTPCcluster*)fClusters.UncheckedAt(i);
- if (TMath::Abs(c->fTracks[1]) == lab ||
- TMath::Abs(c->fTracks[2]) == lab ) max++;
- }
-
- if (1.-Float_t(max)/num_of_clusters > 0.10) return -lab;
-
- Int_t tail=Int_t(0.08*nrows);
- if (num_of_clusters < tail) return lab;
-
- max=0;
- for (i=1; i<=tail; i++) {
- AliTPCcluster *c=(AliTPCcluster*)fClusters.UncheckedAt(num_of_clusters-i);
- if (lab == TMath::Abs(c->fTracks[0]) ||
- lab == TMath::Abs(c->fTracks[1]) ||
- lab == TMath::Abs(c->fTracks[2])) max++;
- }
- if (max < Int_t(0.5*tail)) return -lab;
-
- return lab;
-}
-
-//_____________________________________________________________________________
-void AliTPCtrack::GetPxPyPz(Double_t& px, Double_t& py, Double_t& pz) const
-{
- //-----------------------------------------------------------------
- // This function returns reconstructed track momentum in the global system.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- Double_t pt=TMath::Abs(GetPt()); // GeV/c
- Double_t r=x(2)*fX-x(3);
- Double_t y0=x(0) + sqrt(1.- r*r)/x(2);
- px=-pt*(x(0)-y0)*x(2); //cos(phi);
- py=-pt*(x(3)-fX*x(2)); //sin(phi);
- pz=pt*x(4);
- Double_t tmp=px*TMath::Cos(fAlpha) - py*TMath::Sin(fAlpha);
- py=px*TMath::Sin(fAlpha) + py*TMath::Cos(fAlpha);
- px=tmp;
-}
-
-//_____________________________________________________________________________
-Double_t AliTPCtrack::GetdEdX(Double_t low, Double_t up) const {
- //-----------------------------------------------------------------
- // This funtion calculates dE/dX within the "low" and "up" cuts.
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------
- Int_t ncl=fClusters.GetEntriesFast();
- Int_t n=0;
- Double_t *q=new Double_t[ncl];
- Int_t i;
- for (i=1; i<ncl; i++) { //Shall I think of this "i=1" ? (I.Belikov)
- AliTPCcluster *cl=(AliTPCcluster*)(fClusters.UncheckedAt(i));
- q[n++]=TMath::Abs(cl->fQ)/cl->fdEdX;
- if (cl->fSector<36) q[n-1]*=1.1;
- }
-
- //stupid sorting
- Int_t swap;
- do {
- swap=0;
- for (i=0; i<n-1; i++) {
- if (q[i]<=q[i+1]) continue;
- Double_t tmp=q[i]; q[i]=q[i+1]; q[i+1]=tmp;
- swap++;
- }
- } while (swap);
-
- Int_t nl=Int_t(low*n), nu=Int_t(up *n);
- Double_t dedx=0.;
- for (i=nl; i<=nu; i++) dedx += q[i];
- dedx /= (nu-nl+1);
- return dedx;
-}
-
-//_________________________________________________________________________
-//
-// Classes for internal tracking use
-//_________________________________________________________________________
-void AliTPCRow::InsertCluster(const AliTPCcluster* c) {
- //-----------------------------------------------------------------------
- // Insert a cluster into this pad row in accordence with its y-coordinate
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------------
- if (num_of_clusters==MAX_CLUSTER_PER_ROW) {
- cerr<<"AliTPCRow::InsertCluster(): Too many clusters !\n"; return;
- }
- if (num_of_clusters==0) {clusters[num_of_clusters++]=c; return;}
- Int_t i=Find(c->fY);
- memmove(clusters+i+1 ,clusters+i,(num_of_clusters-i)*sizeof(AliTPCcluster*));
- clusters[i]=c; num_of_clusters++;
-}
-//___________________________________________________________________
-
-Int_t AliTPCRow::Find(Double_t y) const {
- //-----------------------------------------------------------------------
- // Return the index of the nearest cluster
- //
- // Origin: Iouri Belikov, CERN, Jouri.Belikov@cern.ch
- //-----------------------------------------------------------------------
- if (y <= clusters[0]->fY) return 0;
- if (y > clusters[num_of_clusters-1]->fY) return num_of_clusters;
- Int_t b=0, e=num_of_clusters-1, m=(b+e)/2;
- for (; b<e; m=(b+e)/2) {
- if (y > clusters[m]->fY) b=m+1;
- else e=m;
- }
- return m;
-}
-//________________________________________________________________________