]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - ITS/AliITSClusterFinder.cxx
Removed obsolete and no longer maintained cluster finders
[u/mrichter/AliRoot.git] / ITS / AliITSClusterFinder.cxx
index 885160100fb03cef5ad318f75d85dc1b691335a7..2b4d7d055251fb5c651a0d11f8502da3d30c515a 100644 (file)
  * about the suitability of this software for any purpose. It is          *
  * provided "as is" without express or implied warranty.                  *
  **************************************************************************/
-//
-// Base Class used to find
-// the reconstructed points for ITS
-// See also AliITSClusterFinderSPD, AliITSClusterFinderSDD, 
-// AliITSClusterFinderSDD
-//
+////////////////////////////////////////////////////////////////////////////
+//                                                                        //
+// Base Class used to find                                                //
+// the reconstructed points for ITS                                       //
+// See also AliITSClusterFinderSPD, AliITSClusterFinderSDD,               //
+// AliITSClusterFinderSDD  AliITSClusterFinderV2                          //
+////////////////////////////////////////////////////////////////////////////
+
+#include "AliRun.h"
 #include "AliITSClusterFinder.h"
+#include "AliITSRecPoint.h"
 #include "AliITSdigit.h"
-#include "AliRun.h"
-#include "AliITS.h"
+#include "AliITSDetTypeRec.h"
+#include "AliITSMap.h"
+#include "AliITSgeomTGeo.h"
+#include <TParticle.h>
+#include "AliMC.h"
 
 ClassImp(AliITSClusterFinder)
 
+extern AliRun *gAlice;
+
 //----------------------------------------------------------------------
-AliITSClusterFinder::AliITSClusterFinder(){
+AliITSClusterFinder::AliITSClusterFinder():
+TObject(),
+fDebug(0),
+fModule(0),
+fDigits(0),
+fNdigits(0),
+fDetTypeRec(0),
+fClusters(0),
+fNRawClusters(0),
+fMap(0),
+fNperMax(0),
+fDeclusterFlag(0),
+fClusterSize(0),
+fNPeaks(-1),
+fNModules(AliITSgeomTGeo::GetNModules()),
+fEvent(0){
     // default cluster finder
-
-    fSegmentation = 0;
-    fResponse     = 0;
-    fMap          = 0;
-    fDigits       = 0;
-    fNdigits      = 0;
-    fNRawClusters = 0;
-    fNperMax      = 0;
-    fDeclusterFlag= 0;
-    fClusterSize  = 0;
-    fNPeaks       = 0;
+    // Input:
+    //   none.
+    // Output:
+    //   none.
+    // Return:
+    //   A default constructed AliITSCulsterFinder
 }
 //----------------------------------------------------------------------
-AliITSClusterFinder::AliITSClusterFinder(AliITSsegmentation *seg, 
-                                        AliITSresponse *response, 
-                                        TClonesArray *digits){
-  // cluster finder
-    fSegmentation=seg;
-    fResponse=response;
-    fMap = 0;
-    
-    fDigits=digits;
-    fNdigits = fDigits->GetEntriesFast();
+AliITSClusterFinder::AliITSClusterFinder(AliITSDetTypeRec* dettyp):
+TObject(),
+fDebug(0),
+fModule(0),
+fDigits(0),
+fNdigits(0),
+fDetTypeRec(dettyp),
+fClusters(0),
+fNRawClusters(0),
+fMap(0),
+fNperMax(0),
+fDeclusterFlag(0),
+fClusterSize(0),
+fNPeaks(-1),
+fNModules(AliITSgeomTGeo::GetNModules()),
+fEvent(0){
+    // default cluster finder
+    // Standard constructor for cluster finder
+    // Input:
+    //   AliITSsegmentation *seg  The segmentation class to be used
+    //   AliITSresponse     *res  The response class to be used
+    // Output:
+    //   none.
+    // Return:
+    //   A Standard constructed AliITSCulsterFinder
 
-    fNRawClusters=0;
+    SetNperMax();
+    SetClusterSize();
+    SetDeclusterFlag();
+}
+//----------------------------------------------------------------------
+AliITSClusterFinder::AliITSClusterFinder(AliITSDetTypeRec* dettyp,
+                                        TClonesArray *digits):
+TObject(),
+fDebug(0),
+fModule(0),
+fDigits(digits),
+fNdigits(0),
+fDetTypeRec(dettyp),
+fClusters(0),
+fNRawClusters(0),
+fMap(0),
+fNperMax(0),
+fDeclusterFlag(0),
+fClusterSize(0),
+fNPeaks(-1),
+fNModules(AliITSgeomTGeo::GetNModules()),
+fEvent(0){
+    // default cluster finder
+    // Standard + cluster finder constructor
+    // Input:
+    //   AliITSsegmentation *seg  The segmentation class to be used
+    //   AliITSresponse     *res  The response class to be used
+    //   TClonesArray    *digits  Array of digits to be used
+    // Output:
+    //   none.
+    // Return:
+    //   A Standard constructed AliITSCulsterFinder
 
+    fNdigits = fDigits->GetEntriesFast();
     SetNperMax();
     SetClusterSize();
     SetDeclusterFlag();
+}
 
-    fNPeaks=-1;
+//______________________________________________________________________
+AliITSClusterFinder::AliITSClusterFinder(const AliITSClusterFinder &source) : TObject(source),
+fDebug(source.fDebug),
+fModule(source.fModule),
+fDigits(),
+fNdigits(source.fNdigits),
+fDetTypeRec(),
+fClusters(),
+fNRawClusters(source.fNRawClusters),
+fMap(),
+fNperMax(source.fNperMax),
+fDeclusterFlag(source.fDeclusterFlag),
+fClusterSize(source.fClusterSize),
+fNPeaks(source.fNPeaks),
+fNModules(source.fNModules),
+fEvent(source.fEvent) {
+  // Copy constructor
+  // Copies are not allowed. The method is protected to avoid misuse.
+  AliError("Copy constructor not allowed\n");
 }
+
+
+//______________________________________________________________________
+//AliITSClusterFinder& AliITSClusterFinder::operator=(const AliITSClusterFinder& /* source */){
+  // Assignment operator
+  // Assignment is not allowed. The method is protected to avoid misuse.
+//  Fatal("= operator","Assignment operator not allowed\n");
+//  return *this;
+//}
+
 //----------------------------------------------------------------------
 AliITSClusterFinder::~AliITSClusterFinder(){
     // destructor cluster finder
+    // Input:
+    //   none.
+    // Output:
+    //   none.
+    // Return:
+    //   none.
 
+    if(fMap) {delete fMap;}
     // Zero local pointers. Other classes own these pointers.
-    fSegmentation = 0;
-    fResponse     = 0;
     fMap          = 0;
     fDigits       = 0;
     fNdigits      = 0;
@@ -75,58 +175,96 @@ AliITSClusterFinder::~AliITSClusterFinder(){
     fDeclusterFlag= 0;
     fClusterSize  = 0;
     fNPeaks       = 0;
+    fDetTypeRec   = 0;
+
 }
 //__________________________________________________________________________
-AliITSClusterFinder::AliITSClusterFinder(const AliITSClusterFinder &source){
-    //     Copy Constructor 
-    if(&source == this) return;
-    this->fDigits = source.fDigits;
-    this->fNdigits = source.fNdigits;
-    this->fResponse = source.fResponse;
-    this->fSegmentation = source.fSegmentation;
-    this->fNRawClusters = source.fNRawClusters;
-    this->fMap = source.fMap;
-    this->fNperMax = source.fNperMax;
-    this->fDeclusterFlag = source.fDeclusterFlag;
-    this->fClusterSize = source.fClusterSize;
-    this->fNPeaks = source.fNPeaks;
-    return;
-}
-//______________________________________________________________________
-AliITSClusterFinder& AliITSClusterFinder::operator=(const AliITSClusterFinder &source) {
-    //    Assignment operator
-
-    if(&source == this) return *this;
-    this->fDigits = source.fDigits;
-    this->fNdigits = source.fNdigits;
-    this->fResponse = source.fResponse;
-    this->fSegmentation = source.fSegmentation;
-    this->fNRawClusters = source.fNRawClusters;
-    this->fMap = source.fMap;
-    this->fNperMax = source.fNperMax;
-    this->fDeclusterFlag = source.fDeclusterFlag;
-    this->fClusterSize = source.fClusterSize;
-    this->fNPeaks = source.fNPeaks;
-    return *this;
+void AliITSClusterFinder::InitGeometry(){
+ //
+ // Initialisation of ITS geometry
+ //
+  Int_t mmax=AliITSgeomTGeo::GetNModules();
+  for (Int_t m=0; m<mmax; m++) {
+    Int_t lay,lad,det; AliITSgeomTGeo::GetModuleId(m,lay,lad,det);
+    fNdet[m] = (lad-1)*AliITSgeomTGeo::GetNDetectors(lay) + (det-1);
+    fNlayer[m] = lay-1;
+  }
 }
+
+
+
 //----------------------------------------------------------------------
 void AliITSClusterFinder::AddCluster(Int_t branch, AliITSRawCluster *c){
     // Add a raw cluster copy to the list
+    // Input:
+    //   Int_t       branch  The branch to which the cluster is to be added to
+    //   AliITSRawCluster *c The cluster to be added to the array of clusters
+    // Output:
+    //   none.
+    // Return:
+    //   none.
 
-    AliITS *iTS=(AliITS*)gAlice->GetModule("ITS");
-    iTS->AddCluster(branch,c); 
-    fNRawClusters++;
+   if(!fDetTypeRec) {
+    Error("AddCluster","fDetTypeRec is null!");
+    return;
+  }
+  fDetTypeRec->AddCluster(branch,c); 
+  fNRawClusters++;
 }
 //----------------------------------------------------------------------
 void AliITSClusterFinder::AddCluster(Int_t branch, AliITSRawCluster *c, 
                                     AliITSRecPoint &rp){
-    // Add a raw cluster copy to the list
+    // Add a raw cluster copy to the list and the RecPoint
+    // Input:
+    //   Int_t       branch  The branch to which the cluster is to be added to
+    //   AliITSRawCluster *c The cluster to be added to the array of clusters
+    //   AliITSRecPoint  &rp The RecPoint to be added to the array of RecPoints
+    // Output:
+    //   none.
+    // Return:
+    //   none.
+  if(!fDetTypeRec) {
+    Error("AddCluster","fDetTypeRec is null!");
+    return;
+  }
+
+  fDetTypeRec->AddCluster(branch,c); 
+  fNRawClusters++;
+  fDetTypeRec->AddRecPoint(rp); 
 
-    AliITS *iTS=(AliITS*)gAlice->GetModule("ITS");
-    iTS->AddCluster(branch,c); 
-    fNRawClusters++;
-    iTS->AddRecPoint(rp); 
 }
+/*
+//______________________________________________________________________
+void AliITSClusterFinder::CheckLabels(Int_t lab[3]) {
+  //------------------------------------------------------------
+  // Tries to find mother's labels
+  //------------------------------------------------------------
+
+  if(lab[0]<0 && lab[1]<0 && lab[2]<0) return; // In case of no labels just exit
+  // Check if simulation
+  AliMC* mc = gAlice->GetMCApp();
+  if(!mc)return;
+
+  Int_t ntracks = mc->GetNtrack();
+  for (Int_t i=0;i<3;i++){
+    Int_t label = lab[i];
+    if (label>=0 && label<ntracks) {
+      TParticle *part=(TParticle*)mc->Particle(label);
+      if (part->P() < 0.005) {
+       Int_t m=part->GetFirstMother();
+       if (m<0) {      
+         continue;
+       }
+       if (part->GetStatusCode()>0) {
+         continue;
+       }
+       lab[i]=m;       
+      }
+    }    
+  }
+  
+}
+*/
 //______________________________________________________________________
 void AliITSClusterFinder::FindRawClusters(Int_t module){
     // Default Cluster finder.
@@ -146,7 +284,7 @@ void AliITSClusterFinder::FindRawClusters(Int_t module){
     Int_t i=0,nc=0,j[4],k,k2=0;
 
     // Copy all digits for this module into a local TObjArray.
-    for(i=0;i<ndigits;i++) digs->AddAt(new AliITSdigit(*((AliITSdigit*)(fDigits->At(i)))),i);
+    for(i=0;i<ndigits;i++) digs->AddAt(new AliITSdigit(*(GetDigit(i))),i);
     digs->Sort();
     // First digit is a cluster.
     i  = 0;
@@ -156,51 +294,53 @@ void AliITSClusterFinder::FindRawClusters(Int_t module){
     clust0->AddAtFree(digs->At(i)); // move owner ship from digs to clusts
     nc++;
     for(i=1;i<ndigits;i++){
-       if(IsNeighbor(digs,i,j)){
-           dig = (AliITSdigit*)(digs->At(j[0]));
-           // Add to existing cluster. Find which cluster this digis 
-           for(k=0;k<nc;k++){
-               clust0 = ((TObjArray*)(clusts->At(k)));
-               if(clust0->IndexOf(dig)>=0) break;
-           } // end for k
-           if(k>=nc){
-               Fatal("FindRawClusters","Digit not found as expected");
-           } // end if
-           if(j[1]>=0){
-               dig = (AliITSdigit*)(digs->At(j[1]));
-               // Add to existing cluster. Find which cluster this digis 
-               for(k2=0;k2<nc;k2++){
-                   clust1 = ((TObjArray*)(clusts->At(k2)));
-                   if(clust1->IndexOf(dig)>=0) break;
-               } // end for k2
-               if(k2>=nc){
-                   Fatal("FindRawClusters","Digit not found as expected");
-               } // end if
-           } // end if j[1]>=0
-           // Found cluster with neighboring digits add this one to it.
-           if(clust0==clust1){ // same cluster
-               clust0->AddAtFree(digs->At(i));
-               clust0 = 0; // finished with cluster. zero for safty
-               clust1 = 0; // finished wit hcluster. zero for safty
-           }else{ // two different clusters which need to be merged.
-               clust0->AddAtFree(digs->At(i)); // Add digit to this cluster.
-               for(k=0;k<clust1->GetEntriesFast();k++){
-                   // move clust1 into clust0
-                   clust0->AddAtFree(clust1->At(k));//move digit to this cluster
-                   clust1->AddAt(0,k); // zero this one
-               } // end for k
-               delete clust1;
-               clusts->AddAt(0,k2); // zero array of clusters element clust1
-               clust0 = 0; // finished with cluster. zero for safty
-               clust1 = 0; // finished wit hcluster. zero for safty
-           } // end if clust0==clust1
-       }else{// New cluster
-           clusts->AddAt(new TObjArray(kelms),nc);
-           clust0 = ((TObjArray*)(clusts->At(nc)));
-           clust0->AddAtFree(digs->At(i));// move owner ship from digs to clusts
-           clust0 = 0; // finished with cluster. zero for safty
-           nc++;
-       } // End if IsNeighbor
+        if(IsNeighbor(digs,i,j)){
+            dig = (AliITSdigit*)(digs->At(j[0]));
+            // Add to existing cluster. Find which cluster this digis 
+            for(k=0;k<nc;k++){
+                clust0 = ((TObjArray*)(clusts->At(k)));
+                if(clust0->IndexOf(dig)>=0) break;
+            } // end for k
+            if(k>=nc){
+                Fatal("FindRawClusters","Digit not found as expected");
+            } // end if
+            if(j[1]>=0){
+                dig = (AliITSdigit*)(digs->At(j[1]));
+                // Add to existing cluster. Find which cluster this digis 
+                for(k2=0;k2<nc;k2++){
+                    clust1 = ((TObjArray*)(clusts->At(k2)));
+                    if(clust1->IndexOf(dig)>=0) break;
+                } // end for k2
+                if(k2>=nc){
+                    Fatal("FindRawClusters","Digit not found as expected");
+                } // end if
+            } // end if j[1]>=0
+            // Found cluster with neighboring digits add this one to it.
+            if(clust0==clust1){ // same cluster
+                clust0->AddAtFree(digs->At(i));
+                clust0 = 0; // finished with cluster. zero for safty
+                clust1 = 0; // finished wit hcluster. zero for safty
+            }else{ // two different clusters which need to be merged.
+                clust0->AddAtFree(digs->At(i)); // Add digit to this cluster.
+                for(k=0;k<clust1->GetEntriesFast();k++){
+                    // move clust1 into clust0
+                    //move digit to this cluster
+                    clust0->AddAtFree(clust1->At(k));
+                    clust1->AddAt(0,k); // zero this one
+                } // end for k
+                delete clust1;
+                clusts->AddAt(0,k2); // zero array of clusters element clust1
+                clust0 = 0; // finished with cluster. zero for safty
+                clust1 = 0; // finished wit hcluster. zero for safty
+            } // end if clust0==clust1
+        }else{// New cluster
+            clusts->AddAt(new TObjArray(kelms),nc);
+            clust0 = ((TObjArray*)(clusts->At(nc)));
+            // move owner ship from digs to clusts
+            clust0->AddAtFree(digs->At(i));
+            clust0 = 0; // finished with cluster. zero for safty
+            nc++;
+        } // End if IsNeighbor
     } // end for i
     // There are now nc clusters in clusts. Each element of clust is an
     // array of digits which are clustered together.
@@ -210,11 +350,11 @@ void AliITSClusterFinder::FindRawClusters(Int_t module){
 
     // clean up at the end.
     for(i=0;i<nc;i++){ 
-       clust0 =(TObjArray*)(clusts->At(i));
-       // Digits deleted below, so zero this TObjArray
-       for(k=0;k<clust0->GetEntriesFast();k++) clust0->AddAt(0,k);
-       delete clust0; // Delete this TObjArray
-       clusts->AddAt(0,i); // Contents deleted above, so zero it.
+        clust0 =(TObjArray*)(clusts->At(i));
+        // Digits deleted below, so zero this TObjArray
+        for(k=0;k<clust0->GetEntriesFast();k++) clust0->AddAt(0,k);
+        delete clust0; // Delete this TObjArray
+        clusts->AddAt(0,i); // Contents deleted above, so zero it.
     } // end for i
     delete clusts; // Delete this TObjArray/
     // Delete the digits then the TObjArray which containted them.
@@ -222,7 +362,7 @@ void AliITSClusterFinder::FindRawClusters(Int_t module){
     delete digs;
 }
 //______________________________________________________________________
-Bool_t AliITSClusterFinder::IsNeighbor(TObjArray *digs,Int_t i,Int_t n[]) const{
+Bool_t AliITSClusterFinder::IsNeighbor(TObjArray *digs,Int_t i,Int_t n[])const{
     // Locagical function which checks to see if digit i has a neighbor.
     // If so, then it returns kTRUE and its neighbor index j.
     // This routine checks if the digits are side by side or one before the
@@ -252,15 +392,280 @@ Bool_t AliITSClusterFinder::IsNeighbor(TObjArray *digs,Int_t i,Int_t n[]) const{
     ix = ((AliITSdigit*)(digs->At(i)))->GetCoord1();
     iz = ((AliITSdigit*)(digs->At(i)))->GetCoord2();
     for(j=0;j<i;j++){
-       jx = ((AliITSdigit*)(digs->At(j)))->GetCoord1();
-       jz = ((AliITSdigit*)(digs->At(j)))->GetCoord2();
-       if(jx+1==ix && jz  ==iz){n[0] = j;nei[0] = kTRUE;}
-       if(jx  ==ix && jz+1==iz){n[1] = j;nei[1] = kTRUE;}
-       if(jx+1==ix && jz+1==iz){n[2] = j;nei[2] = kTRUE;}
-       if(jx+1==ix && jz-1==iz){n[3] = j;nei[3] = kTRUE;}
+        jx = ((AliITSdigit*)(digs->At(j)))->GetCoord1();
+        jz = ((AliITSdigit*)(digs->At(j)))->GetCoord2();
+        if(jx+1==ix && jz  ==iz){n[0] = j;nei[0] = kTRUE;}
+        if(jx  ==ix && jz+1==iz){n[1] = j;nei[1] = kTRUE;}
+        if(jx+1==ix && jz+1==iz){n[2] = j;nei[2] = kTRUE;}
+        if(jx+1==ix && jz-1==iz){n[3] = j;nei[3] = kTRUE;}
     } // end for k
     if(nei[0]||nei[1]) return kTRUE;
     if(kdiagonal&&(nei[2]||nei[3])) return kTRUE;
     // no Neighbors found.
     return kFALSE;
 }
+
+//______________________________________________________________________
+void AliITSClusterFinder::Print(ostream *os) const{
+    //Standard output format for this class
+    // Inputs:
+    //    ostream *os   Output stream
+    // Output:
+    //    ostream *os   Output stream
+    // Return:
+    //    none.
+
+    *os << fDebug<<",";
+    *os << fModule<<",";
+    *os << fNdigits<<",";
+    *os << fNRawClusters<<",";
+    *os << fNperMax<<",";
+    *os << fDeclusterFlag<<",";
+    *os << fClusterSize<<",";
+    *os << fNPeaks<<endl;
+}
+//______________________________________________________________________
+void AliITSClusterFinder::Read(istream *is)  {
+    //Standard input for this class
+    // Inputs:
+    //    istream *is   Input stream
+    // Output:
+    //    istream *is   Input stream
+    // Return:
+    //    none.
+
+    *is >> fDebug;
+    *is >> fModule;
+    *is >> fNdigits;
+    *is >> fNRawClusters;
+    *is >> fNperMax;
+    *is >> fDeclusterFlag;
+    *is >> fClusterSize;
+    *is >> fNPeaks;
+}
+//______________________________________________________________________
+ostream &operator<<(ostream &os,AliITSClusterFinder &source){
+    // Standard output streaming function.
+    // Inputs:
+    //    ostream             *os     Output stream
+    //    AliITSClusterFinder &source Class to be printed
+    // Output:
+    //    ostream             *os     Output stream
+    // Return:
+    //    none.
+
+    source.Print(&os);
+    return os;
+}
+//______________________________________________________________________
+istream &operator>>(istream &is,AliITSClusterFinder &source){
+    // Standard output streaming function.
+    // Inputs:
+    //    istream              *is      Input stream
+    //     AliITSClusterFinder &source  Class to be read in.
+    // Output:
+    //    istream              *is      Input stream
+    // Return:
+    //    none.
+
+    source.Read(&is);
+    return is;
+}
+//______________________________________________________________________
+void AliITSClusterFinder::CheckLabels2(Int_t lab[10]) {
+  //------------------------------------------------------------
+  // Tries to find mother's labels
+  //------------------------------------------------------------
+  AliRunLoader *rl = AliRunLoader::GetRunLoader();
+  TTree *trK=(TTree*)rl->TreeK();
+
+  if(trK){
+    Int_t nlabels =0; 
+    for (Int_t i=0;i<10;i++) if (lab[i]>=0) nlabels++;
+    if(nlabels == 0) return; // In case of no labels just exit
+
+
+    Int_t ntracks = gAlice->GetMCApp()->GetNtrack();
+
+    for (Int_t i=0;i<10;i++){
+      Int_t label = lab[i];
+      if (label>=0 && label<ntracks) {
+       TParticle *part=(TParticle*)gAlice->GetMCApp()->Particle(label);
+
+       if (part->P() < 0.02) {
+         Int_t m=part->GetFirstMother();
+         if (m<0) {    
+           continue;
+         }
+         if (part->GetStatusCode()>0) {
+           continue;
+         }
+         lab[i]=m;       
+       }
+       else
+         if (part->P() < 0.12 && nlabels>3) {
+           lab[i]=-2;
+           nlabels--;
+         } 
+      }
+      else{
+       if ( (label>ntracks||label <0) && nlabels>3) {
+         lab[i]=-2;
+         nlabels--;
+       } 
+      }
+    }  
+    if (nlabels>3){
+      for (Int_t i=0;i<10;i++){
+       if (nlabels>3){
+         Int_t label = lab[i];
+         if (label>=0 && label<ntracks) {
+           TParticle *part=(TParticle*)gAlice->GetMCApp()->Particle(label);
+           if (part->P() < 0.1) {
+             lab[i]=-2;
+             nlabels--;
+           }
+         }
+       }
+      }
+    }
+
+    //compress labels -- if multi-times the same
+    Int_t lab2[10];
+    for (Int_t i=0;i<10;i++) lab2[i]=-2;
+    for (Int_t i=0;i<10  ;i++){
+      if (lab[i]<0) continue;
+      for (Int_t j=0;j<10 &&lab2[j]!=lab[i];j++){
+       if (lab2[j]<0) {
+         lab2[j]= lab[i];
+         break;
+       }
+      }
+    }
+    for (Int_t j=0;j<10;j++) lab[j]=lab2[j];
+  
+  }
+}
+
+//______________________________________________________________________
+void AliITSClusterFinder::AddLabel(Int_t lab[10], Int_t label) {
+  //add label to the cluster
+  AliRunLoader *rl = AliRunLoader::GetRunLoader();
+  TTree *trK=(TTree*)rl->TreeK();
+  if(trK){
+    if(label<0) return; // In case of no label just exit
+
+    Int_t ntracks = gAlice->GetMCApp()->GetNtrack();
+    if (label>ntracks) return;
+    for (Int_t i=0;i<10;i++){
+      //    if (label<0) break;
+      if (lab[i]==label) break;
+      if (lab[i]<0) {
+       lab[i]= label;
+       break;
+      }
+    }
+  }
+}
+
+
+//______________________________________________________________________
+void AliITSClusterFinder:: 
+FindCluster(Int_t k,Int_t maxz,AliBin *bins,Int_t &n,Int_t *idx) {
+  //------------------------------------------------------------
+  // returns an array of indices of digits belonging to the cluster
+  // (needed when the segmentation is not regular) 
+  //------------------------------------------------------------
+  if (n<200) idx[n++]=bins[k].GetIndex();
+  bins[k].Use();
+
+  if (bins[k-maxz].IsNotUsed()) FindCluster(k-maxz,maxz,bins,n,idx);
+  if (bins[k-1   ].IsNotUsed()) FindCluster(k-1   ,maxz,bins,n,idx);
+  if (bins[k+maxz].IsNotUsed()) FindCluster(k+maxz,maxz,bins,n,idx);
+  if (bins[k+1   ].IsNotUsed()) FindCluster(k+1   ,maxz,bins,n,idx);
+  /*
+  if (bins[k-maxz-1].IsNotUsed()) FindCluster(k-maxz-1,maxz,bins,n,idx);
+  if (bins[k-maxz+1].IsNotUsed()) FindCluster(k-maxz+1,maxz,bins,n,idx);
+  if (bins[k+maxz-1].IsNotUsed()) FindCluster(k+maxz-1,maxz,bins,n,idx);
+  if (bins[k+maxz+1].IsNotUsed()) FindCluster(k+maxz+1,maxz,bins,n,idx);
+  */
+}
+
+//______________________________________________________________________
+Bool_t AliITSClusterFinder::IsMaximum(Int_t k,Int_t max,const AliBin *bins) {
+  //------------------------------------------------------------
+  //is this a local maximum ?
+  //------------------------------------------------------------
+  UShort_t q=bins[k].GetQ();
+  if (q==1023) return kFALSE;
+  if (bins[k-max].GetQ() > q) return kFALSE;
+  if (bins[k-1  ].GetQ() > q) return kFALSE; 
+  if (bins[k+max].GetQ() > q) return kFALSE; 
+  if (bins[k+1  ].GetQ() > q) return kFALSE; 
+  if (bins[k-max-1].GetQ() > q) return kFALSE;
+  if (bins[k+max-1].GetQ() > q) return kFALSE; 
+  if (bins[k+max+1].GetQ() > q) return kFALSE; 
+  if (bins[k-max+1].GetQ() > q) return kFALSE;
+  return kTRUE; 
+}
+
+//______________________________________________________________________
+void AliITSClusterFinder::
+FindPeaks(Int_t k,Int_t max,AliBin *b,Int_t *idx,UInt_t *msk,Int_t& n) {
+  //------------------------------------------------------------
+  //find local maxima
+  //------------------------------------------------------------
+  if (n<31)
+  if (IsMaximum(k,max,b)) {
+    idx[n]=k; msk[n]=(2<<n);
+    n++;
+  }
+  b[k].SetMask(0);
+  if (b[k-max].GetMask()&1) FindPeaks(k-max,max,b,idx,msk,n);
+  if (b[k-1  ].GetMask()&1) FindPeaks(k-1  ,max,b,idx,msk,n);
+  if (b[k+max].GetMask()&1) FindPeaks(k+max,max,b,idx,msk,n);
+  if (b[k+1  ].GetMask()&1) FindPeaks(k+1  ,max,b,idx,msk,n);
+}
+
+//______________________________________________________________________
+void AliITSClusterFinder::
+MarkPeak(Int_t k, Int_t max, AliBin *bins, UInt_t m) {
+  //------------------------------------------------------------
+  //mark this peak
+  //------------------------------------------------------------
+  UShort_t q=bins[k].GetQ();
+
+  bins[k].SetMask(bins[k].GetMask()|m); 
+
+  if (bins[k-max].GetQ() <= q)
+     if ((bins[k-max].GetMask()&m) == 0) MarkPeak(k-max,max,bins,m);
+  if (bins[k-1  ].GetQ() <= q)
+     if ((bins[k-1  ].GetMask()&m) == 0) MarkPeak(k-1  ,max,bins,m);
+  if (bins[k+max].GetQ() <= q)
+     if ((bins[k+max].GetMask()&m) == 0) MarkPeak(k+max,max,bins,m);
+  if (bins[k+1  ].GetQ() <= q)
+     if ((bins[k+1  ].GetMask()&m) == 0) MarkPeak(k+1  ,max,bins,m);
+}
+
+//______________________________________________________________________
+void AliITSClusterFinder::
+MakeCluster(Int_t k,Int_t max,AliBin *bins,UInt_t m,AliITSRecPoint &c) {
+  //------------------------------------------------------------
+  //make cluster using digits of this peak
+  //------------------------------------------------------------
+  Float_t q=(Float_t)bins[k].GetQ();
+  Int_t i=k/max, j=k-i*max;
+
+  c.SetQ(c.GetQ()+q);
+  c.SetY(c.GetY()+i*q);
+  c.SetZ(c.GetZ()+j*q);
+  c.SetSigmaY2(c.GetSigmaY2()+i*i*q);
+  c.SetSigmaZ2(c.GetSigmaZ2()+j*j*q);
+
+  bins[k].SetMask(0xFFFFFFFE);
+  
+  if (bins[k-max].GetMask() == m) MakeCluster(k-max,max,bins,m,c);
+  if (bins[k-1  ].GetMask() == m) MakeCluster(k-1  ,max,bins,m,c);
+  if (bins[k+max].GetMask() == m) MakeCluster(k+max,max,bins,m,c);
+  if (bins[k+1  ].GetMask() == m) MakeCluster(k+1  ,max,bins,m,c);
+}