Comment...uncomment...
[u/mrichter/AliRoot.git] / HMPID / AliHMPIDTracker.cxx
1 #include "AliHMPIDTracker.h"     //class header
2 #include "AliHMPIDtrack.h"       //class header
3 #include "AliHMPIDCluster.h"     //GetTrackPoint(),PropagateBack() 
4 #include "AliHMPIDParam.h"       //GetTrackPoint(),PropagateBack()
5 #include "AliHMPIDPid.h"         //Recon(),reconHTA()
6 #include "AliHMPIDRecon.h"       //Recon()
7 #include "AliHMPIDReconHTA.h"    //ReconHTA()
8 #include <AliESDEvent.h>         //PropagateBack(),Recon()  
9 #include <AliESDtrack.h>         //Intersect()  
10 #include <AliRun.h>              //GetTrackPoint(),PropagateBack()  
11 #include <AliTrackPointArray.h>  //GetTrackPoint()
12 #include <AliAlignObj.h>         //GetTrackPoint()
13 #include <AliCDBManager.h>       //PropageteBack()
14 #include <AliCDBEntry.h>         //PropageteBack()
15 //.
16 // HMPID base class fo tracking
17 //.
18 //.
19 //.
20 ClassImp(AliHMPIDTracker)
21 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
22 AliHMPIDTracker::AliHMPIDTracker():
23   AliTracker(),
24   fClu(new TObjArray(AliHMPIDParam::kMaxCh+1))  
25 {
26 // ctor. Create TObjArray of TClonesArray of AliHMPIDCluster  
27 // 
28 //  
29   fClu->SetOwner(kTRUE);
30   for(int i=AliHMPIDParam::kMinCh;i<=AliHMPIDParam::kMaxCh;i++) fClu->AddAt(new TClonesArray("AliHMPIDCluster"),i);
31 }//ctor
32 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++    
33 Bool_t AliHMPIDTracker::GetTrackPoint(Int_t idx, AliTrackPoint& point) const
34 {
35 // Interface callback methode invoked from AliReconstruction::WriteAlignmentData() to get position of MIP cluster in MARS associated to a current track.
36 // MIP cluster is reffered by index which is stored in AliESDtrack  ???????
37 // Arguments: idx- cluster index which is stored by HMPID in AliESDtrack
38 //            point- reference to the object where to store the point     
39 //   Returns: status of operation  if FALSE then AliReconstruction::WriteAlignmentData() do not store this point to array of points for current track. 
40   if(idx<0) return kFALSE; //no MIP cluster assigned to this track in PropagateBack()
41   Int_t iCham=idx/1000000; Int_t iClu=idx%1000000;
42   iClu = iClu%1000; //GetHMPIDcluIdx -> 1e+6*ch + 1e+3*clusize + cluIdx;
43   point.SetVolumeID(AliGeomManager::LayerToVolUID(AliGeomManager::kHMPID,iCham));//layer and chamber number
44   TClonesArray *pArr=(TClonesArray*)(*fClu)[iCham];
45   AliHMPIDCluster *pClu=(AliHMPIDCluster*)pArr->UncheckedAt(iClu);//get pointer to cluster
46   Float_t xyz[3];
47   pClu->GetGlobalXYZ(xyz);
48   Float_t cov[6];
49   pClu->GetGlobalCov(cov);
50   point.SetXYZ(xyz,cov);
51   return kTRUE;
52 }//GetTrackPoint()
53 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
54 Int_t AliHMPIDTracker::IntTrkCha(AliESDtrack *pTrk,Float_t &xPc,Float_t &yPc,Float_t &xRa,Float_t &yRa,Float_t &theta,Float_t &phi)
55 {
56 // Static method to find intersection in between given track and HMPID chambers
57 // Arguments: pTrk- ESD track; xPc,yPc- track intersection with PC in LORS [cm]
58 //   Returns: intersected chamber ID or -1
59   AliHMPIDtrack *hmpTrk = new AliHMPIDtrack(*pTrk);                                             //create a hmpid track to be used for propagation and matching 
60   for(Int_t i=AliHMPIDParam::kMinCh;i<=AliHMPIDParam::kMaxCh;i++){                              //chambers loop
61     Int_t chInt = IntTrkCha(i,hmpTrk,xPc,yPc,xRa,yRa,theta,phi);
62     if(chInt>=0) {delete hmpTrk;hmpTrk=0x0;return chInt;}
63   }                                                                                             //chambers loop
64   delete hmpTrk; hmpTrk=0x0;
65   return -1;                                                                                    //no intersection with HMPID chambers
66 }//IntTrkCha()
67 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
68 Int_t AliHMPIDTracker::IntTrkCha(Int_t ch,AliHMPIDtrack *pTrk,Float_t &xPc,Float_t &yPc,Float_t &xRa,Float_t &yRa,Float_t &theta,Float_t &phi)
69 {
70 // Static method to find intersection in between given track and HMPID chambers
71 // Arguments: pTrk- HMPID track; xPc,yPc- track intersection with PC in LORS [cm]
72 //   Returns: intersected chamber ID or -1
73     AliHMPIDParam *pParam=AliHMPIDParam::Instance();
74     Double_t p1[3],n1[3]; 
75     pParam->Norm(ch,n1); 
76     pParam->Point(ch,p1,AliHMPIDParam::kRad);                                                    //point & norm  for middle of radiator plane
77     Double_t p2[3],n2[3]; 
78     pParam->Norm(ch,n2);
79     pParam->Point(ch,p2,AliHMPIDParam::kPc);                                                     //point & norm  for entrance to PC plane
80     if(pTrk->Intersect(pTrk,p1,n1)==kFALSE) return -1;                                           //try to intersect track with the middle of radiator
81     if(pTrk->Intersect(pTrk,p2,n2)==kFALSE) return -1;   
82     pParam->Mars2LorsVec(ch,n1,theta,phi);                                                       //track angles at RAD
83     pParam->Mars2Lors   (ch,p1,xRa,yRa);                                                         //TRKxRAD position
84     pParam->Mars2Lors   (ch,p2,xPc,yPc);                                                         //TRKxPC position
85     if(AliHMPIDParam::IsInside(xPc,yPc,pParam->DistCut())==kTRUE) return ch;                     //return intersected chamber  
86   return -1;                                                                                     //no intersection with HMPID chambers
87 }//IntTrkCha()
88 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
89 Int_t AliHMPIDTracker::LoadClusters(TTree *pCluTree)
90 {
91 // Interface callback methode invoked from AliReconstruction::RunTracking() to load HMPID clusters before PropagateBack() gets control. Done once per event.
92 // Arguments: pCluTree- pointer to clusters tree got by AliHMPIDLoader::LoadRecPoints("read") then AliHMPIDLoader::TreeR()
93 //   Returns: error code (currently ignored in AliReconstruction::RunTraking())    
94   for(int i=AliHMPIDParam::kMinCh;i<=AliHMPIDParam::kMaxCh;i++) pCluTree->SetBranchAddress(Form("HMPID%d",i),&((*fClu)[i]));
95   pCluTree->GetEntry(0);
96   return 0;  
97 }//LoadClusters()
98 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
99 Int_t AliHMPIDTracker::PropagateBack(AliESDEvent *pEsd)
100 {
101 // Interface pure virtual in AliTracker. Invoked from AliReconstruction::RunTracking() after invocation of AliTracker::LoadClusters() once per event
102 // Agruments: pEsd - pointer to ESD
103 //   Returns: error code    
104   AliCDBEntry *pNmeanEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Nmean"); //contains TObjArray of 42 TF1 + 1 EPhotMean
105   AliCDBEntry *pQthreEnt =AliCDBManager::Instance()->Get("HMPID/Calib/Qthre"); //contains TObjArray of 42 (7ch * 6sec) TF1
106   if(!pNmeanEnt) AliError("No Nmean C6F14 ");
107   if(!pQthreEnt) AliError("No Qthre");
108     
109   return Recon(pEsd,fClu,(TObjArray*)pNmeanEnt->GetObject(),(TObjArray*)pQthreEnt->GetObject());  
110 }//PropagateBack()
111 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
112 Int_t AliHMPIDTracker::Recon(AliESDEvent *pEsd,TObjArray *pClus,TObjArray *pNmean, TObjArray *pQthre)
113 {
114 // Static method to reconstruct Theta Ckov for all valid tracks of a given event.
115 // Arguments: pEsd- pointer ESD; pClu- pointer to clusters for all chambers; pNmean - pointer to all function Nmean=f(time)
116 //   Returns: error code, 0 if no errors   
117   
118   AliHMPIDRecon recon;                                                                           //instance of reconstruction class, nothing important in ctor
119   Float_t xPc,yPc,xRa,yRa,theta,phi;
120   Double_t cluLORS[2]={0};
121 //  Double_t cluMARS[3]={0},trkMARS[3]={0};
122 //  Double_t bestcluMARS[3]={0,0,0};
123 //  Double_t radClu,radInitTrk;   
124   Int_t nMipClusTot=0;
125 //  Double_t d3d=0;
126   Double_t qthre = 0;   Double_t nmean=0; Int_t hvsec=0;
127   Int_t nClusCh[AliHMPIDParam::kMaxCh+1];
128   
129   AliHMPIDParam *pParam = AliHMPIDParam::Instance();                                             //Instance of AliHMPIDParam
130   
131   for(Int_t iTrk=0;iTrk<pEsd->GetNumberOfTracks();iTrk++){                                        //loop on the ESD tracks in the event
132     
133 //    Double_t bestChi2=99999;chi2=99999;                                                          //init. track matching params
134     Double_t dmin=999999,bz=0;
135
136     Bool_t isOkDcut=kFALSE;
137     Bool_t isOkQcut=kFALSE;
138     Bool_t isMatched=kFALSE;
139     
140     AliHMPIDCluster *bestHmpCluster=0x0;                                                          //the best matching cluster
141     AliESDtrack *pTrk = pEsd->GetTrack(iTrk);                                                     //get reconstructed track    
142     AliHMPIDtrack *hmpTrk = new AliHMPIDtrack(*pTrk);                                             //create a hmpid track to be used for propagation and matching 
143     bz=AliTracker::GetBz();  
144 //initial flags for HMPID ESD infos    
145     pTrk->SetHMPIDtrk(0,0,0,0);                                                                //no intersection found
146     pTrk->SetHMPIDmip(0,0,0,0);                                                                //store mip info in any case 
147     pTrk->SetHMPIDcluIdx(99,99999);                                                            //chamber not found, mip not yet considered
148     pTrk->SetHMPIDsignal(AliHMPIDRecon::kNotPerformed);                                        //ring reconstruction not yet performed
149     
150     Int_t ipCh=IntTrkCha(pTrk,xPc,yPc,xRa,yRa,theta,phi);                                        //find the intersected chamber for this track 
151
152     if(ipCh<0) continue;                                                                         //no intersection at all, go after next track
153
154     pTrk->SetHMPIDtrk(xRa,yRa,theta,phi);                                                        //store initial infos
155     pTrk->SetHMPIDcluIdx(ipCh,9999);                                                             //set chamber, index of cluster + cluster size
156     
157 // track intersects the chamber ipCh: find the MIP          
158     
159     TClonesArray *pMipCluLst=(TClonesArray *)pClus->At(ipCh);                                   //get the list of clusters
160     nMipClusTot = pMipCluLst->GetEntries();                                                     //total number of clusters in the given chamber
161     nClusCh[ipCh] = nMipClusTot;
162     
163     if(nMipClusTot==0) continue;                                                                         
164     
165     Int_t index=-1;                                                                             //index of the "best" matching cluster
166     
167     for (Int_t iClu=0; iClu<nMipClusTot;iClu++) {                                               //clusters loop
168       
169       AliHMPIDCluster *pClu=(AliHMPIDCluster*)pMipCluLst->UncheckedAt(iClu);                    //get the cluster
170 // evaluate qThre
171       if(pQthre->GetEntriesFast()==pParam->kMaxCh+1) {                                             // just for backward compatibility
172         qthre=((TF1*)pQthre->At(pClu->Ch()))->Eval(pEsd->GetTimeStamp());                          //
173       } else {                                                                                     // in the past just 1 qthre
174         hvsec = pParam->InHVSector(pClu->Y());                                              //  per chamber
175         if(hvsec>=0)
176           qthre=((TF1*)pQthre->At(6*ipCh+hvsec))->Eval(pEsd->GetTimeStamp());                      //
177       }                                                                                            //
178 //
179       if(pClu->Q()<qthre) continue;                                                                      //charge compartible with MIP clusters      
180       isOkQcut = kTRUE;
181 //
182       cluLORS[0]=pClu->X(); cluLORS[1]=pClu->Y();                                            //get the LORS coordinates of the cluster
183       Double_t dist = TMath::Sqrt((xPc-cluLORS[0])*(xPc-cluLORS[0])+(yPc-cluLORS[1])*(yPc-cluLORS[1]));
184       
185       if(dist<dmin) {
186         dmin = dist;
187         index=iClu;
188         bestHmpCluster=pClu;
189       }
190     }
191 /*            
192       pParam->Lors2Mars(ipCh,cluLORS[0],cluLORS[1],cluMARS);              //convert cluster coors. from LORS to MARS
193       radClu=TMath::Sqrt(cluMARS[0]*cluMARS[0]+cluMARS[1]*cluMARS[1]);                       //radial distance of candidate cluster in MARS                                          
194       Double_t trkx0[3]; 
195       hmpTrk->GetXYZ(trkx0);                                                                 //get track position in MARS
196       radInitTrk=TMath::Sqrt(trkx0[0]*trkx0[0]+trkx0[1]*trkx0[1]);
197       hmpTrk->PropagateToR(radClu,10);
198       hmpTrk->GetXYZ(trkx0);                                                                   //get track position in MARS
199       hmpTrk->GetXYZAt(radClu,bz,trkMARS);                                                     //get the track coordinates at the rad distance after prop. 
200       d3d=TMath::Sqrt((cluMARS[0]-trkMARS[0])*(cluMARS[0]-trkMARS[0])+(cluMARS[1]-trkMARS[1])*(cluMARS[1]-trkMARS[1])+(cluMARS[2]-trkMARS[2])*(cluMARS[2]-trkMARS[2]));
201       chi2=hmpTrk->GetPredictedChi2(pClu);
202       if(dmin > d3d ) {   +                                                                      //to be saved for the moment...
203         cluSiz = pClu->Size();
204         dmin=d3d;
205         bestHmpCluster=pClu;
206         index=iClu;
207         bestChi2=chi2;
208         cluLORS[0]=pClu->X(); cluLORS[1]=pClu->Y();
209 //        pParam->Lors2Mars(ipCh,cluLORS[0],cluLORS[1],bestcluMARS); 
210       }//global dmin cut 
211     }//clus loop
212 */
213     if(!isOkQcut) {
214       pTrk->SetHMPIDsignal(pParam->kMipQdcCut);
215       continue;                                                                     
216     }
217               
218     Printf(" Track n. %i Chamber intersected %i dist %f index %i cluster ch %i",iTrk,ipCh,dmin,index,bestHmpCluster->Ch());
219
220     Int_t cluSiz = bestHmpCluster->Size();
221     pTrk->SetHMPIDmip(bestHmpCluster->X(),bestHmpCluster->Y(),(Int_t)bestHmpCluster->Q(),0);  //store mip info in any case 
222     pTrk->SetHMPIDcluIdx(ipCh,index+1000*cluSiz);                                             //set chamber, index of cluster + cluster size
223     
224     if(dmin < pParam->DistCut()) {
225       isOkDcut = kTRUE;
226     }
227
228     if(!isOkDcut) {
229       pTrk->SetHMPIDsignal(pParam->kMipDistCut);                                                //closest cluster with enough charge is still too far from intersection
230     }
231     
232     if(isOkQcut*isOkDcut) isMatched = kTRUE;                                                    // MIP-Track matched !!    
233     
234     if(!isMatched) continue;                                                                    // If matched continue...
235
236     Bool_t isOk = hmpTrk->Update(bestHmpCluster,0.1,0);
237     Printf(" status of thracking update %i",isOk);
238     if(!isOk) continue;
239     pTrk->SetOuterParam(hmpTrk,AliESDtrack::kHMPIDout);                 
240     Printf("ok for reconstruction...");
241     
242     /*    
243     Int_t indexAll = 0;
244     for(Int_t iC=0;iC<ipCh;iC++) indexAll+=nClusCh[iC]; indexAll+=index;                        //to be verified...
245
246     Bool_t isOk = hmpTrk->Update(bestHmpCluster,bestChi2,indexAll);
247     if(!isOk) continue;
248     pTrk->SetOuterParam(hmpTrk,AliESDtrack::kHMPIDout);                 
249
250     cham=IntTrkCha(pTrk,xPc,yPc,xRa,yRa,theta,phi);
251     
252     if(cham<0) {                                                                                  //no intersection at all, go after next track
253       pTrk->SetHMPIDtrk(0,0,0,0);                                                                //no intersection found
254       pTrk->SetHMPIDcluIdx   (99,99999);                                                         //chamber not found, mip not yet considered
255       pTrk->SetHMPIDsignal(AliHMPIDRecon::kNotPerformed);                                        //ring reconstruction not yet performed
256       continue;                                                                         
257     }
258 */
259     //evaluate nMean
260     if(pNmean->GetEntries()==21) {                                                              //for backward compatibility
261       nmean=((TF1*)pNmean->At(3*ipCh))->Eval(pEsd->GetTimeStamp());                             //C6F14 Nmean for this chamber
262     } else {
263       Int_t iRad     = pParam->Radiator(yRa);                                                   //evaluate the radiator involved
264       if(iRad < 0) {
265         nmean = -1;
266       } else {
267       Double_t tLow  = ((TF1*)pNmean->At(6*ipCh+2*iRad  ))->Eval(pEsd->GetTimeStamp());         //C6F14 low  temp for this chamber
268       Double_t tHigh = ((TF1*)pNmean->At(6*ipCh+2*iRad+1))->Eval(pEsd->GetTimeStamp());         //C6F14 high temp for this chamber
269       Double_t tExp  = pParam->FindTemp(tLow,tHigh,yRa);                                        //estimated temp for that chamber at that y
270       nmean = pParam->NIdxRad(AliHMPIDParam::Instance()->GetEPhotMean(),tExp);                  //mean ref idx @ a given temp
271       }
272       if(nmean < 0){                                                                            //track didn' t pass through the radiator
273          pTrk->SetHMPIDsignal(AliHMPIDRecon::kNoRad);                                           //set the appropriate flag
274          pTrk->SetHMPIDcluIdx(ipCh,index+1000*cluSiz);                                          //set index of cluster
275          continue;
276       }
277     }
278     //
279     recon.SetImpPC(xPc,yPc);                                                                     //store track impact to PC
280     recon.CkovAngle(pTrk,(TClonesArray *)pClus->At(ipCh),index,nmean);                           //search for Cerenkov angle of this track
281     
282     AliHMPIDPid pID;
283     Double_t prob[5];
284     pID.FindPid(pTrk,5,prob);
285     pTrk->SetHMPIDpid(prob);
286 //      Printf(" Prob e- %6.2f mu %6.2f pi %6.2f k %6.2f p %6.2f",prob[0]*100,prob[1]*100,prob[2]*100,prob[3]*100,prob[4]*100);
287
288     delete hmpTrk;hmpTrk=0x0;
289   }//iTrk
290
291   return 0; // error code: 0=no error;
292 }//Recon()
293 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
294 Int_t AliHMPIDTracker::ReconHiddenTrk(AliESDEvent *pEsd,TObjArray *pClus,TObjArray *pNmean, TObjArray *pQthre)
295 {
296 // Static method to reconstruct Theta Ckov for all valid tracks of a given event.
297 // Arguments: pEsd- pointer ESD; pClu- pointer to clusters for all chambers; pNmean - pointer to all function Nmean=f(time), pQthre - pointer to all function Qthre=f(time)
298 //   Returns: error code, 0 if no errors
299   
300   AliHMPIDReconHTA reconHTA;                                                                     //instance of reconstruction class, nothing important in ctor
301   
302   AliHMPIDParam *pParam = AliHMPIDParam::Instance();                                             //Instance of AliHMPIDParam
303   
304   for(Int_t iTrk=0;iTrk<pEsd->GetNumberOfTracks();iTrk++){                                        //loop on the ESD tracks in the event
305     
306     AliESDtrack *pTrk = pEsd->GetTrack(iTrk);                                                     //here it is simulated or just empty track
307     Int_t ipCh;
308     ipCh = pTrk->GetHMPIDcluIdx();ipCh/=1000000;
309     if(ipCh<0) continue;
310
311     TClonesArray *pMipCluLst=(TClonesArray *)pClus->At(ipCh);                                   //get the list of clusters
312     Int_t nMipClusTot = pMipCluLst->GetEntries();                                               //total number of clusters in the given chamber
313     
314     Double_t qMip=-1;
315     Int_t chMip=-1;    
316     Double_t xMip = 0;
317     Double_t yMip = 0;
318     Int_t indMip  = 0;
319     Int_t cluMipSiz = 0;
320
321     for (Int_t iClu=0; iClu<nMipClusTot;iClu++) {                                               //clusters loop
322       
323       AliHMPIDCluster *pClu=(AliHMPIDCluster*)pMipCluLst->UncheckedAt(iClu);                    //get the cluster
324       Double_t qClus = pClu->Q();
325       if(qClus>qMip) {
326         qMip  = qClus;
327         chMip = pClu->Ch();
328         xMip = pClu->X();
329         yMip = pClu->Y();
330         indMip = iClu;
331         cluMipSiz = pClu->Size();
332       }
333     }//clus loop
334
335     if(chMip<0) return 1;    
336     
337     Int_t hvsec;
338     Double_t qthre=0;
339 // evaluate qThre
340     if(pQthre->GetEntriesFast()==pParam->kMaxCh+1) {                                              // just for backward compatibility
341       qthre=((TF1*)pQthre->At(chMip))->Eval(pEsd->GetTimeStamp());                                //
342     } else {                                                                                      // in the past just 1 qthre
343       hvsec = pParam->InHVSector(yMip);                                                           //  per chamber
344       if(hvsec>=0) qthre=((TF1*)pQthre->At(6*chMip+hvsec))->Eval(pEsd->GetTimeStamp());           //
345     }
346 //
347     if(qMip<qthre) {
348       pTrk->SetHMPIDmip(xMip,yMip,(Int_t)qMip,0);                                                        //store mip info in any case 
349       pTrk->SetHMPIDcluIdx(chMip,indMip+1000*cluMipSiz);                                                          
350       pTrk->SetHMPIDsignal(pParam->kMipQdcCut);
351       return 1;                                                                                   //charge compatible with MIP clusters      
352     }
353       
354     pTrk->SetHMPIDmip(xMip,yMip,(Int_t)qMip,0);                                                   //store mip info in any case 
355     pTrk->SetHMPIDcluIdx(chMip,indMip+1000*cluMipSiz);                                                          
356
357     Double_t yRa = yMip;                                                                        //just an approx...
358     Double_t nmean;
359     //evaluate nMean
360     if(pNmean->GetEntries()==21) {                                                              //for backward compatibility
361       nmean=((TF1*)pNmean->At(3*chMip))->Eval(pEsd->GetTimeStamp());                            //C6F14 Nmean for this chamber
362     } else {
363       Int_t iRad     = pParam->Radiator(yRa);                                                   //evaluate the radiator involved
364       if(iRad < 0) {
365         nmean = -1;
366       } else {
367       Double_t tLow  = ((TF1*)pNmean->At(6*chMip+2*iRad  ))->Eval(pEsd->GetTimeStamp());        //C6F14 low  temp for this chamber
368       Double_t tHigh = ((TF1*)pNmean->At(6*chMip+2*iRad+1))->Eval(pEsd->GetTimeStamp());        //C6F14 high temp for this chamber
369       Double_t tExp  = pParam->FindTemp(tLow,tHigh,yRa);                                        //estimated temp for that chamber at that y
370       nmean = pParam->NIdxRad(AliHMPIDParam::Instance()->GetEPhotMean(),tExp);                  //mean ref idx @ a given temp
371       }
372       if(nmean < 0){                                                                            //track didn' t pass through the radiator
373          pTrk->SetHMPIDsignal(AliHMPIDRecon::kNoRad);                                           //set the appropriate flag
374          return 1;
375       }
376     }
377     //
378     if(!reconHTA.CkovHiddenTrk(pTrk,(TClonesArray *)pClus->At(ipCh),indMip,nmean)) {                 //search for track parameters and Cerenkov angle of this track
379       AliHMPIDPid pID;
380       Double_t prob[5];
381       pID.FindPid(pTrk,5,prob);
382       pTrk->SetHMPIDpid(prob);
383     }
384 //      Printf(" Prob e- %6.2f mu %6.2f pi %6.2f k %6.2f p %6.2f",prob[0]*100,prob[1]*100,prob[2]*100,prob[3]*100,prob[4]*100);
385   }//iTrk
386
387   return 0; // error code: 0=no error;
388
389 }//Recon()
390 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
391 void AliHMPIDTracker::FillClusterArray(TObjArray* array) const {
392   
393  // Publishes all pointers to clusters known to the tracker into the
394   // passed object array.
395   // The ownership is not transfered - the caller is not expected to delete
396   // the clusters
397  
398   for(Int_t iCh=AliHMPIDParam::kMinCh;iCh<=AliHMPIDParam::kMaxCh;iCh++){    
399     TClonesArray *pCluArr=(TClonesArray*)(*fClu)[iCh];
400     for (Int_t iClu=0; iClu<pCluArr->GetEntriesFast();iClu++){
401       AliHMPIDCluster *pClu=(AliHMPIDCluster*)pCluArr->UncheckedAt(iClu);    
402       array->AddLast(pClu);
403     }//cluster loop in iCh
404     pCluArr->Delete();
405   }//Ch loop
406     
407   return;
408 }
409 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++