Defining properly momentum components in AliMUONHit constructors (thanks Artur)
[u/mrichter/AliRoot.git] / TPC / AliTPCPid.cxx
1 /**************************************************************************
2  * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
3  *                                                                        *
4  * Author: The ALICE Off-line Project.                                    *
5  * Contributors are mentioned in the code where appropriate.              *
6  *                                                                        *
7  * Permission to use, copy, modify and distribute this software and its   *
8  * documentation strictly for non-commercial purposes is hereby granted   *
9  * without fee, provided that the above copyright notice appears in all   *
10  * copies and that both the copyright notice and this permission notice   *
11  * appear in the supporting documentation. The authors make no claims     *
12  * about the suitability of this software for any purpose. It is          *
13  * provided "as is" without express or implied warranty.                  *
14  **************************************************************************/
15
16 /* $Id$ */
17
18 #include "AliTPCPid.h"
19 #include "TMath.h"
20 //#include <TVector.h>
21 #include <TF1.h>
22 #include <TClonesArray.h>
23 //#include "AliITSIOTrack.h"
24 #include "AliKalmanTrack.h"
25 #include "Riostream.h"
26 ClassImp(AliTPCPid)
27 // Correction 13.01.2003 Z.S.,Dubna
28 //            22.01.2003
29 //------------------------------------------------------------
30 // pid class by B. Batyunya
31 // stupid corrections by M.K.
32 //
33 //________________________________________________________
34   AliTPCPid::AliTPCPid( const AliTPCPid& r):TObject(r)
35 {
36   // dummy copy constructor
37 }
38 Float_t AliTPCPid::Qcorr(Float_t xc)
39 {
40   //
41   // charge correction
42   //
43     assert(0);
44   Float_t fcorr;
45   fcorr=( 0.766 +0.9692*xc -1.267*xc*xc )*( 1.-TMath::Exp(-xc*64.75) );
46   if(fcorr<=0.1)fcorr=0.1;
47 return fqtot/fcorr;
48 }
49 //-----------------------------------------------------------
50 Float_t AliTPCPid::Qtrm(Int_t track) const
51 {
52   //
53   // dummy comment (Boris!!!)
54   //
55     TVector q(*( this->GetVec(track)  ));
56     Int_t ml=(Int_t)q(0);
57     if(ml<1)return 0.;
58     if(ml>6)ml=6;
59     float vf[6];
60     Int_t nl=0; for(Int_t i=0;i<ml;i++){if(q(i)>fSigmin){vf[nl]=q(i+1);nl++;}}
61     if(nl==0)return 0.;
62     switch(nl){
63       case  1:q(6)=q(1); break;
64       case  2:q(6)=(q(1)+q(2))/2.; break;
65       default:
66         for(int fi=0;fi<2;fi++){
67           Int_t swap;
68           do{ swap=0; float qmin=vf[fi];
69           for(int j=fi+1;j<nl;j++)
70             if(qmin>vf[j]){qmin=vf[j];vf[j]=vf[fi];vf[fi]=qmin;swap=1;};
71           }while(swap==1);
72         }
73         q(6)= (vf[0]+vf[1])/2.;
74         break;
75     }
76     for(Int_t i=0;i<nl;i++){q(i+1)=vf[i];} this->SetVec(track,q);
77     return (q(6));
78 }// --- End AliTPCPid::Qtrm ---
79
80 Float_t AliTPCPid::Qtrm(Float_t qarr[6],Int_t narr)
81 {
82   //..................
83   Float_t q[6],qm,qmin;
84   Int_t nl,ml;
85   if(narr>0&&narr<7){ml=narr;}else{return 0;};
86   nl=0; for(Int_t i=0;i<ml;i++){if(qarr[i]>fSigmin){q[nl]=qarr[i];nl++;}}
87   if(nl==0)return 0.;
88     switch(nl){
89       case  1:qm=q[0]; break;
90       case  2:qm=(q[0]+q[1])/2.; break;
91       default:
92         Int_t swap;
93         for(int fi=0;fi<2;fi++){
94           do{ swap=0; qmin=q[fi];
95           for(int j=fi+1;j<nl;j++)
96             if(qmin>q[j]){qmin=q[j];q[j]=q[fi];q[fi]=qmin;swap=1;};
97           }while(swap==1);
98         }
99         qm= (q[0]+q[1])/2.;
100         break;
101     }
102     return qm;
103 }// --- End AliTPCPid::Qtrm  ---
104
105 Int_t   AliTPCPid::Wpik(Int_t nc,Float_t q)
106 {
107   //
108   //  pi-k
109   //
110     Float_t qmpi,qmk,sigpi,sigk,dpi,dk,ppi,pk;
111     Float_t appi,apk;
112     qmpi =fcut[nc][1];
113     sigpi=fcut[nc][2];
114     qmk  =fcut[nc][3];
115     sigk =fcut[nc][4];
116     appi = faprob[0][nc-5];
117     apk  = faprob[1][nc-5];
118     if( !fSilent ){
119     cout<<"qmpi,sigpi,qmk,sigk="<<qmpi<<"  "<<sigpi<<"  "<<qmk<<"  "<<sigk<<endl;
120     cout<<"appi,apk="<<appi<<","<<apk<<endl;
121     }
122     Float_t dqpi=(q-qmpi)/sigpi;
123     Float_t dqk =(q-qmk )/sigk;
124     dpi =TMath::Abs(dqpi);
125     dk  =TMath::Abs(dqk);
126     Double_t dn=appi*TMath::Gaus(q,qmpi,sigpi)+apk*TMath::Gaus(q,qmk,sigk);
127     if(dn>0.){
128       ppi=appi*TMath::Gaus(q,qmpi,sigpi)/dn;
129       pk = apk*TMath::Gaus(q,qmk, sigk )/dn;
130     }else{fWpi=1;return Pion();}
131     Float_t rpik=ppi/(pk+0.0000001); 
132     if( !fSilent )
133         cout<<"q,dqpi,dqk, Wpik: ppi,pk,rpik="
134         <<q<<"  "<<dqpi<<"  "<<dqk<<"  "<<ppi<<"  "<<pk<<"  "<<rpik<<endl;
135
136     fWp=0.; fWpi=ppi; fWk=pk;
137     if( pk>ppi){return Kaon();}else{return Pion();}
138 }
139 //-----------------------------------------------------------
140 Int_t   AliTPCPid::Wpikp(Int_t nc,Float_t q)
141 {
142   //
143   // pi-k-p
144   //
145    Float_t qmpi,qmk,qmp,sigpi,sigk,sigp,ppi,pk,pp;
146    Float_t appi,apk,app;
147
148     qmpi =fcut[nc][1];
149     sigpi=fcut[nc][2];
150     qmk  =fcut[nc][3];
151     sigk =fcut[nc][4];
152     qmp  =fcut[nc][5];
153     sigp =fcut[nc][6];
154
155     //appi = apk = app = 1.;
156     appi = faprob[0][nc-5];
157     apk  = faprob[1][nc-5];
158     app  = faprob[2][nc-5];
159
160     Double_t dn= appi*TMath::Gaus(q,qmpi,sigpi)
161       +apk*TMath::Gaus(q,qmk,sigk)+app*TMath::Gaus(q,qmp,sigp);
162     if(dn>0.){
163     ppi=appi*TMath::Gaus(q,qmpi,sigpi)/dn;
164     pk = apk*TMath::Gaus(q,qmk, sigk )/dn;
165     pp = app*TMath::Gaus(q,qmp, sigp )/dn;
166      }
167     else{fWpi=1;return Pion();}
168     fWp=pp; fWpi=ppi; fWk=pk;
169     if( !fSilent ){
170 cout<<" Wpikp: mid,sig pi,k,p="<<qmpi<<" "<<sigpi<<";   "<<qmk<<" "<<sigk<<";   "
171     <<qmp<<" "<<sigp<<"; "<<endl;
172 cout<<" faprob: "<<appi<<"  "<<apk<<"  "<<app<<endl;
173 cout<<" ppi,pk,pp="<<ppi<<"  "<<pk<<"  "<<pp<<endl;
174      }
175     if( ppi>pk&&ppi>pp )  { return Pion(); }
176     if(pk>pp){return Kaon();}else{return Proton();}
177 }
178 //-----------------------------------------------------------
179 Int_t   AliTPCPid::GetPcode(TClonesArray* /*rps*/,Float_t /*pm*/) const
180 {
181   //
182   // dummy ???
183   //
184     return 0;    
185 }
186 //-----------------------------------------------------------
187 Int_t   AliTPCPid::GetPcode(AliTPCtrack *track)
188 {
189   //
190   // get particle code
191   //
192       Double_t xk,par[5]; track->GetExternalParameters(xk,par);
193       Float_t phi=TMath::ASin(par[2]) + track->GetAlpha();
194       if (phi<-TMath::Pi()) phi+=2*TMath::Pi();
195       if (phi>=TMath::Pi()) phi-=2*TMath::Pi();
196       Float_t lam=TMath::ATan(par[3]); 
197       Float_t pt1=TMath::Abs(par[4]);
198       Float_t mom=1./(pt1*TMath::Cos(lam));
199       Float_t dedx=track->GetdEdx();
200     Int_t pcode=GetPcode(dedx/40.,mom);
201     cout<<"TPCtrack dedx,mom,pcode="<<dedx<<","<<mom<<","<<pcode<<endl;
202     return pcode?pcode:211;
203     }
204 //-----------------------------------------------------------
205 Int_t   AliTPCPid::GetPcode(AliKalmanTrack *track)
206 {
207   //
208   // get particle code
209   //
210   if(track==0)return 0;
211   //      track->Propagate(track->GetAlpha(),3.,0.1/65.19*1.848,0.1*1.848);
212       track->PropagateTo(3.,0.0028,65.19);
213       track->PropagateToVertex();
214     Double_t xk,par[5]; track->GetExternalParameters(xk,par);
215     Float_t lam=TMath::ATan(par[3]);
216     Float_t pt1=TMath::Abs(par[4]);
217     Float_t mom=0.;
218     if( (pt1*TMath::Cos(lam))!=0. ){ mom=1./(pt1*TMath::Cos(lam)); }else{mom=0.;};
219     Float_t dedx=track->GetdEdx();
220     cout<<"lam,pt1,mom,dedx="<<lam<<","<<pt1<<","<<mom<<","<<dedx<<endl;
221     Int_t pcode=GetPcode(dedx,mom);
222     cout<<"ITS V2 dedx,mom,pcode="<<dedx<<","<<mom<<","<<pcode<<endl;
223 return pcode?pcode:211;
224 }
225 //-----------------------------------------------------------
226 Int_t   AliTPCPid::GetPcode(Float_t q,Float_t pm)
227 {
228   //
229   // get particle code
230   //
231     fWpi=fWk=fWp=0.;     fPcode=0;
232 //1)---------------------- 0-120 MeV/c --------------
233     if ( pm<=fcut[1][0] )
234         { fWpi=1.; return Pion(); }
235 //2)----------------------120-200 Mev/c ( 29.7.2002 ) ------------- 
236     if ( pm<=fcut[2][0] )
237         { if( q<fCutKa->Eval(pm) ){fWpi=1.; return Pion(); } 
238                              else {fWk =1.; return  Kaon();} }
239 //3)----------------------200-400 Mev/c -------------
240     if ( pm<=fcut[3][0] )
241         if( q<fCutKa->Eval(pm) )
242                 { fWpi=1.;return Pion(); }
243              else
244                 { if ( q<=fCutPr->Eval(pm) ) 
245                              {fWk=1.;return Kaon();} 
246                         else {fWp=1.;return Proton();}
247                 }
248 //4)----------------------400-450 Mev/c -------------
249     if ( pm<=fcut[4][0] )
250         if( q<fCutKaTune*fCutKa->Eval(pm) )
251                 { fWpi=1.;return Pion(); }
252             else
253                 { if( q<fCutPr->Eval(pm) ) 
254                   {fWk=1.;return Kaon();} else {fWp=1.;return Proton(); }
255                 }
256 //5)----------------------450-500 Mev/c -------------
257     if ( pm<=fcut[5][0] )
258         if ( q>fCutPr->Eval(pm) )
259            {fWp=1.;return Proton();} else {return Wpik(5,q);};
260 //6)----------------------500-550 Mev/c -------------
261     if ( pm<=fcut[6][0] )
262         if ( q>fCutPr->Eval(pm) )
263            {fWp=1.;return Proton();} else {return Wpik(6,q);};
264 //7)----------------------550-600 Mev/c -------------
265     if ( pm<=fcut[7][0] )
266         if ( q>fCutPr->Eval(pm) )
267            {fWp=1.;return Proton();} else {return Wpik(7,q);};
268 //8)----------------------600-650 Mev/c -------------
269     if ( pm<=fcut[8][0] )
270       if ( q>fCutPrTune*fCutPr->Eval(pm) ){fWp=1.;return Proton();} 
271                                      else {return Wpik(8,q);};
272 //9)----------------------650-730 Mev/c -------------
273     if ( pm<=fcut[9][0] )
274       if ( q>fCutPrTune*fCutPr->Eval(pm) ){fWp=1.;return Proton();}
275                                      else {return Wpik(9,q);};
276 //10)----------------------730-830 Mev/c -------------
277     if( pm<=fcut[10][0] )
278       if ( q>fCutPrTune*fCutPr->Eval(pm) ){fWp=1.;return Proton();}
279                                      else {return Wpik(10,q);};
280 //11)----------------------830-930 Mev/c -------------
281     if( pm<=fcut[11][0] ){ return Wpikp(11,q); }
282 //12)----------------------930-1030 Mev/c -------------
283     if( pm<=fcut[12][0] )
284      { return Wpikp(12,q); };
285
286     return fPcode;    
287 }
288 //-----------------------------------------------------------
289 void    AliTPCPid::SetCut(Int_t n,Float_t pm,Float_t pilo,Float_t pihi,
290                         Float_t klo,Float_t khi,Float_t plo,Float_t phi)
291 {
292   //
293   // set cuts
294   //
295     fcut[n][0]=pm;
296     fcut[n][1]=pilo;
297     fcut[n][2]=pihi;
298     fcut[n][3]=klo;
299     fcut[n][4]=khi;
300     fcut[n][5]=plo;
301     fcut[n][6]=phi;
302     return ;    
303 }
304 //------------------------------------------------------------
305 void AliTPCPid::SetVec(Int_t ntrack,TVector info) const
306 {
307   //
308   // new track vector
309   //
310 TClonesArray& arr=*trs;
311     new( arr[ntrack] ) TVector(info);
312 }
313 //-----------------------------------------------------------
314 TVector* AliTPCPid::GetVec(Int_t ntrack) const
315 {
316   //
317   // get track vector
318   //
319 TClonesArray& arr=*trs;
320     return (TVector*)arr[ntrack];
321 }
322 //-----------------------------------------------------------
323 void AliTPCPid::SetEdep(Int_t track,Float_t Edep)
324 {
325   //
326   // energy deposit
327   //
328     TVector xx(0,11);
329     if( ((TVector*)trs->At(track))->IsValid() )
330         {TVector yy( *((TVector*)trs->At(track)) );xx=yy; }
331     Int_t j=(Int_t)xx(0); if(j>4)return;
332     xx(++j)=Edep;xx(0)=j;
333     TClonesArray &arr=*trs;
334     new(arr[track])TVector(xx);
335 }
336 //-----------------------------------------------------------
337 void AliTPCPid::SetPmom(Int_t track,Float_t Pmom)
338 {
339   //
340   // set part. momentum
341   //
342     TVector xx(0,11);
343     if( ((TVector*)trs->At(track))->IsValid() )
344         {TVector yy( *((TVector*)trs->At(track)) );xx=yy; }
345     xx(10)=Pmom;
346     TClonesArray &arr=*trs;
347     new(arr[track])TVector(xx);
348 }
349 //-----------------------------------------------------------
350 void AliTPCPid::SetPcod(Int_t track,Int_t partcode)
351 {
352   //
353   // set part. code
354   //
355     TVector xx(0,11);
356     if( ((TVector*)trs->At(track))->IsValid() )
357         {TVector yy( *((TVector*)trs->At(track)) );xx=yy; }
358     if(xx(11)==0)
359         {xx(11)=partcode; fmxtrs++;
360         TClonesArray &arr=*trs;
361         new(arr[track])TVector(xx);
362         }
363 }
364 //-----------------------------------------------------------
365 void AliTPCPid::Print(Int_t track)
366 {
367   //
368   // control print
369   //
370 cout<<fmxtrs<<" tracks in AliITSPid obj."<<endl;
371     if( ((TVector*)trs->At(track))->IsValid() )
372         {TVector xx( *((TVector*)trs->At(track)) );
373          xx.Print();
374          }
375     else 
376         {cout<<"No data for track "<<track<<endl;return;}
377 }
378 //-----------------------------------------------------------
379 void AliTPCPid::Tab(void)
380 {
381   //
382   // fill table
383   //
384 if(trs->GetEntries()==0){cout<<"No entries in TAB"<<endl;return;}
385 cout<<"------------------------------------------------------------------------"<<endl;
386 cout<<"Nq"<<"   q1  "<<"   q2  "<<"   q3  "<<"   q4  "<<"   q5   "<<
387       " Qtrm    "    <<"  Wpi  "<<"  Wk   "<<"  Wp  "<<"Pmom  "<<endl;
388 cout<<"------------------------------------------------------------------------"<<endl;
389 for(Int_t i=0;i<trs->GetEntries();i++)
390 {
391   TVector xx( *((TVector*)trs->At(i)) );     
392     if( xx.IsValid() && xx(0)>0 )
393         {
394             TVector xx( *((TVector*)trs->At(i)) );
395             if(xx(0)>=2)
396                 {
397 //       1)Calculate Qtrm       
398                     xx(6)=(this->Qtrm(i));
399
400                  }else{
401                      xx(6)=xx(1);
402                  }
403 //       2)Calculate Wpi,Wk,Wp
404             this->GetPcode(xx(6),xx(10)/1000.);
405             xx(7)=GetWpi();
406             xx(8)=GetWk();
407             xx(9)=GetWp();
408 //       3)Print table
409             if(xx(0)>0){
410                     cout<<xx(0)<<" ";
411                     for(Int_t j=1;j<11;j++){
412                         cout.width(7);cout.precision(5);cout<<xx(j);
413                     }
414                     cout<<endl;
415                 }
416 //        4)Update data in TVector
417             TClonesArray &arr=*trs;
418             new(arr[i])TVector(xx);      
419         }
420     else 
421       {/*cout<<"No data for track "<<i<<endl;*/}
422 }// End loop for tracks
423 }
424 void AliTPCPid::Reset(void)
425 {
426   //
427   // reset
428   //
429   for(Int_t i=0;i<trs->GetEntries();i++){
430     TVector xx(0,11);
431     TClonesArray &arr=*trs;
432     new(arr[i])TVector(xx);
433   }
434 }
435 //-----------------------------------------------------------
436 AliTPCPid::AliTPCPid(Int_t ntrack)
437 {
438     trs = new TClonesArray("TVector",ntrack);
439     TClonesArray &arr=*trs;
440     for(Int_t i=0;i<ntrack;i++)new(arr[i])TVector(0,11);
441     fmxtrs=0;
442
443     //fCutKa = new TF1("fkaons","[0]/x/x+[1]",0.1,1.2);
444     //fCutPr = new TF1("fprotons","[0]/x/x +[1]",0.2,1.2);
445     TF1 *frmska=0;
446     
447     frmska = new TF1("x_frmska","1.46-7.82*x+16.78*x^2-15.53*x^3+5.24*x^4 ",
448                 0.1,1.2);
449     fCutKa = new TF1("fkaons",
450            "1.25+0.044/x/x+1.25+0.044*x-13.87*x^2+22.37*x^3-10.05*x^4-2.5*x_frmska",
451            0.1,1.2);
452     fCutPr = new TF1("fprotons",
453                      "0.83*(15.32-56.094*x+89.962*x^2-66.1856*x^3+18.4052*x^4)",
454                      0.2,1.2); 
455     fCutKaTune=1.1; // 0.92; 
456     fCutPrTune=1.0; //0.80;
457     
458 const int kinf=10;
459 //         Ncut Pmom   pilo  pihi    klo    khi     plo    phi
460 //       fcut[j] [0]    [1]    [2]    [3]    [4]     [5]    [6]
461 //----------------------------------------------------------------
462     SetCut(  1, 0.120,  0.  ,  0.  , kinf  , kinf   , kinf  , kinf  );
463     SetCut(  2, 0.200,  0.  ,  6.0 , 6.0  , kinf   , kinf  , kinf  ); //120-200
464     SetCut(  3, 0.400,  0.  ,  3.5 , 3.5  , 9.0   , 9.0  , kinf  ); //200-400
465     SetCut(  4, 0.450,  0.  ,  1.9 , 1.9  , 4.0   , 4.0  , kinf  ); //400-450
466 //----------------------------------------------------------------
467     SetCut(  5, 0.500, 0.976, 0.108, 1.484 , 0.159  , 3.5  , kinf  );  //450-500
468     SetCut(  6, 0.550, 0.979, 0.108, 1.376 , 0.145  , 3.0  , kinf  );  //500-550
469 //----------------------------------------------------------------    
470     SetCut(  7, 0.600, 0.984, 0.111, 1.295 , 0.146 , 2.7  , kinf  );   //550-600
471     SetCut(  8, 0.650, 0.989, 0.113, 1.239 , 0.141 , 2.5  , kinf  );   //600-650
472     SetCut(  9, 0.730, 0.995, 0.109, 1.172 , 0.132 , 2.0  , kinf  );   //650-730
473 //----------------------------------------------------------------    
474     SetCut( 10, 0.830, 1.008, 0.116, 1.117 , 0.134 , 1.703, 0.209 ); //730-830
475     SetCut( 11, 0.930, 1.019, 0.115, 1.072 , 0.121 , 1.535, 0.215 ); //830-930
476     SetCut( 12, 1.230, 1.035, 0.117, 1.053 , 0.140  ,1.426, 0.270); //930-1030
477     //------------------------ pi,K ---------------------
478     faprob[0][0]=33219.;   faprob[1][0]=1971.;   // faprob[0][i] -    pions 
479     faprob[0][1]=28828.;   faprob[1][1]=1973.; // faprob[1][i] -    kaons
480     //---------------------------------------------------
481     faprob[0][2]=24532.;   faprob[1][2]=1932.; faprob[2][2]=1948.;
482     faprob[0][3]=20797.;   faprob[1][3]=1823.; faprob[2][3]=1970.;   
483     faprob[0][4]=27017.;   faprob[1][4]=2681.; faprob[2][4]=2905.;
484     //------------------------ pi,K,p -------------------
485     faprob[0][5]= 24563.;    faprob[1][5]=2816.;  faprob[2][5]=3219.;  
486     faprob[0][6]= 16877.;    faprob[1][6]=2231.;  faprob[2][6]=2746.;
487     faprob[0][7]= 11557.;    faprob[1][7]=1681;   faprob[2][7]=2190.;
488
489     fSilent=kTRUE;
490 }
491 //-----------------------------------------------------------
492
493
494