]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - MUON/AliMUONClusterFinderVS.cxx
Cosmetics (Chrsitian)
[u/mrichter/AliRoot.git] / MUON / AliMUONClusterFinderVS.cxx
index 349cf7d34e3ffef0c3044bb28a30699e0f9a5c12..0418dd5a9b4f724982e9f10043d5e7be1a0d7a98 100644 (file)
  * about the suitability of this software for any purpose. It is          *
  * provided "as is" without express or implied warranty.                  *
  **************************************************************************/
-/*
-$Log$
-Revision 1.1.2.3  2000/06/09 21:58:33  morsch
-Most coding rule violations corrected.
-
-Revision 1.1.2.2  2000/02/15 08:33:52  morsch
-Error in calculation of contribution map for double clusters (Split method) corrected   (A.M.)
-Error in determination of track list for double cluster (FillCluster method) corrected  (A.M.)
-Revised and extended SplitByLocalMaxima method (Isabelle Chevrot):
-       - For clusters with more than 2 maxima on one of the cathode planes all valid
-       combinations of maxima on the two cathodes are preserved. The position of the maxima is
-       taken as the hit position.
-       - New FillCluster method with 2 arguments to find tracks associated to the clusters
-       defined above added. (Method destinction by argument list not very elegant in this case,
-       should be revides (A.M.)
-       - Bug in if-statement to handle maximum 1 maximum per plane corrected
-       - Two cluster per cathode but only 1 combination valid is handled.
-       - More rigerous treatment of 1-2 and 2-1 combinations of maxima.
 
-*/
+/* $Id$ */
+
+#include <TMinuit.h> 
+#include <TF1.h>
+#include <TMinuit.h> 
+#include <Riostream.h>
 
 #include "AliMUONClusterFinderVS.h"
 #include "AliMUONDigit.h"
 #include "AliMUONRawCluster.h"
-#include "AliMUONSegmentation.h"
-#include "AliMUONResponse.h"
-#include "AliMUONHitMap.h"
+#include "AliSegmentation.h"
+#include "AliMUONGeometrySegmentation.h"
+#include "AliMUONMathieson.h"
+#include "AliMUONClusterInput.h"
 #include "AliMUONHitMapA1.h"
-#include "AliRun.h"
-#include "AliMUON.h"
-
-#include <TTree.h>
-#include <TCanvas.h>
-#include <TH1.h>
-#include <TPad.h>
-#include <TGraph.h> 
-#include <TPostScript.h> 
-#include <TMinuit.h> 
-#include <stdio.h>
-#include <iostream.h>
+#include "AliLog.h"
 
 //_____________________________________________________________________
-static AliMUONSegmentation* fgSegmentation[2];
-static AliMUONResponse*     fgResponse;
-static Int_t                fgix[500][2];
-static Int_t                fgiy[500][2];
-static Float_t              fgCharge[500][2];
-static Int_t                fgNbins[2];
-static Int_t                fgFirst=kTRUE;
-static Int_t                fgChargeTot[2];
-static Float_t              fgQtot[2];
-static TMinuit*             fgMyMinuit ;
 // This function is minimized in the double-Mathieson fit
 void fcnS2(Int_t &npar, Double_t *gin, Double_t &f, Double_t *par, Int_t iflag);
 void fcnS1(Int_t &npar, Double_t *gin, Double_t &f, Double_t *par, Int_t iflag);
@@ -72,126 +39,97 @@ void fcnCombiS2(Int_t &npar, Double_t *gin, Double_t &f, Double_t *par, Int_t if
 
 ClassImp(AliMUONClusterFinderVS)
 
-    AliMUONClusterFinderVS::AliMUONClusterFinderVS
-(AliMUONSegmentation *seg1, AliMUONSegmentation *seg2,
- AliMUONResponse *response, 
- TClonesArray *digits1, TClonesArray *digits2, 
- Int_t chamber)   
-    :AliMUONClusterFinder(seg1, response, digits1, chamber)
-{
-// Constructor
-    fSegmentation2=seg2;
-    fDigits2=digits2;
-    fNdigits2 = fDigits2->GetEntriesFast();
-    fHitMap2=0;
-    fTrack[0]=fTrack[1]=-1;
-    
-}
-
-    AliMUONClusterFinderVS::AliMUONClusterFinderVS()
-       :AliMUONClusterFinder()
+AliMUONClusterFinderVS::AliMUONClusterFinderVS()
+  : TObject()
 {
 // Default constructor
-    fSegmentation2=0;
-    fDigits2=0;
-    fNdigits2 = 0;
-    fHitMap2 = 0;
+    fInput=AliMUONClusterInput::Instance();
+//     cout <<  " TYPE" << fSegmentationType << endl;
+    fHitMap[0] = 0;
+    fHitMap[1] = 0;
     fTrack[0]=fTrack[1]=-1;
+    fDebugLevel = 0; // make silent default
+    fGhostChi2Cut = 1e6; // nothing done by default
+    fSeg[0]    = 0;
+    fSeg[1]    = 0;
+    fSeg2[0]    = 0;
+    fSeg2[1]    = 0;
+
+    for(Int_t i=0; i<100; i++) {
+      for (Int_t j=0; j<2; j++) {
+        fDig[i][j] = 0;
+      }
+    } 
+    fRawClusters = new TClonesArray("AliMUONRawCluster",1000);
+    fNRawClusters = 0;
 }
-
-AliMUONClusterFinderVS::AliMUONClusterFinderVS(
-    const AliMUONClusterFinderVS & clusterFinder)
+ //____________________________________________________________________________
+AliMUONClusterFinderVS::~AliMUONClusterFinderVS()
 {
-// Dummy copy Constructor
-    ;
-}
-
-void AliMUONClusterFinderVS::SetDigits(TClonesArray *MUONdigits1, TClonesArray *MUONdigits2) {
-// Set pointers to digit lists 
-
-    fDigits=MUONdigits1;
-    fNdigits = fDigits->GetEntriesFast();
-    fDigits2=MUONdigits2;
-    fNdigits2 = fDigits2->GetEntriesFast();
+  // Reset tracks information
+   fNRawClusters = 0;
+   if (fRawClusters) {
+     fRawClusters->Delete();
+     delete fRawClusters;
+   }
 }
 
-// Get Segmentation
-AliMUONSegmentation*  AliMUONClusterFinderVS::Segmentation(Int_t i)
+AliMUONClusterFinderVS::AliMUONClusterFinderVS(const AliMUONClusterFinderVS & clusterFinder):TObject(clusterFinder)
 {
-// Return pointer to segmentation of cathode plane number 1 (i=0) or 2 (i=1)
-    return ((i==0)? fSegmentation : fSegmentation2);
-}
+// Protected copy constructor
 
-// Get Number of Digits
-Int_t   AliMUONClusterFinderVS::NDigits(Int_t i)
-{
-// Return number of digits for cathode plane i+1
-    return ((i==0)? fNdigits : fNdigits2);
+  AliFatal("Not implemented.");
 }
-
-// Get Digits
-TClonesArray*  AliMUONClusterFinderVS::Digits(Int_t i)
+//____________________________________________________________________________
+void AliMUONClusterFinderVS::ResetRawClusters()
 {
-// Return pointer to digits for cathode plane i+1
-    return ((i==0)? fDigits : fDigits2);
+  // Reset tracks information
+  fNRawClusters = 0;
+  if (fRawClusters) fRawClusters->Clear();
 }
-    
-
-AliMUONHitMap*   AliMUONClusterFinderVS::HitMap(Int_t i)
-{
-// Return pointer to  HitMap
-    return ((i==0)? fHitMap : fHitMap2);
-}
-
+//____________________________________________________________________________
 void AliMUONClusterFinderVS::Decluster(AliMUONRawCluster *cluster)
 {
 // Decluster by local maxima
     SplitByLocalMaxima(cluster);
 }
-
+//____________________________________________________________________________
 void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 {
 // Split complex cluster by local maxima 
-
     Int_t cath, i;
-    
-    fMul[0]=c->fMultiplicity[0];
-    fMul[1]=c->fMultiplicity[1];
+
+    fInput->SetCluster(c);
+
+    fMul[0]=c->GetMultiplicity(0);
+    fMul[1]=c->GetMultiplicity(1);
 
 //
 //  dump digit information into arrays
 //
-    fgSegmentation[0]=Segmentation(0);
-    fgSegmentation[1]=Segmentation(1);
-    fgResponse    =fResponse;
-    fgNbins[0]=fMul[0];
-    fgNbins[1]=fMul[1];
+
     Float_t qtot;
     
     for (cath=0; cath<2; cath++) {
-       qtot=0;
-       for (i=0; i<fMul[cath]; i++)
-       {
-           // pointer to digit
-           fDig[i][cath]=(AliMUONDigit*)
-               (Digits(cath)->UncheckedAt(c->fIndexMap[i][cath]));
-           // pad coordinates
-           fIx[i][cath]= fDig[i][cath]->fPadX;
-           fIy[i][cath]= fDig[i][cath]->fPadY;
-           // pad charge
-           fQ[i][cath] = fDig[i][cath]->fSignal;
-           // pad centre coordinates
-           Segmentation(cath)->
-               GetPadCxy(fIx[i][cath], fIy[i][cath], fX[i][cath], fY[i][cath]);
-            // globals kUsed in fitting functions
-           fgix[i][cath]=fIx[i][cath];
-           fgiy[i][cath]=fIy[i][cath];
-           fgCharge[i][cath]=Float_t(fQ[i][cath]);
-           // total charge per cluster
-           qtot+=fgCharge[i][cath];
-       } // loop over cluster digits
-       fgQtot[cath]=qtot;
-       fgChargeTot[cath]=Int_t(qtot);  
+      qtot=0;
+
+      for (i=0; i<fMul[cath]; i++) {
+       // pointer to digit
+       fDig[i][cath]=fInput->Digit(cath, c->GetIndex(i, cath));
+       // pad coordinates
+       fIx[i][cath]= fDig[i][cath]->PadX();
+       fIy[i][cath]= fDig[i][cath]->PadY();
+       // pad charge
+       fQ[i][cath] = fDig[i][cath]->Signal();
+       // pad centre coordinates
+       if (fSegmentationType == 1)
+         fSeg[cath]->
+           GetPadC(fIx[i][cath], fIy[i][cath], fX[i][cath], fY[i][cath], fZ[i][cath]);
+       else
+         fSeg2[cath]->
+           GetPadC(fInput->DetElemId(), fIx[i][cath], fIy[i][cath], fX[i][cath], fY[i][cath], fZ[i][cath]);
+      } // loop over cluster digits
+
     }  // loop over cathodes
 
 
@@ -205,49 +143,53 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //  +++++++++++++++++++++++++++++++*************++++++++
     if ((fNLocal[0]==1 && (fNLocal[1]==0 ||  fNLocal[1]==1)) || 
        (fNLocal[0]==0 && fNLocal[1]==1)) {
-
 // Perform combined single Mathieson fit
 // Initial values for coordinates (x,y) 
 
        // One local maximum on cathodes 1 and 2 (X->cathode 2, Y->cathode 1)
        if (fNLocal[0]==1 &&  fNLocal[1]==1) {
-           fXInit[0]=c->fX[1];
-           fYInit[0]=c->fY[0];
+           fXInit[0]=c->GetX(1);
+           fYInit[0]=c->GetY(0);
            // One local maximum on cathode 1 (X,Y->cathode 1)
        } else if (fNLocal[0]==1) {
-           fXInit[0]=c->fX[0];
-           fYInit[0]=c->fY[0];
+           fXInit[0]=c->GetX(0);
+           fYInit[0]=c->GetY(0);
            // One local maximum on cathode 2  (X,Y->cathode 2)
        } else {
-           fXInit[0]=c->fX[1];
-           fYInit[0]=c->fY[1];
+           fXInit[0]=c->GetX(1);
+           fYInit[0]=c->GetY(1);
        }
-       fprintf(stderr,"\n cas (1) CombiSingleMathiesonFit(c)\n");
+       AliDebug(1,"cas (1) CombiSingleMathiesonFit(c)");
        chi2=CombiSingleMathiesonFit(c);
 //     Int_t ndf = fgNbins[0]+fgNbins[1]-2;
 //     Float_t prob = TMath::Prob(Double_t(chi2),ndf);
 //     prob1->Fill(prob);
 //     chi2_1->Fill(chi2);
        oldchi2=chi2;
-       fprintf(stderr," chi2 %f ",chi2);
-
-       c->fX[0]=fXFit[0];
-       c->fY[0]=fYFit[0];
-
-       c->fX[1]=fXFit[0];
-       c->fY[1]=fYFit[0];
-       c->fChi2[0]=chi2;
-       c->fChi2[1]=chi2;
-       c->fX[0]=Segmentation(0)->GetAnod(c->fX[0]);
-       c->fX[1]=Segmentation(1)->GetAnod(c->fX[1]);
+       AliDebug(1,Form(" chi2 %f ",chi2));        
+
+       c->SetX(0, fXFit[0]);
+       c->SetY(0, fYFit[0]);
+
+       c->SetX(1,fXFit[0]);
+       c->SetY(1,fYFit[0]);
+       c->SetChi2(0,chi2);
+       c->SetChi2(1,chi2);
+        // Force on anod
+       if (fSegmentationType == 1) {
+         c->SetX(0, fSeg[0]->GetAnod(c->GetX(0)));
+         c->SetX(1, fSeg[1]->GetAnod(c->GetX(1)));
+       } else {
+         c->SetX(0, fSeg2[0]->GetAnod(fInput->DetElemId(), c->GetX(0)));
+         c->SetX(1, fSeg2[1]->GetAnod(fInput->DetElemId(), c->GetX(1)));
+       }
        
 // If reasonable chi^2 add result to the list of rawclusters
-       //      if (chi2 < 50) {
        if (chi2 < 0.3) {
            AddRawCluster(*c);
 // If not try combined double Mathieson Fit
        } else {
-           fprintf(stderr," MAUVAIS CHI2 !!!\n");
+               AliDebug(1," MAUVAIS CHI2 !!!\n");
            if (fNLocal[0]==1 &&  fNLocal[1]==1) {
                fXInit[0]=fX[fIndLocal[0][1]][1];
                fYInit[0]=fY[fIndLocal[0][0]][0];
@@ -268,7 +210,7 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //  Initial value for charge ratios
            fQrInit[0]=0.5;
            fQrInit[1]=0.5;
-           fprintf(stderr,"\n cas (1) CombiDoubleMathiesonFit(c)\n");
+           AliDebug(1,"\n cas (1) CombiDoubleMathiesonFit(c)\n");
            chi2=CombiDoubleMathiesonFit(c);
 //         Int_t ndf = fgNbins[0]+fgNbins[1]-6;
 //         Float_t prob = TMath::Prob(chi2,ndf);
@@ -276,13 +218,13 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //         chi2_2->Fill(chi2);
            
 // Was this any better ??
-           fprintf(stderr," Old and new chi2 %f %f ", oldchi2, chi2);
+           AliDebug(1,Form(" Old and new chi2 %f %f ", oldchi2, chi2));
            if (fFitStat!=0 && chi2>0 && (2.*chi2 < oldchi2)) {
-               fprintf(stderr," Split\n");
+             AliDebug(1,"Split");
                // Split cluster into two according to fit result
                Split(c);
            } else {
-               fprintf(stderr," Don't Split\n");
+             AliDebug(1,"Do not Split");
                // Don't split
                AddRawCluster(*c);
            }
@@ -294,7 +236,7 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
     } else if (fNLocal[0]==2 &&  fNLocal[1]==2) {
 //
 //  Let's look for ghosts first 
-//
+
        Float_t xm[4][2], ym[4][2];
        Float_t dpx, dpy, dx, dy;
        Int_t ixm[4][2], iym[4][2];
@@ -324,37 +266,88 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 
 // Analyse the combinations and keep those that are possible !
 // For each combination check consistency in x and y   
-       Int_t iacc;
-       Bool_t accepted[4];
+       Int_t   iacc;
+       Bool_t  accepted[4];
+       Float_t dr[4] = {1.e4, 1.e4, 1.e4, 1.e4};
        iacc=0;
-       
+
+// In case of staggering maxima are displaced by exactly half the pad-size in y. 
+// We have to take into account the numerical precision in the consistency check;      
+       Float_t eps = 1.e-5;
+//
        for (ico=0; ico<4; ico++) {
            accepted[ico]=kFALSE;
 // cathode one: x-coordinate
-           isec=Segmentation(0)->Sector(ixm[ico][0], iym[ico][0]);
-           dpx=Segmentation(0)->Dpx(isec)/2.;
+           if (fSegmentationType == 1) {
+             isec=fSeg[0]->Sector(ixm[ico][0], iym[ico][0]);
+             dpx=fSeg[0]->Dpx(isec)/2.;
+           } else {
+             isec=fSeg2[0]->Sector(fInput->DetElemId(), ixm[ico][0], iym[ico][0]);
+             dpx=fSeg2[0]->Dpx(fInput->DetElemId(), isec)/2.;
+           }
            dx=TMath::Abs(xm[ico][0]-xm[ico][1]);
 // cathode two: y-coordinate
-           isec=Segmentation(1)->Sector(ixm[ico][1], iym[ico][1]);
-           dpy=Segmentation(1)->Dpy(isec)/2.;
+           if (fSegmentationType == 1) {
+             isec=fSeg[1]->Sector(ixm[ico][1], iym[ico][1]);
+             dpy=fSeg[1]->Dpy(isec)/2.;
+           } else {
+             isec=fSeg2[1]->Sector(fInput->DetElemId(), ixm[ico][1], iym[ico][1]);
+             dpy=fSeg2[1]->Dpy(fInput->DetElemId(), isec)/2.;
+           }
            dy=TMath::Abs(ym[ico][0]-ym[ico][1]);
-//         printf("\n %i %f %f %f %f \n", ico, ym[ico][0], ym[ico][1], dy, dpy );
-           if ((dx <= dpx) && (dy <= dpy)) {
+           AliDebug(2,Form("\n %i %f %f %f %f %f %f \n", ico, ym[ico][0], ym[ico][1], dy, dpy, dx, dpx ));
+           if ((dx <= dpx) && (dy <= dpy+eps)) {
                // consistent
                accepted[ico]=kTRUE;
+               dr[ico] = TMath::Sqrt(dx*dx+dy*dy);
                iacc++;
            } else {
                // reject
                accepted[ico]=kFALSE;
            }
        }
+       AliDebug(1,Form("\n iacc= %d:\n", iacc));
+       if (iacc == 3) {
+           if (accepted[0] && accepted[1]) {
+               if (dr[0] >= dr[1]) {
+                   accepted[0]=kFALSE;
+               } else {
+                   accepted[1]=kFALSE;
+               }
+           }
 
+           if (accepted[2] && accepted[3]) {
+               if (dr[2] >= dr[3]) {
+                   accepted[2]=kFALSE;
+               } else {
+                   accepted[3]=kFALSE;
+               }
+           }
+/*         
+// eliminate one candidate
+           Float_t drmax = 0;
+           Int_t icobad = -1;
+
+           for (ico=0; ico<4; ico++) {
+               if (accepted[ico] && dr[ico] > drmax) {
+                   icobad = ico;
+                   drmax  = dr[ico];
+               }
+           }
+           
+           accepted[icobad] = kFALSE;
+*/
+           iacc = 2;
+       }
+       
+       
+       AliDebug(1,Form("\n iacc= %d:\n", iacc));
        if (iacc==2) {
-           fprintf(stderr,"\n iacc=2: No problem ! \n");
+               AliDebug(1,"\n iacc=2: No problem ! \n");
        } else if (iacc==4) {
-           fprintf(stderr,"\n iacc=4: Ok, but ghost problem !!! \n");
+               AliDebug(1,"\n iacc=4: Ok, but ghost problem !!! \n");
        } else if (iacc==0) {
-           fprintf(stderr,"\n iacc=0: I don't know what to do with this !!!!!!!!! \n");
+               AliDebug(1,"\n iacc=0: I don't know what to do with this !!!!!!!!! \n");
        }
 
 //  Initial value for charge ratios
@@ -373,43 +366,42 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 // ******* iacc = 1 *******
 // Only one combination found between the 2 cathodes
        if (iacc==1) {
-
 // Initial values for the 2 maxima (x,y)
 
 // 1 maximum is initialised with the maximum of the combination found (X->cathode 2, Y->cathode 1)
 // 1 maximum is initialised with the other maximum of the first cathode  
            if (accepted[0]){
-               fprintf(stderr,"ico=0\n");
+               AliDebug(1,"ico=0");
                fXInit[0]=xm[0][1];
                fYInit[0]=ym[0][0];
                fXInit[1]=xm[3][0];
                fYInit[1]=ym[3][0];
            } else if (accepted[1]){
-               fprintf(stderr,"ico=1\n");
+               AliDebug(1,"ico=1");
                fXInit[0]=xm[1][1];
                fYInit[0]=ym[1][0];
                fXInit[1]=xm[2][0];
                fYInit[1]=ym[2][0];
            } else if (accepted[2]){
-               fprintf(stderr,"ico=2\n");
+               AliDebug(1,"ico=2");
                fXInit[0]=xm[2][1];
                fYInit[0]=ym[2][0];
                fXInit[1]=xm[1][0];
                fYInit[1]=ym[1][0];
            } else if (accepted[3]){
-               fprintf(stderr,"ico=3\n");
+               AliDebug(1,"ico=3");
                fXInit[0]=xm[3][1];
                fYInit[0]=ym[3][0];
                fXInit[1]=xm[0][0];
                fYInit[1]=ym[0][0];
            }
-           fprintf(stderr,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
+               AliDebug(1,"cas (2) CombiDoubleMathiesonFit(c)");
            chi2=CombiDoubleMathiesonFit(c);
 //         Int_t ndf = fgNbins[0]+fgNbins[1]-6;
 //         Float_t prob = TMath::Prob(chi2,ndf);
 //         prob2->Fill(prob);
 //         chi2_2->Fill(chi2);
-           fprintf(stderr," chi2 %f\n",chi2);
+           AliDebug(1,Form(" chi2 %f\n",chi2));
 
 // If reasonable chi^2 add result to the list of rawclusters
            if (chi2<10) {
@@ -419,37 +411,37 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 // 1 maximum is initialised with the maximum of the combination found (X->cathode 2, Y->cathode 1)
 // 1 maximum is initialised with the other maximum of the second cathode  
                if (accepted[0]){
-                   fprintf(stderr,"ico=0\n");
+                       AliDebug(1,"ico=0");
                    fXInit[0]=xm[0][1];
                    fYInit[0]=ym[0][0];
                    fXInit[1]=xm[3][1];
                    fYInit[1]=ym[3][1];
                } else if (accepted[1]){
-                   fprintf(stderr,"ico=1\n");
+                       AliDebug(1,"ico=1");
                    fXInit[0]=xm[1][1];
                    fYInit[0]=ym[1][0];
                    fXInit[1]=xm[2][1];
                    fYInit[1]=ym[2][1];
                } else if (accepted[2]){
-                   fprintf(stderr,"ico=2\n");
+                       AliDebug(1,"ico=2");
                    fXInit[0]=xm[2][1];
                    fYInit[0]=ym[2][0];
                    fXInit[1]=xm[1][1];
                    fYInit[1]=ym[1][1];
                } else if (accepted[3]){
-                   fprintf(stderr,"ico=3\n");
+                       AliDebug(1,"ico=3");
                    fXInit[0]=xm[3][1];
                    fYInit[0]=ym[3][0];
                    fXInit[1]=xm[0][1];
                    fYInit[1]=ym[0][1];
                }
-               fprintf(stderr,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
+               AliDebug(1,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
                chi2=CombiDoubleMathiesonFit(c);
 //             Int_t ndf = fgNbins[0]+fgNbins[1]-6;
 //             Float_t prob = TMath::Prob(chi2,ndf);
 //             prob2->Fill(prob);
 //             chi2_2->Fill(chi2);
-               fprintf(stderr," chi2 %f\n",chi2);
+               AliDebug(1,Form(" chi2 %f\n",chi2));
 
 // If reasonable chi^2 add result to the list of rawclusters
                if (chi2<10) {
@@ -461,18 +453,23 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
                            AliMUONRawCluster cnew;
                            Int_t cath;    
                            for (cath=0; cath<2; cath++) {
-                             cnew.fX[cath]=Float_t(xm[ico][1]);
-                             cnew.fY[cath]=Float_t(ym[ico][0]);
-                             cnew.fMultiplicity[cath]=c->fMultiplicity[cath];
+                               cnew.SetX(cath, Float_t(xm[ico][1]));
+                               cnew.SetY(cath, Float_t(ym[ico][0]));
+                               cnew.SetZ(cath, fZPlane);
+                               
+                               cnew.SetMultiplicity(cath,c->GetMultiplicity(cath));
                                for (i=0; i<fMul[cath]; i++) {
-                                 cnew.fIndexMap[i][cath]=c->fIndexMap[i][cath];
-                                 fgSegmentation[cath]->SetPad(fgix[i][cath], fgiy[i][cath]);
+                                 cnew.SetIndex(i, cath, c->GetIndex(i,cath));
+                                 if (fSegmentationType == 1) 
+                                   fSeg[cath]->SetPad(fIx[i][cath], fIy[i][cath]);
+                                 else 
+                                   fSeg2[cath]->SetPad(fInput->DetElemId(), fIx[i][cath], fIy[i][cath]);
                                }
-                             fprintf(stderr,"\nRawCluster %d cath %d\n",ico,cath);
-                             fprintf(stderr,"mult_av %d\n",c->fMultiplicity[cath]);
-                             FillCluster(&cnew,cath);
+                               AliDebug(1,Form("\nRawCluster %d cath %d\n",ico,cath));
+                               AliDebug(1,Form("mult_av %d\n",c->GetMultiplicity(cath)));
+                               FillCluster(&cnew,cath);
                            } 
-                           cnew.fClusterType=cnew.PhysicsContribution();
+                           cnew.SetClusterType(cnew.PhysicsContribution());
                            AddRawCluster(cnew);
                            fNPeaks++;
                        }
@@ -480,90 +477,145 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
                }
            }
        }
-
+       
 // ******* iacc = 2 *******
 // Two combinations found between the 2 cathodes
        if (iacc==2) {
-
 // Was the same maximum taken twice
-               if ((accepted[0]&&accepted[1]) || (accepted[2]&&accepted[3])) {
-                   fprintf(stderr,"\n Maximum taken twice !!!\n");
-
-// Have a try !! with that 
-                   if (accepted[0]&&accepted[3]) {
-                       fXInit[0]=xm[0][1];
-                       fYInit[0]=ym[0][0];
-                       fXInit[1]=xm[1][1];
-                       fYInit[1]=ym[1][0];
-                   } else {
-                       fXInit[0]=xm[2][1];
-                       fYInit[0]=ym[2][0];
-                       fXInit[1]=xm[3][1];
-                       fYInit[1]=ym[3][0];
-                   }
-                   fprintf(stderr,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
-                   chi2=CombiDoubleMathiesonFit(c);
+           if ((accepted[0]&&accepted[1]) || (accepted[2]&&accepted[3])) {
+               AliDebug(1,"\n Maximum taken twice !!!\n");
+
+// Have a try !! with that
+               if (accepted[0]&&accepted[3]) {
+                   fXInit[0]=xm[0][1];
+                   fYInit[0]=ym[0][0];
+                   fXInit[1]=xm[1][1];
+                   fYInit[1]=ym[1][0];
+               } else {
+                   fXInit[0]=xm[2][1];
+                   fYInit[0]=ym[2][0];
+                   fXInit[1]=xm[3][1];
+                   fYInit[1]=ym[3][0];
+               }
+               AliDebug(1,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
+               chi2=CombiDoubleMathiesonFit(c);
 //                 Int_t ndf = fgNbins[0]+fgNbins[1]-6;
 //                 Float_t prob = TMath::Prob(chi2,ndf);
 //                 prob2->Fill(prob);
 //                 chi2_2->Fill(chi2);
-                   Split(c);
-
-               } else {
+               Split(c);
+               
+           } else {
 // No ghosts ! No Problems ! -  Perform one fit only !
-                   if (accepted[0]&&accepted[3]) {
-                       fXInit[0]=xm[0][1];
-                       fYInit[0]=ym[0][0];
-                       fXInit[1]=xm[3][1];
-                       fYInit[1]=ym[3][0];
-                   } else {
-                       fXInit[0]=xm[1][1];
-                       fYInit[0]=ym[1][0];
-                       fXInit[1]=xm[2][1];
-                       fYInit[1]=ym[2][0];
-                   }
-                   fprintf(stderr,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
-                   chi2=CombiDoubleMathiesonFit(c);
+               if (accepted[0]&&accepted[3]) {
+                   fXInit[0]=xm[0][1];
+                   fYInit[0]=ym[0][0];
+                   fXInit[1]=xm[3][1];
+                   fYInit[1]=ym[3][0];
+               } else {
+                   fXInit[0]=xm[1][1];
+                   fYInit[0]=ym[1][0];
+                   fXInit[1]=xm[2][1];
+                   fYInit[1]=ym[2][0];
+               }
+               AliDebug(1,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
+               chi2=CombiDoubleMathiesonFit(c);
 //                 Int_t ndf = fgNbins[0]+fgNbins[1]-6;
 //                 Float_t prob = TMath::Prob(chi2,ndf);
 //                 prob2->Fill(prob);
 //                 chi2_2->Fill(chi2);
-                   fprintf(stderr," chi2 %f\n",chi2);
-                   Split(c);
-               }
-
+               AliDebug(1,Form(" chi2 %f\n",chi2));
+               Split(c);
+           }
+           
 // ******* iacc = 4 *******
 // Four combinations found between the 2 cathodes
 // Ghost !!
-           } else if (iacc==4) {
+       } else if (iacc==4) {
 // Perform fits for the two possibilities !!   
-               fXInit[0]=xm[0][1];
-               fYInit[0]=ym[0][0];
-               fXInit[1]=xm[3][1];
-               fYInit[1]=ym[3][0];
-               fprintf(stderr,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
-               chi2=CombiDoubleMathiesonFit(c);
+// Accept if charges are compatible on both cathodes
+// If none are compatible, keep everything
+           fXInit[0]=xm[0][1];
+           fYInit[0]=ym[0][0];
+           fXInit[1]=xm[3][1];
+           fYInit[1]=ym[3][0];
+           AliDebug(1,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
+           chi2=CombiDoubleMathiesonFit(c);
 //             Int_t ndf = fgNbins[0]+fgNbins[1]-6;
 //             Float_t prob = TMath::Prob(chi2,ndf);
 //             prob2->Fill(prob);
 //             chi2_2->Fill(chi2);
-               fprintf(stderr," chi2 %f\n",chi2);
-               Split(c);
-               fXInit[0]=xm[1][1];
-               fYInit[0]=ym[1][0];
-               fXInit[1]=xm[2][1];
-               fYInit[1]=ym[2][0];
-               fprintf(stderr,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
-               chi2=CombiDoubleMathiesonFit(c);
+           AliDebug(1,Form(" chi2 %f\n",chi2));
+           // store results of fit and postpone decision
+           Double_t sXFit[2],sYFit[2],sQrFit[2];
+           Float_t sChi2[2];
+           for (Int_t i=0;i<2;i++) {
+               sXFit[i]=fXFit[i];
+               sYFit[i]=fYFit[i];
+               sQrFit[i]=fQrFit[i];
+               sChi2[i]=fChi2[i];
+           }
+           fXInit[0]=xm[1][1];
+           fYInit[0]=ym[1][0];
+           fXInit[1]=xm[2][1];
+           fYInit[1]=ym[2][0];
+           AliDebug(1,"\n cas (2) CombiDoubleMathiesonFit(c)\n");
+           chi2=CombiDoubleMathiesonFit(c);
 //             ndf = fgNbins[0]+fgNbins[1]-6;
 //             prob = TMath::Prob(chi2,ndf);
 //             prob2->Fill(prob);
 //             chi2_2->Fill(chi2);
-               fprintf(stderr," chi2 %f\n",chi2);
-               Split(c);
+           AliDebug(1,Form(" chi2 %f\n",chi2));
+           // We have all informations to perform the decision
+           // Compute the chi2 for the 2 possibilities
+           Float_t chi2fi,chi2si,chi2f,chi2s;
+
+           chi2f = (TMath::Log(fInput->TotalCharge(0)*fQrFit[0]
+                 /  (fInput->TotalCharge(1)*fQrFit[1]) )
+                 / fInput->ChargeCorrel() );
+           chi2f *=chi2f;
+           chi2fi = (TMath::Log(fInput->TotalCharge(0)*(1-fQrFit[0])
+                 /  (fInput->TotalCharge(1)*(1-fQrFit[1])) )
+                 / fInput->ChargeCorrel() );
+           chi2f += chi2fi*chi2fi;
+
+           chi2s = (TMath::Log(fInput->TotalCharge(0)*sQrFit[0]
+                 /  (fInput->TotalCharge(1)*sQrFit[1]) )
+                 / fInput->ChargeCorrel() );
+           chi2s *=chi2s;
+           chi2si = (TMath::Log(fInput->TotalCharge(0)*(1-sQrFit[0])
+                 /  (fInput->TotalCharge(1)*(1-sQrFit[1])) )
+                 / fInput->ChargeCorrel() );
+           chi2s += chi2si*chi2si;
+
+           // usefull to store the charge matching chi2 in the cluster
+           // fChi2[0]=sChi2[1]=chi2f;
+           // fChi2[1]=sChi2[0]=chi2s;
+
+           if (chi2f<=fGhostChi2Cut && chi2s<=fGhostChi2Cut)
+               c->SetGhost(1);
+           if   (chi2f>fGhostChi2Cut && chi2s>fGhostChi2Cut) {
+               // we keep the ghost
+               c->SetGhost(2);
+               chi2s=-1;
+               chi2f=-1;
            }
+           if (chi2f<=fGhostChi2Cut)
+               Split(c);
+           if (chi2s<=fGhostChi2Cut) {
+               // retreive saved values
+               for (Int_t i=0;i<2;i++) {
+                   fXFit[i]=sXFit[i];
+                   fYFit[i]=sYFit[i];
+                   fQrFit[i]=sQrFit[i];
+                   fChi2[i]=sChi2[i];
+               }
+               Split(c);
+           }
+           c->SetGhost(0);
+       }
 
-       } else if (fNLocal[0]==2 &&  fNLocal[1]==1) {
+    } else if (fNLocal[0]==2 &&  fNLocal[1]==1) {
 //  ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 //  (3) Two local maxima on cathode 1 and one maximum on cathode 2 
 //  ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
@@ -577,16 +629,16 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //  0-0, 0-1, 1-0, 1-1 
         ico=0;
        for (im1=0; im1<2; im1++) {
-               xm[ico][0]=fX[fIndLocal[im1][0]][0];
-               ym[ico][0]=fY[fIndLocal[im1][0]][0];
-               xm[ico][1]=fX[fIndLocal[0][1]][1];
-               ym[ico][1]=fY[fIndLocal[0][1]][1];
-
-               ixm[ico][0]=fIx[fIndLocal[im1][0]][0];
-               iym[ico][0]=fIy[fIndLocal[im1][0]][0];
-               ixm[ico][1]=fIx[fIndLocal[0][1]][1];
-               iym[ico][1]=fIy[fIndLocal[0][1]][1];
-               ico++;
+           xm[ico][0]=fX[fIndLocal[im1][0]][0];
+           ym[ico][0]=fY[fIndLocal[im1][0]][0];
+           xm[ico][1]=fX[fIndLocal[0][1]][1];
+           ym[ico][1]=fY[fIndLocal[0][1]][1];
+           
+           ixm[ico][0]=fIx[fIndLocal[im1][0]][0];
+           iym[ico][0]=fIy[fIndLocal[im1][0]][0];
+           ixm[ico][1]=fIx[fIndLocal[0][1]][1];
+           iym[ico][1]=fIy[fIndLocal[0][1]][1];
+           ico++;
        }
 // ico = 0 : first local maximum on cathodes 1 and 2
 // ico = 1 : second local maximum on cathode 1 and first on cathode 2
@@ -596,17 +648,31 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
        Int_t iacc;
        Bool_t accepted[4];
        iacc=0;
+       // In case of staggering maxima are displaced by exactly half the pad-size in y. 
+        // We have to take into account the numerical precision in the consistency check;
        
+       Float_t eps = 1.e-5;
+
        for (ico=0; ico<2; ico++) {
            accepted[ico]=kFALSE;
-           isec=Segmentation(0)->Sector(ixm[ico][0], iym[ico][0]);
-           dpx=Segmentation(0)->Dpx(isec)/2.;
+           if (fSegmentationType == 1) {
+             isec=fSeg[0]->Sector(ixm[ico][0], iym[ico][0]);
+             dpx=fSeg[0]->Dpx(isec)/2.;
+           } else {
+             isec=fSeg2[0]->Sector(fInput->DetElemId(), ixm[ico][0], iym[ico][0]);
+             dpx=fSeg2[0]->Dpx(fInput->DetElemId(), isec)/2.;
+           }
            dx=TMath::Abs(xm[ico][0]-xm[ico][1]);
-           isec=Segmentation(1)->Sector(ixm[ico][1], iym[ico][1]);
-           dpy=Segmentation(1)->Dpy(isec)/2.;
+           if (fSegmentationType == 1) {
+             isec=fSeg[1]->Sector(ixm[ico][1], iym[ico][1]);
+             dpy=fSeg[1]->Dpy(isec)/2.;
+           } else {
+             isec=fSeg2[1]->Sector(fInput->DetElemId(), ixm[ico][1], iym[ico][1]);
+             dpy=fSeg2[1]->Dpy(fInput->DetElemId(), isec)/2.;
+           }
            dy=TMath::Abs(ym[ico][0]-ym[ico][1]);
-//         printf("\n %i %f %f %f %f \n", ico, ym[ico][0], ym[ico][1], dy, dpy );
-           if ((dx <= dpx) && (dy <= dpy)) {
+           AliDebug(2,Form("\n %i %f %f %f %f \n", ico, ym[ico][0], ym[ico][1], dy, dpy ));
+           if ((dx <= dpx) && (dy <= dpy+eps)) {
                // consistent
                accepted[ico]=kTRUE;
                iacc++;
@@ -615,11 +681,34 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
                accepted[ico]=kFALSE;
            }
        }
-
+       
        Float_t chi21 = 100;
        Float_t chi22 = 100;
+       Float_t chi23 = 100;
 
-       if (accepted[0]) {
+       //  Initial value for charge ratios
+       fQrInit[0]=Float_t(fQ[fIndLocal[0][0]][0])/
+           Float_t(fQ[fIndLocal[0][0]][0]+fQ[fIndLocal[1][0]][0]);
+       fQrInit[1]=fQrInit[0];
+       
+       if (accepted[0] && accepted[1]) {
+           
+           fXInit[0]=0.5*(xm[0][1]+xm[0][0]);
+           fYInit[0]=ym[0][0];
+           fXInit[1]=0.5*(xm[0][1]+xm[1][0]);
+           fYInit[1]=ym[1][0];
+           fQrInit[0]=0.5;
+           fQrInit[1]=0.5;
+           chi23=CombiDoubleMathiesonFit(c);
+           if (chi23<10) {
+               Split(c);
+               Float_t yst;
+               yst = fYFit[0];
+               fYFit[0] = fYFit[1];
+               fYFit[1] = yst;
+               Split(c);
+           }
+       } else if (accepted[0]) {
            fXInit[0]=xm[0][1];
            fYInit[0]=ym[0][0];
            fXInit[1]=xm[1][0];
@@ -629,7 +718,7 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //         Float_t prob = TMath::Prob(chi2,ndf);
 //         prob2->Fill(prob);
 //         chi2_2->Fill(chi21);
-           fprintf(stderr," chi2 %f\n",chi21);
+           AliDebug(1,Form(" chi2 %f\n",chi21));
            if (chi21<10) Split(c);
        } else if (accepted[1]) {
            fXInit[0]=xm[1][1];
@@ -641,40 +730,45 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //         Float_t prob = TMath::Prob(chi2,ndf);
 //         prob2->Fill(prob);
 //         chi2_2->Fill(chi22);
-           fprintf(stderr," chi2 %f\n",chi22);
+           AliDebug(1,Form(" chi2 %f\n",chi22));
            if (chi22<10) Split(c);
        }
 
-       if (chi21 > 10 && chi22 > 10) {
+       if (chi21 > 10 && chi22 > 10 && chi23 > 10) {
 // We keep only the combination found (X->cathode 2, Y->cathode 1)
            for (Int_t ico=0; ico<2; ico++) {
                if (accepted[ico]) {
                    AliMUONRawCluster cnew;
                    Int_t cath;    
                    for (cath=0; cath<2; cath++) {
-                       cnew.fX[cath]=Float_t(xm[ico][1]);
-                       cnew.fY[cath]=Float_t(ym[ico][0]);
-                       cnew.fMultiplicity[cath]=c->fMultiplicity[cath];
+                       cnew.SetX(cath, Float_t(xm[ico][1]));
+                       cnew.SetY(cath, Float_t(ym[ico][0]));
+                       cnew.SetZ(cath, fZPlane);
+                       cnew.SetMultiplicity(cath, c->GetMultiplicity(cath));
                        for (i=0; i<fMul[cath]; i++) {
-                         cnew.fIndexMap[i][cath]=c->fIndexMap[i][cath];
-                         fgSegmentation[cath]->SetPad(fgix[i][cath], fgiy[i][cath]);
+                           cnew.SetIndex(i, cath, c->GetIndex(i, cath));
+                           if (fSegmentationType == 1) 
+                             fSeg[cath]->SetPad(fIx[i][cath], fIy[i][cath]);
+                           else
+                             fSeg2[cath]->SetPad(fInput->DetElemId(), fIx[i][cath], fIy[i][cath]);
+
                        }
-                       fprintf(stderr,"\nRawCluster %d cath %d\n",ico,cath);
-                       fprintf(stderr,"mult_av %d\n",c->fMultiplicity[cath]);
+                       AliDebug(1,Form("\nRawCluster %d cath %d\n",ico,cath));
+                       AliDebug(1,Form("mult_av %d\n",c->GetMultiplicity(cath)));
+                       
                        FillCluster(&cnew,cath);
                    } 
-                   cnew.fClusterType=cnew.PhysicsContribution();
+                   cnew.SetClusterType(cnew.PhysicsContribution());
                    AddRawCluster(cnew);
                    fNPeaks++;
                }
            }
        }
-          
+       
 //  +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 //  (3') One local maximum on cathode 1 and two maxima on cathode 2 
 //  +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
     } else if (fNLocal[0]==1 && fNLocal[1]==2) {
-
        Float_t xm[4][2], ym[4][2];
        Float_t dpx, dpy, dx, dy;
        Int_t ixm[4][2], iym[4][2];
@@ -684,16 +778,16 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //  0-0, 0-1, 1-0, 1-1 
         ico=0;
        for (im1=0; im1<2; im1++) {
-               xm[ico][0]=fX[fIndLocal[0][0]][0];
-               ym[ico][0]=fY[fIndLocal[0][0]][0];
-               xm[ico][1]=fX[fIndLocal[im1][1]][1];
-               ym[ico][1]=fY[fIndLocal[im1][1]][1];
-
-               ixm[ico][0]=fIx[fIndLocal[0][0]][0];
-               iym[ico][0]=fIy[fIndLocal[0][0]][0];
-               ixm[ico][1]=fIx[fIndLocal[im1][1]][1];
-               iym[ico][1]=fIy[fIndLocal[im1][1]][1];
-               ico++;
+           xm[ico][0]=fX[fIndLocal[0][0]][0];
+           ym[ico][0]=fY[fIndLocal[0][0]][0];
+           xm[ico][1]=fX[fIndLocal[im1][1]][1];
+           ym[ico][1]=fY[fIndLocal[im1][1]][1];
+           
+           ixm[ico][0]=fIx[fIndLocal[0][0]][0];
+           iym[ico][0]=fIy[fIndLocal[0][0]][0];
+           ixm[ico][1]=fIx[fIndLocal[im1][1]][1];
+           iym[ico][1]=fIy[fIndLocal[im1][1]][1];
+           ico++;
        }
 // ico = 0 : first local maximum on cathodes 1 and 2
 // ico = 1 : first local maximum on cathode 1 and second on cathode 2
@@ -703,20 +797,34 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
        Int_t iacc;
        Bool_t accepted[4];
        iacc=0;
+        // In case of staggering maxima are displaced by exactly half the pad-size in y. 
+        // We have to take into account the numerical precision in the consistency check;      
+       Float_t eps = 1.e-5;
+
        
        for (ico=0; ico<2; ico++) {
            accepted[ico]=kFALSE;
-           isec=Segmentation(0)->Sector(ixm[ico][0], iym[ico][0]);
-           dpx=Segmentation(0)->Dpx(isec)/2.;
+           if (fSegmentationType == 1) {
+             isec=fSeg[0]->Sector(ixm[ico][0], iym[ico][0]);
+             dpx=fSeg[0]->Dpx(isec)/2.;
+           } else {
+             isec=fSeg2[0]->Sector(fInput->DetElemId(), ixm[ico][0], iym[ico][0]);
+             dpx=fSeg2[0]->Dpx(fInput->DetElemId(), isec)/2.;
+           }
            dx=TMath::Abs(xm[ico][0]-xm[ico][1]);
-           isec=Segmentation(1)->Sector(ixm[ico][1], iym[ico][1]);
-           dpy=Segmentation(1)->Dpy(isec)/2.;
+           if (fSegmentationType == 1) {
+             isec=fSeg[1]->Sector(ixm[ico][1], iym[ico][1]);
+             dpy=fSeg[1]->Dpy(isec)/2.;
+           } else {
+             isec=fSeg2[1]->Sector(fInput->DetElemId(), ixm[ico][1], iym[ico][1]);
+             dpy=fSeg2[1]->Dpy(fInput->DetElemId(), isec)/2.;
+           }
            dy=TMath::Abs(ym[ico][0]-ym[ico][1]);
-//         printf("\n %i %f %f %f %f \n", ico, ym[ico][0], ym[ico][1], dy, dpy );
-           if ((dx <= dpx) && (dy <= dpy)) {
+           AliDebug(1,Form("\n %i %f %f %f %f \n", ico, ym[ico][0], ym[ico][1], dy, dpy ));
+           if ((dx <= dpx) && (dy <= dpy+eps)) {
                // consistent
                accepted[ico]=kTRUE;
-               fprintf(stderr,"ico %d\n",ico);
+               AliDebug(1,Form("ico %d\n",ico));
                iacc++;
            } else {
                // reject
@@ -726,8 +834,31 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 
        Float_t chi21 = 100;
        Float_t chi22 = 100;
+       Float_t chi23 = 100;
 
-       if (accepted[0]) {
+       fQrInit[1]=Float_t(fQ[fIndLocal[0][1]][1])/
+           Float_t(fQ[fIndLocal[0][1]][1]+fQ[fIndLocal[1][1]][1]);
+       
+       fQrInit[0]=fQrInit[1];
+
+       
+       if (accepted[0] && accepted[1]) {
+           fXInit[0]=xm[0][1];
+           fYInit[0]=0.5*(ym[0][0]+ym[0][1]);
+           fXInit[1]=xm[1][1];
+           fYInit[1]=0.5*(ym[0][0]+ym[1][1]);
+           fQrInit[0]=0.5;
+           fQrInit[1]=0.5;
+           chi23=CombiDoubleMathiesonFit(c);
+           if (chi23<10) {
+               Split(c);
+               Float_t yst;
+               yst = fYFit[0];
+               fYFit[0] = fYFit[1];
+               fYFit[1] = yst;
+               Split(c);
+           }
+       } else if (accepted[0]) {
            fXInit[0]=xm[0][0];
            fYInit[0]=ym[0][1];
            fXInit[1]=xm[1][1];
@@ -737,7 +868,7 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //         Float_t prob = TMath::Prob(chi2,ndf);
 //         prob2->Fill(prob);
 //         chi2_2->Fill(chi21);
-           fprintf(stderr," chi2 %f\n",chi21);
+           AliDebug(1,Form(" chi2 %f\n",chi21));
            if (chi21<10) Split(c);
        } else if (accepted[1]) {
            fXInit[0]=xm[1][0];
@@ -749,29 +880,33 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //         Float_t prob = TMath::Prob(chi2,ndf);
 //         prob2->Fill(prob);
 //         chi2_2->Fill(chi22);
-           fprintf(stderr," chi2 %f\n",chi22);
+           AliDebug(1,Form(" chi2 %f\n",chi22));
            if (chi22<10) Split(c);
        }
 
-       if (chi21 > 10 && chi22 > 10) {
+       if (chi21 > 10 && chi22 > 10 && chi23 > 10) {
 //We keep only the combination found (X->cathode 2, Y->cathode 1)
            for (Int_t ico=0; ico<2; ico++) {
                if (accepted[ico]) {
                    AliMUONRawCluster cnew;
                    Int_t cath;    
                    for (cath=0; cath<2; cath++) {
-                       cnew.fX[cath]=Float_t(xm[ico][1]);
-                       cnew.fY[cath]=Float_t(ym[ico][0]);
-                       cnew.fMultiplicity[cath]=c->fMultiplicity[cath];
+                       cnew.SetX(cath, Float_t(xm[ico][1]));
+                       cnew.SetY(cath, Float_t(ym[ico][0]));
+                       cnew.SetZ(cath, fZPlane);
+                       cnew.SetMultiplicity(cath, c->GetMultiplicity(cath));
                        for (i=0; i<fMul[cath]; i++) {
-                         cnew.fIndexMap[i][cath]=c->fIndexMap[i][cath];
-                         fgSegmentation[cath]->SetPad(fgix[i][cath], fgiy[i][cath]);
+                           cnew.SetIndex(i, cath, c->GetIndex(i, cath));
+                           if (fSegmentationType == 1) 
+                             fSeg[cath]->SetPad(fIx[i][cath], fIy[i][cath]);
+                           else 
+                             fSeg2[cath]->SetPad(fInput->DetElemId(), fIx[i][cath], fIy[i][cath]);
                        }
-                       fprintf(stderr,"\nRawCluster %d cath %d\n",ico,cath);
-                       fprintf(stderr,"mult_av %d\n",c->fMultiplicity[cath]);
+                       AliDebug(1,Form("\nRawCluster %d cath %d\n",ico,cath));
+                       AliDebug(1,Form("mult_av %d\n",c->GetMultiplicity(cath)));
                        FillCluster(&cnew,cath);
                    } 
-                   cnew.fClusterType=cnew.PhysicsContribution();
+                   cnew.SetClusterType(cnew.PhysicsContribution());
                    AddRawCluster(cnew);
                    fNPeaks++;
                }
@@ -782,11 +917,18 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
 //  (4) At least three local maxima on cathode 1 or on cathode 2 
 //  ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
     } else if (fNLocal[0]>2 || fNLocal[1]>2) {
-       
        Int_t param = fNLocal[0]*fNLocal[1];
-
-       Float_t xm[param][2], ym[param][2];
-       Int_t ixm[param][2], iym[param][2];
+       Int_t ii;
+
+       Float_t ** xm = new Float_t * [param];
+       for (ii=0; ii<param; ii++) xm[ii]=new Float_t [2];
+       Float_t ** ym = new Float_t * [param];
+       for (ii=0; ii<param; ii++) ym[ii]=new Float_t [2];
+       Int_t ** ixm = new Int_t * [param];
+       for (ii=0; ii<param; ii++) ixm[ii]=new Int_t [2];
+       Int_t ** iym = new Int_t * [param];
+       for (ii=0; ii<param; ii++) iym[ii]=new Int_t [2];
+       
        Int_t isec, ico;
        Float_t dpx, dpy, dx, dy;
 
@@ -805,47 +947,64 @@ void AliMUONClusterFinderVS::SplitByLocalMaxima(AliMUONRawCluster *c)
                ico++;
            }
        }
-
+       
        Int_t nIco = ico;
-
-       fprintf(stderr,"nIco %d\n",nIco);
+       AliDebug(1,Form("nIco %d\n",nIco));
        for (ico=0; ico<nIco; ico++) {
-           fprintf(stderr,"ico = %d\n",ico);
-           isec=Segmentation(0)->Sector(ixm[ico][0], iym[ico][0]);
-           dpx=Segmentation(0)->Dpx(isec)/2.;
+           AliDebug(1,Form("ico = %d\n",ico));
+           if (fSegmentationType == 1) {
+             isec=fSeg[0]->Sector(ixm[ico][0], iym[ico][0]);
+             dpx=fSeg[0]->Dpx(isec)/2.;
+           } else {
+             isec=fSeg2[0]->Sector(fInput->DetElemId(), ixm[ico][0], iym[ico][0]);
+             dpx=fSeg2[0]->Dpx(fInput->DetElemId(), isec)/2.;
+           } 
            dx=TMath::Abs(xm[ico][0]-xm[ico][1]);
-           isec=Segmentation(1)->Sector(ixm[ico][1], iym[ico][1]);
-           dpy=Segmentation(1)->Dpy(isec)/2.;
+           if (fSegmentationType == 1) {
+             isec=fSeg[1]->Sector(ixm[ico][1], iym[ico][1]);
+             dpy=fSeg[1]->Dpy(isec)/2.;
+           } else {
+             isec=fSeg2[1]->Sector(fInput->DetElemId(), ixm[ico][1], iym[ico][1]);
+             dpy=fSeg2[1]->Dpy(fInput->DetElemId(), isec)/2.;
+           }
            dy=TMath::Abs(ym[ico][0]-ym[ico][1]);
-
-           fprintf(stderr,"dx %f dpx %f dy %f dpy %f\n",dx,dpx,dy,dpy);
-           fprintf(stderr,"  X %f Y %f\n",xm[ico][1],ym[ico][0]);
+               AliDebug(1,Form("dx %f dpx %f dy %f dpy %f\n",dx,dpx,dy,dpy));
+               AliDebug(1,Form("  X %f Y %f\n",xm[ico][1],ym[ico][0]));
            if ((dx <= dpx) && (dy <= dpy)) {
-               fprintf(stderr,"ok\n");
+                       AliDebug(1,"ok\n");
                Int_t cath;    
                AliMUONRawCluster cnew;
                for (cath=0; cath<2; cath++) {
-                   cnew.fX[cath]=Float_t(xm[ico][1]);
-                   cnew.fY[cath]=Float_t(ym[ico][0]);
-                   cnew.fMultiplicity[cath]=c->fMultiplicity[cath];
+                   cnew.SetX(cath, Float_t(xm[ico][1]));
+                   cnew.SetY(cath, Float_t(ym[ico][0]));
+                   cnew.SetZ(cath, fZPlane);
+                   cnew.SetMultiplicity(cath, c->GetMultiplicity(cath));
                    for (i=0; i<fMul[cath]; i++) {
-                     cnew.fIndexMap[i][cath]=c->fIndexMap[i][cath];
-                     fgSegmentation[cath]->SetPad(fgix[i][cath], fgiy[i][cath]);
+                       cnew.SetIndex(i, cath, c->GetIndex(i, cath));
+                       if (fSegmentationType == 1) 
+                         fSeg[cath]->SetPad(fIx[i][cath], fIy[i][cath]);
+                       else 
+                         fSeg2[cath]->SetPad(fInput->DetElemId(), fIx[i][cath], fIy[i][cath]);
                    }
                    FillCluster(&cnew,cath);
                } 
-               cnew.fClusterType=cnew.PhysicsContribution();
+               cnew.SetClusterType(cnew.PhysicsContribution());
                AddRawCluster(cnew);
                fNPeaks++;
            }
        }
+       delete [] xm;
+       delete [] ym;
+       delete [] ixm;
+       delete [] iym;
     }
 }
 
-void AliMUONClusterFinderVS::FindLocalMaxima(AliMUONRawCluster* c)
+void AliMUONClusterFinderVS::FindLocalMaxima(AliMUONRawCluster* /*c*/)
 {
 // Find all local maxima of a cluster
-   
+    AliDebug(1,"\n Find Local maxima  !");
+    
     AliMUONDigit* digt;
     
     Int_t cath, cath1; // loops over cathodes
@@ -863,51 +1022,70 @@ void AliMUONClusterFinderVS::FindLocalMaxima(AliMUONRawCluster* c)
     }
 //  number of next neighbours and arrays to store them 
     Int_t nn;
-    Int_t x[kMaxNeighbours], y[kMaxNeighbours];
-// loop over cathodes
+    Int_t x[10], y[10];
+    // loop over cathodes
     for (cath=0; cath<2; cath++) {
-// loop over cluster digits
-       for (i=0; i<fMul[cath]; i++) {
-// get neighbours for that digit and assume that it is local maximum       
-           Segmentation(cath)->Neighbours(fIx[i][cath], fIy[i][cath], &nn, x, y);
-           isLocal[i][cath]=kTRUE;
-           Int_t isec= Segmentation(cath)->Sector(fIx[i][cath], fIy[i][cath]);
-           Float_t a0 = Segmentation(cath)->Dpx(isec)*Segmentation(cath)->Dpy(isec);
-// loop over next neighbours, if at least one neighbour has higher charger assumption
-// digit is not local maximum 
-           for (j=0; j<nn; j++) {
-               if (HitMap(cath)->TestHit(x[j], y[j])==kEmpty) continue;
-               digt=(AliMUONDigit*) HitMap(cath)->GetHit(x[j], y[j]);
-               isec=Segmentation(cath)->Sector(x[j], y[j]);
-               Float_t a1 = Segmentation(cath)->Dpx(isec)*Segmentation(cath)->Dpy(isec);
-               if (digt->fSignal/a1 > fQ[i][cath]/a0) {
+      // loop over cluster digits
+      for (i=0; i<fMul[cath]; i++) {
+       // get neighbours for that digit and assume that it is local maximum
+       Int_t isec;
+       Float_t a0;
+
+       if (fSegmentationType == 1)         
+         fSeg[cath]->Neighbours(fIx[i][cath], fIy[i][cath], &nn, x, y);
+       else 
+         fSeg2[cath]->Neighbours(fInput->DetElemId(), fIx[i][cath], fIy[i][cath], &nn, x, y);
+         
+       isLocal[i][cath]=kTRUE;
+
+       if (fSegmentationType == 1) {
+         isec = fSeg[cath]->Sector(fIx[i][cath], fIy[i][cath]);
+         a0   = fSeg[cath]->Dpx(isec)*fSeg[cath]->Dpy(isec);
+       } else {
+         isec = fSeg2[cath]->Sector(fInput->DetElemId(), fIx[i][cath], fIy[i][cath]);
+         a0   = fSeg2[cath]->Dpx(fInput->DetElemId(), isec)*fSeg2[cath]->Dpy(fInput->DetElemId(), isec);
+       }
+       // loop over next neighbours, if at least one neighbour has higher charger assumption
+       // digit is not local maximum 
+       for (j=0; j<nn; j++) {
+         if (fHitMap[cath]->TestHit(x[j], y[j])==kEmpty) continue;
+         digt=(AliMUONDigit*) fHitMap[cath]->GetHit(x[j], y[j]);
+         Float_t a1;
+         if (fSegmentationType == 1) {
+           isec=fSeg[cath]->Sector(x[j], y[j]);
+           a1 = fSeg[cath]->Dpx(isec)*fSeg[cath]->Dpy(isec);
+         } else {
+           isec=fSeg2[cath]->Sector(fInput->DetElemId(), x[j], y[j]);
+           a1 = fSeg2[cath]->Dpx(fInput->DetElemId(),isec)*fSeg2[cath]->Dpy(fInput->DetElemId(), isec);
+         }
+         if (digt->Signal()/a1 > fQ[i][cath]/a0) {
+           isLocal[i][cath]=kFALSE;
+           break;
+           //
+           // handle special case of neighbouring pads with equal signal
+         } else if (digt->Signal() == fQ[i][cath]) {
+           if (fNLocal[cath]>0) {
+             for (Int_t k=0; k<fNLocal[cath]; k++) {
+               if (x[j]==fIx[fIndLocal[k][cath]][cath] 
+                   && y[j]==fIy[fIndLocal[k][cath]][cath])
+                 {
                    isLocal[i][cath]=kFALSE;
-                   break;
-//
-// handle special case of neighbouring pads with equal signal
-               } else if (digt->fSignal == fQ[i][cath]) {
-                   if (fNLocal[cath]>0) {
-                       for (Int_t k=0; k<fNLocal[cath]; k++) {
-                           if (x[j]==fIx[fIndLocal[k][cath]][cath] 
-                               && y[j]==fIy[fIndLocal[k][cath]][cath])
-                           {
-                               isLocal[i][cath]=kFALSE;
-                           } 
-                       } // loop over local maxima
-                   } // are there already local maxima
-               } // same charge ? 
-           } // loop over next neighbours
-           if (isLocal[i][cath]) {
-               fIndLocal[fNLocal[cath]][cath]=i;
-               fNLocal[cath]++;
-           } 
-       } // loop over all digits
+                 } 
+             } // loop over local maxima
+           } // are there already local maxima
+         } // same charge ? 
+       } // loop over next neighbours
+       if (isLocal[i][cath]) {
+         fIndLocal[fNLocal[cath]][cath]=i;
+         fNLocal[cath]++;
+       } 
+      } // loop over all digits
     } // loop over cathodes
-    
-    printf("\n Found %d %d %d %d local Maxima\n",
-          fNLocal[0], fNLocal[1], fMul[0], fMul[1]);
-    fprintf(stderr,"\n Cathode 1 local Maxima %d Multiplicite %d\n",fNLocal[0], fMul[0]);
-    fprintf(stderr," Cathode 2 local Maxima %d Multiplicite %d\n",fNLocal[1], fMul[1]);
+
+    AliDebug(1,Form("\n Found %d %d %d %d local Maxima\n",
+              fNLocal[0], fNLocal[1], fMul[0], fMul[1]));
+       AliDebug(1,Form("\n Cathode 1 local Maxima %d Multiplicite %d\n",fNLocal[0], fMul[0]));
+       AliDebug(1,Form(" Cathode 2 local Maxima %d Multiplicite %d\n",fNLocal[1], fMul[1]));
     Int_t ix, iy, isec;
     Float_t dpx, dpy;
     
@@ -923,9 +1101,15 @@ void AliMUONClusterFinderVS::FindLocalMaxima(AliMUONRawCluster* c)
        cath1=1;
        
        for (i=0; i<fMul[cath]; i++) {
-           isec=Segmentation(cath)->Sector(fIx[i][cath],fIy[i][cath]);
-           dpy=Segmentation(cath)->Dpy(isec);
-           dpx=Segmentation(cath)->Dpx(isec);
+         if (fSegmentationType == 1) {
+           isec=fSeg[cath]->Sector(fIx[i][cath],fIy[i][cath]);
+           dpy=fSeg[cath]->Dpy(isec);
+           dpx=fSeg[cath]->Dpx(isec);
+         } else {
+           isec=fSeg2[cath]->Sector(fInput->DetElemId(), fIx[i][cath],fIy[i][cath]);
+           dpy=fSeg2[cath]->Dpy(fInput->DetElemId(), isec);
+           dpx=fSeg2[cath]->Dpx(fInput->DetElemId(), isec);
+         }
            if (isLocal[i][cath]) continue;
 // Pad position should be consistent with position of local maxima on the opposite cathode
            if ((TMath::Abs(fX[i][cath]-fX[fIndLocal[0][cath1]][cath1]) > dpx/2.) && 
@@ -935,19 +1119,42 @@ void AliMUONClusterFinderVS::FindLocalMaxima(AliMUONRawCluster* c)
 // get neighbours for that digit and assume that it is local maximum       
            isLocal[i][cath]=kTRUE;
 // compare signal to that on the two neighbours on the left and on the right
-           Segmentation(cath)->GetPadIxy(fX[i][cath],fY[i][cath]+dpy,ix,iy);
 // iNN counts the number of neighbours with signal, it should be 1 or 2
            Int_t iNN=0;
-           if (HitMap(cath)->TestHit(ix, iy)!=kEmpty) {
-               iNN++;
-               digt=(AliMUONDigit*) HitMap(cath)->GetHit(ix,iy);
-               if (digt->fSignal > fQ[i][cath]) isLocal[i][cath]=kFALSE;
-           }
-           Segmentation(cath)->GetPadIxy(fX[i][cath],fY[i][cath]-dpy,ix,iy);
-           if (HitMap(cath)->TestHit(ix, iy)!=kEmpty) {
-               iNN++;
-               digt=(AliMUONDigit*) HitMap(cath)->GetHit(ix,iy);
-               if (digt->fSignal > fQ[i][cath]) isLocal[i][cath]=kFALSE;
+           if (fSegmentationType == 1) {
+
+             for (fSeg[cath]->FirstPad(fX[i][cath], fY[i][cath], fZPlane, 0., dpy);
+                  fSeg[cath]->MorePads();
+                  fSeg[cath]->NextPad())
+               {
+                 ix = fSeg[cath]->Ix();
+                 iy = fSeg[cath]->Iy();
+                 // skip the current pad
+                 if (iy == fIy[i][cath]) continue;
+               
+                 if (fHitMap[cath]->TestHit(ix, iy)!=kEmpty) {
+                   iNN++;
+                   digt=(AliMUONDigit*) fHitMap[cath]->GetHit(ix,iy);
+                   if (digt->Signal() > fQ[i][cath]) isLocal[i][cath]=kFALSE;
+                 }
+               } // Loop over pad neighbours in y
+           } else {
+
+             for (fSeg2[cath]->FirstPad(fInput->DetElemId(), fX[i][cath], fY[i][cath], fZPlane, 0., dpy);
+                  fSeg2[cath]->MorePads(fInput->DetElemId());
+                  fSeg2[cath]->NextPad(fInput->DetElemId()))
+               {
+                 ix = fSeg2[cath]->Ix();
+                 iy = fSeg2[cath]->Iy();
+                 // skip the current pad
+                 if (iy == fIy[i][cath]) continue;
+               
+                 if (fHitMap[cath]->TestHit(ix, iy)!=kEmpty) {
+                   iNN++;
+                   digt=(AliMUONDigit*) fHitMap[cath]->GetHit(ix,iy);
+                   if (digt->Signal() > fQ[i][cath]) isLocal[i][cath]=kFALSE;
+                 }
+               } // Loop over pad neighbours in y
            }
            if (isLocal[i][cath] && iNN>0) {
                fIndLocal[fNLocal[cath]][cath]=i;
@@ -956,8 +1163,10 @@ void AliMUONClusterFinderVS::FindLocalMaxima(AliMUONRawCluster* c)
        } // loop over all digits
 // if one additional maximum has been found we are happy 
 // if more maxima have been found restore the previous situation
-       fprintf(stderr,"\n New search gives %d local maxima for cathode 1 \n",fNLocal[0]);
-       fprintf(stderr,"                  %d local maxima for cathode 2 \n",fNLocal[1]);
+       AliDebug(1,Form("\n New search gives %d local maxima for cathode 1 \n",
+                   fNLocal[0]));
+       AliDebug(1,Form("                  %d local maxima for cathode 2 \n",
+                   fNLocal[1]));
        if (fNLocal[cath]>2) {
            fNLocal[cath]=iback;
        }
@@ -970,37 +1179,71 @@ void AliMUONClusterFinderVS::FindLocalMaxima(AliMUONRawCluster* c)
 //  Two local maxima on cathode 1 and one maximum on cathode 2 
 //  Look for local maxima considering left and right neighbours on the 2nd cathode only
        cath=1;
-       Int_t cath1=0;
+       Int_t cath1 = 0;
+       Float_t eps = 1.e-5;
        
-
 //
 //  Loop over cluster digits
        for (i=0; i<fMul[cath]; i++) {
-           isec=Segmentation(cath)->Sector(fIx[i][cath],fIy[i][cath]);
-           dpx=Segmentation(cath)->Dpx(isec);
-           dpy=Segmentation(cath)->Dpy(isec);
+         if (fSegmentationType == 1) {
+           isec=fSeg[cath]->Sector(fIx[i][cath],fIy[i][cath]);
+           dpx=fSeg[cath]->Dpx(isec);
+           dpy=fSeg[cath]->Dpy(isec);
+         } else {
+           isec=fSeg2[cath]->Sector(fInput->DetElemId(), fIx[i][cath],fIy[i][cath]);
+           dpx=fSeg2[cath]->Dpx(fInput->DetElemId(), isec);
+           dpy=fSeg2[cath]->Dpy(fInput->DetElemId(), isec);
+         }
+       
            if (isLocal[i][cath]) continue;
 // Pad position should be consistent with position of local maxima on the opposite cathode
-           if ((TMath::Abs(fY[i][cath]-fY[fIndLocal[0][cath1]][cath1]) > dpy/2.) && 
-               (TMath::Abs(fY[i][cath]-fY[fIndLocal[1][cath1]][cath1]) > dpy/2.))
+           if ((TMath::Abs(fY[i][cath]-fY[fIndLocal[0][cath1]][cath1]) > dpy/2.+eps) && 
+               (TMath::Abs(fY[i][cath]-fY[fIndLocal[1][cath1]][cath1]) > dpy/2.+eps))
                continue;
+           
 //
 // get neighbours for that digit and assume that it is local maximum       
            isLocal[i][cath]=kTRUE;
 // compare signal to that on the two neighbours on the left and on the right
-           Segmentation(cath)->GetPadIxy(fX[i][cath]+dpx,fY[i][cath],ix,iy);
+
 // iNN counts the number of neighbours with signal, it should be 1 or 2
            Int_t iNN=0;
-           if (HitMap(cath)->TestHit(ix, iy)!=kEmpty) {
-               iNN++;
-               digt=(AliMUONDigit*) HitMap(cath)->GetHit(ix,iy);
-               if (digt->fSignal > fQ[i][cath]) isLocal[i][cath]=kFALSE;
-           }
-           Segmentation(cath)->GetPadIxy(fX[i][cath]-dpx,fY[i][cath],ix,iy);
-           if (HitMap(cath)->TestHit(ix, iy)!=kEmpty) {
-               iNN++;
-               digt=(AliMUONDigit*) HitMap(cath)->GetHit(ix,iy);
-               if (digt->fSignal > fQ[i][cath]) isLocal[i][cath]=kFALSE;
+           if (fSegmentationType == 1) {
+             for (fSeg[cath]->FirstPad(fX[i][cath], fY[i][cath], fZPlane, dpx, 0.);
+                  fSeg[cath]->MorePads();
+                  fSeg[cath]->NextPad())
+               {
+
+                 ix = fSeg[cath]->Ix();
+                 iy = fSeg[cath]->Iy();
+
+                 // skip the current pad
+                 if (ix == fIx[i][cath]) continue;
+               
+                 if (fHitMap[cath]->TestHit(ix, iy)!=kEmpty) {
+                   iNN++;
+                   digt=(AliMUONDigit*) fHitMap[cath]->GetHit(ix,iy);
+                   if (digt->Signal() > fQ[i][cath]) isLocal[i][cath]=kFALSE;
+                 }
+               } // Loop over pad neighbours in x
+           } else {
+             for (fSeg2[cath]->FirstPad(fInput->DetElemId(), fX[i][cath], fY[i][cath], fZPlane, dpx, 0.);
+                  fSeg2[cath]->MorePads(fInput->DetElemId());
+                  fSeg2[cath]->NextPad(fInput->DetElemId()))
+               {
+
+                 ix = fSeg2[cath]->Ix();
+                 iy = fSeg2[cath]->Iy();
+
+                 // skip the current pad
+                 if (ix == fIx[i][cath]) continue;
+               
+                 if (fHitMap[cath]->TestHit(ix, iy)!=kEmpty) {
+                   iNN++;
+                   digt=(AliMUONDigit*) fHitMap[cath]->GetHit(ix,iy);
+                   if (digt->Signal() > fQ[i][cath]) isLocal[i][cath]=kFALSE;
+                 }
+               } // Loop over pad neighbours in x
            }
            if (isLocal[i][cath] && iNN>0) {
                fIndLocal[fNLocal[cath]][cath]=i;
@@ -1009,15 +1252,12 @@ void AliMUONClusterFinderVS::FindLocalMaxima(AliMUONRawCluster* c)
        } // loop over all digits
 // if one additional maximum has been found we are happy 
 // if more maxima have been found restore the previous situation
-       fprintf(stderr,"\n New search gives %d local maxima for cathode 1 \n",fNLocal[0]);
-       fprintf(stderr,"\n                  %d local maxima for cathode 2 \n",fNLocal[1]);
-//     printf("\n New search gives %d %d \n",fNLocal[0],fNLocal[1]);
+       AliDebug(1,Form("\n New search gives %d local maxima for cathode 1 \n",fNLocal[0]));
+       AliDebug(1,Form("\n                  %d local maxima for cathode 2 \n",fNLocal[1]));
+       AliDebug(1,Form("\n New search gives %d %d \n",fNLocal[0],fNLocal[1]));
        if (fNLocal[cath]>2) {
            fNLocal[cath]=iback;
        }
-
-
-
     } // 2,1 local maxima
 }
 
@@ -1028,75 +1268,97 @@ void  AliMUONClusterFinderVS::FillCluster(AliMUONRawCluster* c, Int_t flag, Int_
 //  Completes cluster information starting from list of digits
 //
     AliMUONDigit* dig;
-    Float_t x, y;
+    Float_t x, y, z;
     Int_t  ix, iy;
     
     if (cath==1) {
-       c->fPeakSignal[cath]=c->fPeakSignal[0]; 
+       c->SetPeakSignal(cath,c->GetPeakSignal(0));     
     } else {
-       c->fPeakSignal[cath]=0;
+       c->SetPeakSignal(cath,0);
     }
     
     
     if (flag) {
-       c->fX[cath]=0;
-       c->fY[cath]=0;
-       c->fQ[cath]=0;
+       c->SetX(cath,0.);
+       c->SetY(cath,0.);
+       c->SetCharge(cath,0);
     }
 
-//    fprintf(stderr,"\n fPeakSignal %d\n",c->fPeakSignal[cath]);
-    for (Int_t i=0; i<c->fMultiplicity[cath]; i++)
+    AliDebug(1,Form("\n fPeakSignal %d\n",c->GetPeakSignal(cath)));
+    for (Int_t i=0; i<c->GetMultiplicity(cath); i++)
     {
-       dig= (AliMUONDigit*)Digits(cath)->UncheckedAt(c->fIndexMap[i][cath]);
-       ix=dig->fPadX+c->fOffsetMap[i][cath];
-       iy=dig->fPadY;
-       Int_t q=dig->fSignal;
-       if (!flag) q=Int_t(q*c->fContMap[i][cath]);
+       dig= fInput->Digit(cath,c->GetIndex(i,cath));
+       ix=dig->PadX()+c->GetOffset(i,cath);
+       iy=dig->PadY();
+       Int_t q=dig->Signal();
+       if (!flag) q=Int_t(q*c->GetContrib(i,cath));
 //     fprintf(stderr,"q %d c->fPeakSignal[ %d ] %d\n",q,cath,c->fPeakSignal[cath]);
-       if (dig->fPhysics >= dig->fSignal) {
-           c->fPhysicsMap[i]=2;
-       } else if (dig->fPhysics == 0) {
-           c->fPhysicsMap[i]=0;
-       } else  c->fPhysicsMap[i]=1;
+       if (dig->Physics() >= dig->Signal()) {
+           c->SetPhysics(i,2);
+       } else if (dig->Physics() == 0) {
+           c->SetPhysics(i,0);
+       } else  c->SetPhysics(i,1);
 //
 // 
-//     fprintf(stderr,"q %d c->fPeakSignal[cath] %d\n",q,c->fPeakSignal[cath]);
+       AliDebug(2,Form("q %d c->fPeakSignal[cath] %d\n",q,c->GetPeakSignal(cath)));
 // peak signal and track list
-       if (q>c->fPeakSignal[cath]) {
-           c->fPeakSignal[cath]=q;
-           c->fTracks[0]=dig->fHit;
-           c->fTracks[1]=dig->fTracks[0];
-           c->fTracks[2]=dig->fTracks[1];
+       if (q>c->GetPeakSignal(cath)) {
+           c->SetPeakSignal(cath, q);
+           c->SetTrack(0,dig->Hit());
+           c->SetTrack(1,dig->Track(0));
+           c->SetTrack(2,dig->Track(1));
 //         fprintf(stderr," c->fTracks[0] %d c->fTracks[1] %d\n",dig->fHit,dig->fTracks[0]);
        }
 //
        if (flag) {
-           Segmentation(cath)->GetPadCxy(ix, iy, x, y);
-           c->fX[cath] += q*x;
-           c->fY[cath] += q*y;
-           c->fQ[cath] += q;
+         if (fSegmentationType == 1) 
+           fSeg[cath]->GetPadC(ix, iy, x, y, z);
+         else
+           fSeg2[cath]->GetPadC(fInput->DetElemId(), ix, iy, x, y, z);
+       
+           c->AddX(cath, q*x);
+           c->AddY(cath, q*y);
+           c->AddCharge(cath, q);
        }
     } // loop over digits
-//    fprintf(stderr," fin du cluster c\n");
+    AliDebug(1," fin du cluster c\n");
 
 
     if (flag) {
-       c->fX[cath]/=c->fQ[cath];
-       c->fX[cath]=Segmentation(cath)->GetAnod(c->fX[cath]);
-       c->fY[cath]/=c->fQ[cath]; 
+       c->SetX(cath, c->GetX(cath)/c->GetCharge(cath));
+// Force on anod
+       if (fSegmentationType == 1) 
+         c->SetX(cath, fSeg[cath]->GetAnod(c->GetX(cath)));
+       else
+         c->SetX(cath, fSeg2[cath]->GetAnod(fInput->DetElemId(), c->GetX(cath)));
+       c->SetY(cath, c->GetY(cath)/c->GetCharge(cath)); 
 //
 //  apply correction to the coordinate along the anode wire
 //
-       x=c->fX[cath];   
-       y=c->fY[cath];
-       Segmentation(cath)->GetPadIxy(x, y, ix, iy);
-       Segmentation(cath)->GetPadCxy(ix, iy, x, y);
-       Int_t isec=Segmentation(cath)->Sector(ix,iy);
-       TF1* cogCorr = Segmentation(cath)->CorrFunc(isec-1);
+       x=c->GetX(cath);   
+       y=c->GetY(cath);
+       TF1* cogCorr;
+       Int_t isec;
+       if (fSegmentationType == 1) {
+         fSeg[cath]->GetPadI(x, y, fZPlane, ix, iy);
+         fSeg[cath]->GetPadC(ix, iy, x, y, z);
+         isec=fSeg[cath]->Sector(ix,iy);
+         cogCorr = fSeg[cath]->CorrFunc(isec-1);
+       } else {
+         fSeg2[cath]->GetPadI(fInput->DetElemId(), x, y, fZPlane, ix, iy);
+         fSeg2[cath]->GetPadC(fInput->DetElemId(), ix, iy, x, y, z);
+         isec=fSeg2[cath]->Sector(fInput->DetElemId(), ix,iy);
+         cogCorr = fSeg2[cath]->CorrFunc(fInput->DetElemId(), isec-1);
+       }
        
        if (cogCorr) {
-           Float_t yOnPad=(c->fY[cath]-y)/Segmentation(cath)->Dpy(isec);
-           c->fY[cath]=c->fY[cath]-cogCorr->Eval(yOnPad, 0, 0);
+         Float_t yOnPad;
+         if (fSegmentationType == 1) 
+           yOnPad=(c->GetY(cath)-y)/fSeg[cath]->Dpy(isec);
+         else 
+           yOnPad=(c->GetY(cath)-y)/fSeg2[cath]->Dpy(fInput->DetElemId(), isec);
+
+         c->SetY(cath, c->GetY(cath)-cogCorr->Eval(yOnPad, 0, 0));
        }
     }
 }
@@ -1114,146 +1376,228 @@ void  AliMUONClusterFinderVS::FillCluster(AliMUONRawCluster* c, Int_t cath)
        dr0 = 10000;
     }
     
-    Float_t xpad, ypad;
+    Float_t xpad, ypad, zpad;
     Float_t dx, dy, dr;
 
-    for (Int_t i=0; i<c->fMultiplicity[cath]; i++)
+    for (Int_t i=0; i<c->GetMultiplicity(cath); i++)
     {
-      dig= (AliMUONDigit*)Digits(cath)->UncheckedAt(c->fIndexMap[i][cath]);
-      Segmentation(cath)->
-       GetPadCxy(dig->fPadX,dig->fPadY,xpad,ypad);
-       fprintf(stderr,"x %f y %f cx %f cy %f\n",xpad,ypad,c->fX[0],c->fY[0]);
-       dx = xpad - c->fX[0];
-       dy = ypad - c->fY[0];
+       dig = fInput->Digit(cath,c->GetIndex(i,cath));
+       if (fSegmentationType == 1) 
+         fSeg[cath]->
+           GetPadC(dig->PadX(),dig->PadY(),xpad,ypad, zpad);
+       else
+         fSeg2[cath]->
+           GetPadC(fInput->DetElemId(),dig->PadX(),dig->PadY(),xpad,ypad, zpad);
+       AliDebug(1,Form("x %f y %f cx %f cy %f\n",xpad,ypad,c->GetX(0),c->GetY(0)));
+       dx = xpad - c->GetX(0);
+       dy = ypad - c->GetY(0);
        dr = TMath::Sqrt(dx*dx+dy*dy);
 
        if (dr < dr0) {
            dr0 = dr;
-           fprintf(stderr," dr %f\n",dr);
-           Int_t q=dig->fSignal;
-           if (dig->fPhysics >= dig->fSignal) {
-               c->fPhysicsMap[i]=2;
-           } else if (dig->fPhysics == 0) {
-               c->fPhysicsMap[i]=0;
-           } else  c->fPhysicsMap[i]=1;
-           c->fPeakSignal[cath]=q;
-           c->fTracks[0]=dig->fHit;
-           c->fTracks[1]=dig->fTracks[0];
-           c->fTracks[2]=dig->fTracks[1];
-           fprintf(stderr," c->fTracks[0] %d c->fTracks[1] %d\n",dig->fHit,dig->fTracks[0]);
+           AliDebug(1,Form(" dr %f\n",dr));
+           Int_t q=dig->Signal();
+           if (dig->Physics() >= dig->Signal()) {
+               c->SetPhysics(i,2);
+           } else if (dig->Physics() == 0) {
+               c->SetPhysics(i,0);
+           } else  c->SetPhysics(i,1);
+           c->SetPeakSignal(cath,q);
+           c->SetTrack(0,dig->Hit());
+           c->SetTrack(1,dig->Track(0));
+           c->SetTrack(2,dig->Track(1));
+           AliDebug(1,Form(" c->fTracks[0] %d c->fTracks[1] %d\n",dig->Hit(),
+                   dig->Track(0)));
        }
 //
     } // loop over digits
 
 //  apply correction to the coordinate along the anode wire
-    c->fX[cath]=Segmentation(cath)->GetAnod(c->fX[cath]);
+// Force on anod
+    if (fSegmentationType == 1) 
+      c->SetX(cath,fSeg[cath]->GetAnod(c->GetX(cath)));
+    else
+      c->SetX(cath,fSeg2[cath]->GetAnod(fInput->DetElemId(), c->GetX(cath)));
 }
 
 void  AliMUONClusterFinderVS::FindCluster(Int_t i, Int_t j, Int_t cath, AliMUONRawCluster &c){
+
+
 //
-//  Find clusterset
+//  Find a super cluster on both cathodes
 //
 //
 //  Add i,j as element of the cluster
 //
-
-    Int_t idx = HitMap(cath)->GetHitIndex(i,j);
-    AliMUONDigit* dig = (AliMUONDigit*) HitMap(cath)->GetHit(i,j);
-    Int_t q=dig->fSignal;
-    Int_t theX=dig->fPadX;
-    Int_t theY=dig->fPadY;    
-    if (q > TMath::Abs(c.fPeakSignal[0]) && q > TMath::Abs(c.fPeakSignal[1])) {
-       c.fPeakSignal[cath]=q;
-       c.fTracks[0]=dig->fHit;
-       c.fTracks[1]=dig->fTracks[0];
-       c.fTracks[2]=dig->fTracks[1];
+    
+    Int_t idx = fHitMap[cath]->GetHitIndex(i,j);
+    AliMUONDigit* dig = (AliMUONDigit*) fHitMap[cath]->GetHit(i,j);
+    Int_t q=dig->Signal();
+    Int_t theX=dig->PadX();
+    Int_t theY=dig->PadY(); 
+   
+    if (q > TMath::Abs(c.GetPeakSignal(0)) && q > TMath::Abs(c.GetPeakSignal(1))) {
+       c.SetPeakSignal(cath,q);
+       c.SetTrack(0,dig->Hit());
+       c.SetTrack(1,dig->Track(0));
+       c.SetTrack(2,dig->Track(1));
     }
 
 //
 //  Make sure that list of digits is ordered 
 // 
-    Int_t mu=c.fMultiplicity[cath];
-    c.fIndexMap[mu][cath]=idx;
+    Int_t mu=c.GetMultiplicity(cath);
+    c.SetIndex(mu, cath, idx);
     
-    if (dig->fPhysics >= dig->fSignal) {
-        c.fPhysicsMap[mu]=2;
-    } else if (dig->fPhysics == 0) {
-        c.fPhysicsMap[mu]=0;
-    } else  c.fPhysicsMap[mu]=1;
-    if (mu > 0) {
-       for (Int_t ind=mu-1; ind>=0; ind--) {
-           Int_t ist=(c.fIndexMap)[ind][cath];
-           Int_t ql=((AliMUONDigit*)Digits(cath)
-                     ->UncheckedAt(ist))->fSignal;
-           Int_t ix=((AliMUONDigit*)Digits(cath)
-                     ->UncheckedAt(ist))->fPadX;
-           Int_t iy=((AliMUONDigit*)Digits(cath)
-                     ->UncheckedAt(ist))->fPadY;
+    if (dig->Physics() >= dig->Signal()) {
+        c.SetPhysics(mu,2);
+    } else if (dig->Physics() == 0) {
+        c.SetPhysics(mu,0);
+    } else  c.SetPhysics(mu,1);
 
+    
+    if (mu > 0) {
+       for (Int_t ind = mu-1; ind >= 0; ind--) {
+           Int_t ist=c.GetIndex(ind,cath);
+           Int_t ql=fInput->Digit(cath, ist)->Signal();
+           Int_t ix=fInput->Digit(cath, ist)->PadX();
+           Int_t iy=fInput->Digit(cath, ist)->PadY();
+           
            if (q>ql || (q==ql && theX > ix && theY < iy)) {
-               c.fIndexMap[ind][cath]=idx;
-               c.fIndexMap[ind+1][cath]=ist;
+               c.SetIndex(ind, cath, idx);
+               c.SetIndex(ind+1, cath, ist);
            } else {
+               
                break;
            }
        }
     }
-    
-    c.fMultiplicity[cath]++;
-    if (c.fMultiplicity[cath] >= 50 ) {
-       printf("FindCluster - multiplicity >50  %d \n",c.fMultiplicity[0]);
-       c.fMultiplicity[cath]=49;
+
+    c.SetMultiplicity(cath, c.GetMultiplicity(cath)+1);
+    if (c.GetMultiplicity(cath) >= 50 ) {
+      AliDebug(1,Form("FindCluster - multiplicity >50  %d \n",c.GetMultiplicity(0)));
+       c.SetMultiplicity(cath, 49);
     }
 
 // Prepare center of gravity calculation
-    Float_t x, y;
-    Segmentation(cath)->GetPadCxy(i, j, x, y);
-           
-    c.fX[cath] += q*x;
-    c.fY[cath] += q*y;
-    c.fQ[cath] += q;
-// Flag hit as taken  
-    HitMap(cath)->FlagHit(i,j);
+    Float_t x, y, z;
+    if (fSegmentationType == 1) 
+      fSeg[cath]->GetPadC(i, j, x, y, z);
+    else
+      fSeg2[cath]->GetPadC(fInput->DetElemId(), i, j, x, y, z);
+    c.AddX(cath,q*x);
+    c.AddY(cath,q*y);
+    c.AddCharge(cath,q);
+//
+// Flag hit as "taken"  
+    fHitMap[cath]->FlagHit(i,j);
 //
 //  Now look recursively for all neighbours and pad hit on opposite cathode
 //
 //  Loop over neighbours
     Int_t ix,iy;
+    ix=iy=0;
     Int_t nn;
-    Int_t xList[kMaxNeighbours], yList[kMaxNeighbours];
-    Segmentation(cath)->Neighbours(i,j,&nn,xList,yList);
+    Int_t xList[10], yList[10];
+    if (fSegmentationType == 1) 
+      fSeg[cath]->Neighbours(i,j,&nn,xList,yList);
+    else 
+      fSeg2[cath]->Neighbours(fInput->DetElemId(), i,j,&nn,xList,yList);
     for (Int_t in=0; in<nn; in++) {
        ix=xList[in];
        iy=yList[in];
-       if (HitMap(cath)->TestHit(ix,iy)==kUnused) FindCluster(ix, iy, cath, c);
-    }
+       
+       if (fHitMap[cath]->TestHit(ix,iy)==kUnused) {
+           AliDebug(2,Form("\n Neighbours %d %d %d", cath, ix, iy));
+           FindCluster(ix, iy, cath, c);
+       }
+       
+   }
+    Int_t nOpp=0;
+    Int_t iXopp[50], iYopp[50];
+    
 //  Neighbours on opposite cathode 
 //  Take into account that several pads can overlap with the present pad
-    Float_t xmin, xmax, ymin, ymax, xc, yc;
+    Int_t isec;
+    if (fSegmentationType == 1) 
+      isec=fSeg[cath]->Sector(i,j);    
+    else
+      isec=fSeg2[cath]->Sector(fInput->DetElemId(), i,j);    
+
     Int_t iop;
-    Int_t isec=Segmentation(cath)->Sector(i,j);    
-    if (cath==0) {
-       iop=1;
-       xmin=x-Segmentation(cath)->Dpx(isec);
-       xmax=x+Segmentation(cath)->Dpx(isec);
-       xc=xmin+.001;
-       while (xc < xmax) {
-           xc+=Segmentation(iop)->Dpx(isec);
-           Segmentation(iop)->GetPadIxy(xc,y,ix,iy);
-           if (ix>=(Segmentation(iop)->Npx()) || (iy>=Segmentation(iop)->Npy())) continue;
-           if (HitMap(iop)->TestHit(ix,iy)==kUnused) FindCluster(ix, iy, iop, c);
-       }
+    Float_t dx, dy;
+
+    if (fSegmentationType == 1) {
+      if (cath==0) {
+       iop = 1;
+       dx  = (fSeg[cath]->Dpx(isec))/2.;
+       dy  = 0.;
+      } else {
+       iop = 0;
+       dx  = 0.;
+       dy  = (fSeg[cath]->Dpy(isec))/2;
+      }
+   
+
+    
+      // loop over pad neighbours on opposite cathode
+      for (fSeg[iop]->FirstPad(x, y, fZPlane, dx, dy);
+          fSeg[iop]->MorePads();
+          fSeg[iop]->NextPad())
+       {
+       
+         ix = fSeg[iop]->Ix(); iy = fSeg[iop]->Iy();
+         AliDebug(2,Form("\n ix, iy: %f %f %f %d %d %d", x,y,z,ix, iy, fSector));
+         if (fHitMap[iop]->TestHit(ix,iy)==kUnused){
+           iXopp[nOpp]=ix;
+           iYopp[nOpp++]=iy;
+           AliDebug(2,Form("\n Opposite %d %d %d", iop, ix, iy));
+         }
+       
+       } // Loop over pad neighbours
+      //  This had to go outside the loop since recursive calls inside the iterator are not possible
+      //
+      Int_t jopp;
+      for (jopp=0; jopp<nOpp; jopp++) {
+       if (fHitMap[iop]->TestHit(iXopp[jopp],iYopp[jopp]) == kUnused) 
+         FindCluster(iXopp[jopp], iYopp[jopp], iop, c);
+      }
     } else {
-       iop=0;
-       ymin=y-Segmentation(cath)->Dpy(isec);
-       ymax=y+Segmentation(cath)->Dpy(isec);
-       yc=ymin+.001;
-       while (yc < ymax) {
-           yc+=Segmentation(iop)->Dpy(isec);
-           Segmentation(iop)->GetPadIxy(x,yc,ix,iy);
-           if (ix>=(Segmentation(iop)->Npx()) || (iy>=Segmentation(iop)->Npy())) continue;
-           if (HitMap(iop)->TestHit(ix,iy)==kUnused) FindCluster(ix, iy, iop, c);
-       }
+
+      if (cath==0) {
+       iop = 1;
+       dx  = (fSeg2[cath]->Dpx(fInput->DetElemId(), isec))/2.;
+       dy  = 0.;
+      } else {
+       iop = 0;
+       dx  = 0.;
+       dy  = (fSeg2[cath]->Dpy(fInput->DetElemId(), isec))/2;
+      }
+   
+
+    
+      // loop over pad neighbours on opposite cathode
+      for (fSeg2[iop]->FirstPad(fInput->DetElemId(), x, y, fZPlane, dx, dy);
+          fSeg2[iop]->MorePads(fInput->DetElemId());
+          fSeg2[iop]->NextPad(fInput->DetElemId()))
+       {
+       
+         ix = fSeg2[iop]->Ix(); iy = fSeg2[iop]->Iy();
+         AliDebug(2,Form("\n ix, iy: %f %f %f %d %d %d", x,y,z,ix, iy, fSector));
+         if (fHitMap[iop]->TestHit(ix,iy)==kUnused){
+           iXopp[nOpp]=ix;
+           iYopp[nOpp++]=iy;
+           AliDebug(2,Form("\n Opposite %d %d %d", iop, ix, iy));
+         }
+       
+       } // Loop over pad neighbours
+      //  This had to go outside the loop since recursive calls inside the iterator are not possible
+      //
+      Int_t jopp;
+      for (jopp=0; jopp<nOpp; jopp++) {
+       if (fHitMap[iop]->TestHit(iXopp[jopp],iYopp[jopp]) == kUnused) 
+         FindCluster(iXopp[jopp], iYopp[jopp], iop, c);
+      }
     }
 }
 
@@ -1266,168 +1610,187 @@ void AliMUONClusterFinderVS::FindRawClusters()
   // fills the tree with raw clusters
   //
 
-    if (!NDigits(0) && !NDigits(1)) return;
+    ResetRawClusters();
+//  Return if no input datad available
+    if (!fInput->NDigits(0) && !fInput->NDigits(1)) return;
+
+    fSegmentationType = fInput->GetSegmentationType();
 
-    fHitMap  = new AliMUONHitMapA1(fSegmentation , fDigits);
-    fHitMap2 = new AliMUONHitMapA1(fSegmentation2, fDigits2);
+    if (fSegmentationType == 1) {
+      fSeg[0] = fInput->Segmentation(0);
+      fSeg[1] = fInput->Segmentation(1);
+
+      fHitMap[0]  = new AliMUONHitMapA1(fSeg[0], fInput->Digits(0));
+      fHitMap[1]  = new AliMUONHitMapA1(fSeg[1], fInput->Digits(1));
+
+    } else {
+      fSeg2[0] = fInput->Segmentation2(0);
+      fSeg2[1] = fInput->Segmentation2(1);
 
+      fHitMap[0]  = new AliMUONHitMapA1(fInput->DetElemId(), fSeg2[0], fInput->Digits(0));
+      fHitMap[1]  = new AliMUONHitMapA1(fInput->DetElemId(), fSeg2[1], fInput->Digits(1));
+    }
     AliMUONDigit *dig;
 
     Int_t ndig, cath;
     Int_t nskip=0;
     Int_t ncls=0;
-    HitMap(0)->FillHits();
-    HitMap(1)->FillHits();
+    fHitMap[0]->FillHits();
+    fHitMap[1]->FillHits();
 //
 //  Outer Loop over Cathodes
     for (cath=0; cath<2; cath++) {
-       for (ndig=0; ndig<NDigits(cath); ndig++) {
-           dig = (AliMUONDigit*)Digits(cath)->UncheckedAt(ndig);
-           Int_t i=dig->fPadX;
-           Int_t j=dig->fPadY;
-           if (HitMap(cath)->TestHit(i,j)==kUsed ||fHitMap->TestHit(i,j)==kEmpty) {
+
+       for (ndig=0; ndig<fInput->NDigits(cath); ndig++) {
+           dig = fInput->Digit(cath, ndig);
+           Int_t padx = dig->PadX();
+           Int_t pady = dig->PadY();
+           if (fHitMap[cath]->TestHit(padx,pady)==kUsed ||fHitMap[0]->TestHit(padx,pady)==kEmpty) {
                nskip++;
                continue;
            }
-           fprintf(stderr,"\n CATHODE %d CLUSTER %d\n",cath,ncls);
-           AliMUONRawCluster c;
-           c.fMultiplicity[0]=0;
-           c.fMultiplicity[1]=0;
-           c.fPeakSignal[cath]=dig->fSignal;
-           c.fTracks[0]=dig->fHit;
-           c.fTracks[1]=dig->fTracks[0];
-           c.fTracks[2]=dig->fTracks[1];
+           AliDebug(1,Form("\n CATHODE %d CLUSTER %d\n",cath,ncls));
+           AliMUONRawCluster clus;
+           clus.SetMultiplicity(0, 0);
+           clus.SetMultiplicity(1, 0);
+           clus.SetPeakSignal(cath,dig->Signal());
+           clus.SetTrack(0, dig->Hit());
+           clus.SetTrack(1, dig->Track(0));
+           clus.SetTrack(2, dig->Track(1));
+
+           AliDebug(1,Form("idDE %d Padx %d Pady %d", fInput->DetElemId(), padx, pady));
+
            // tag the beginning of cluster list in a raw cluster
-           c.fNcluster[0]=-1;
+           clus.SetNcluster(0,-1);
+           Float_t xcu, ycu;
+           if (fSegmentationType == 1) {
+             fSeg[cath]->GetPadC(padx,pady, xcu, ycu, fZPlane);
+             fSector= fSeg[cath]->Sector(padx,pady)/100;
+           } else {
+             fSeg2[cath]->GetPadC(fInput->DetElemId(), padx, pady, xcu, ycu, fZPlane);
+             fSector= fSeg2[cath]->Sector(fInput->DetElemId(), padx, pady)/100;
+           }
 
-           FindCluster(i,j,cath,c);
 
+            
+           FindCluster(padx,pady,cath,clus);
+//          ^^^^^^^^^^^^^^^^^^^^^^^^
            // center of gravity
-           c.fX[0] /= c.fQ[0];
-           c.fX[0]=Segmentation(0)->GetAnod(c.fX[0]);
-           c.fY[0] /= c.fQ[0];
-           c.fX[1] /= c.fQ[1];
-           c.fX[1]=Segmentation(0)->GetAnod(c.fX[1]);
-           c.fY[1] /= c.fQ[1];
-           fprintf(stderr,"\n Cathode 1 multiplicite %d X(CG) %f Y(CG) %f\n",c.fMultiplicity[0],c.fX[0],c.fY[0]);
-           fprintf(stderr," Cathode 2 multiplicite %d X(CG) %f Y(CG) %f\n",c.fMultiplicity[1],c.fX[1],c.fY[1]);
-
-//     Mathieson Fit
-/*
-           Bool_t fitted;
+           if (clus.GetX(0)!=0.) clus.SetX(0, clus.GetX(0)/clus.GetCharge(0)); // clus.fX[0] /= clus.fQ[0];
+
+           // Force on anod
+           if (fSegmentationType == 1) 
+             clus.SetX(0,fSeg[0]->GetAnod(clus.GetX(0)));
+           else 
+             clus.SetX(0,fSeg2[0]->GetAnod(fInput->DetElemId(), clus.GetX(0)));
+           if (clus.GetY(0)!=0.) clus.SetY(0, clus.GetY(0)/clus.GetCharge(0)); // clus.fY[0] /= clus.fQ[0];
+           
+           if(clus.GetCharge(1)!=0.) clus.SetX(1, clus.GetX(1)/clus.GetCharge(1));  // clus.fX[1] /= clus.fQ[1];
+                                       
+          // Force on anod
+           if (fSegmentationType == 1) 
+             clus.SetX(1, fSeg[0]->GetAnod(clus.GetX(1)));
+           else 
+             clus.SetX(1, fSeg2[0]->GetAnod(fInput->DetElemId(),clus.GetX(1)));
+           if(clus.GetCharge(1)!=0.) clus.SetY(1, clus.GetY(1)/clus.GetCharge(1));// clus.fY[1] /= clus.fQ[1];
            
-           fitted=SingleMathiesonFit(&c, 0);
-           c.fX[0]=Segmentation(0)->GetAnod(c.fX[0]);
-           fitted=SingleMathiesonFit(&c, 1);       
-           c.fX[1]=Segmentation(1)->GetAnod(c.fX[1]);
-*/ 
-//
+           clus.SetZ(0, fZPlane);
+           clus.SetZ(1, fZPlane);          
+
+               AliDebug(1,Form("\n Cathode 1 multiplicite %d X(CG) %f Y(CG) %f\n",
+                       clus.GetMultiplicity(0),clus.GetX(0),clus.GetY(0)));
+               AliDebug(1,Form(" Cathode 2 multiplicite %d X(CG) %f Y(CG) %f\n",
+                       clus.GetMultiplicity(1),clus.GetX(1),clus.GetY(1)));
 //      Analyse cluster and decluster if necessary
 //     
        ncls++;
-       c.fNcluster[1]=fNRawClusters;
-       c.fClusterType=c.PhysicsContribution();
+       clus.SetNcluster(1,fNRawClusters);
+       clus.SetClusterType(clus.PhysicsContribution());
 
        fNPeaks=0;
 //
 //
-       Decluster(&c);
-//     AddRawCluster(c);
-
+       Decluster(&clus);
 //
 //      reset Cluster object
-       for (int k=0;k<c.fMultiplicity[0];k++) {
-           c.fIndexMap[k][0]=0;
-       }
-       for (int k=0;k<c.fMultiplicity[1];k++) {
-           c.fIndexMap[k][1]=0;
-       }
+       { // begin local scope
+           for (int k=0;k<clus.GetMultiplicity(0);k++) clus.SetIndex(k, 0, 0);
+       } // end local scope
 
-       c.fMultiplicity[0]=c.fMultiplicity[0]=0;
+       { // begin local scope
+           for (int k=0;k<clus.GetMultiplicity(1);k++) clus.SetIndex(k, 1, 0);
+       } // end local scope
+       
+       clus.SetMultiplicity(0,0);
+       clus.SetMultiplicity(1,0);
 
        
        } // end loop ndig
     } // end loop cathodes
-    delete fHitMap;
-    delete fHitMap2;
+    delete fHitMap[0];
+    delete fHitMap[1];
 }
 
 Float_t AliMUONClusterFinderVS::SingleMathiesonFit(AliMUONRawCluster *c, Int_t cath)
 {
-//
-//  Initialise global variables for fit
-    Int_t i;
-    fMul[cath]=c->fMultiplicity[cath];
-    fgSegmentation[0]=Segmentation(cath);
-    fgResponse    =fResponse;
-    fgNbins[0]=fMul[cath];
-    Float_t qtot=0;
-//
-//  dump digit information into arrays
-//
-    for (i=0; i<fMul[cath]; i++)
-    {
-       fDig[i][cath]= (AliMUONDigit*)Digits(cath)->UncheckedAt(c->fIndexMap[i][cath]);
-       fIx[i][cath]= fDig[i][cath]->fPadX;
-       fIy[i][cath]= fDig[i][cath]->fPadY;
-       fQ[i][cath] = fDig[i][cath]->fSignal;
-       Segmentation(cath)->GetPadCxy(fIx[i][cath], fIy[i][cath], fX[i][cath], fY[i][cath]);
-       fgix[i][0]=fIx[i][cath];
-       fgiy[i][0]=fIy[i][cath];
-       fgCharge[i][0]=Float_t(fQ[i][cath]);
-       qtot+=fgCharge[i][0];
-    }
-
-    fgQtot[0]=qtot;
-    fgChargeTot[0]=Int_t(qtot);
-    
-//
-    if (fgFirst) {
-       fgFirst=kFALSE;
-       fgMyMinuit = new TMinuit(5);
-    }
-
-    fgMyMinuit->SetFCN(fcnS1);
-    fgMyMinuit->mninit(2,10,7);
+// Performs a single Mathieson fit on one cathode
+// 
     Double_t arglist[20];
     Int_t ierflag=0;
-    arglist[0]=1;
-//     fgMyMinuit->mnexcm("SET ERR",arglist,1,ierflag);
+    AliMUONClusterInput& clusterInput = *(AliMUONClusterInput::Instance());
+    
+    clusterInput.Fitter()->SetFCN(fcnS1);
+    clusterInput.Fitter()->mninit(2,10,7);
+    clusterInput.Fitter()->SetPrintLevel(-1+fDebugLevel);
+    arglist[0]=-1;
+    clusterInput.Fitter()->mnexcm("SET NOW", arglist, 0, ierflag);
 // Set starting values 
     static Double_t vstart[2];
-    vstart[0]=c->fX[1];
-    vstart[1]=c->fY[0];
+    vstart[0]=c->GetX(1);
+    vstart[1]=c->GetY(0);
     
     
 // lower and upper limits
     static Double_t lower[2], upper[2];
-    Int_t ix,iy;
-    Segmentation(cath)->GetPadIxy(c->fX[cath], c->fY[cath], ix, iy);
-    Int_t isec=Segmentation(cath)->Sector(ix, iy);
-    lower[0]=vstart[0]-Segmentation(cath)->Dpx(isec)/2;
-    lower[1]=vstart[1]-Segmentation(cath)->Dpy(isec)/2;
+    Int_t ix,iy, isec;
+    if (fSegmentationType == 1) {
+      fSeg[cath]->GetPadI(c->GetX(cath), c->GetY(cath), fZPlane, ix, iy);
+      isec=fSeg[cath]->Sector(ix, iy);
+
+      lower[0]=vstart[0]-fSeg[cath]->Dpx(isec)/2;
+      lower[1]=vstart[1]-fSeg[cath]->Dpy(isec)/2;
     
-    upper[0]=lower[0]+Segmentation(cath)->Dpx(isec);
-    upper[1]=lower[1]+Segmentation(cath)->Dpy(isec);
+      upper[0]=lower[0]+fSeg[cath]->Dpx(isec);
+      upper[1]=lower[1]+fSeg[cath]->Dpy(isec);
+
+    } else {
+      fSeg2[cath]->GetPadI(fInput->DetElemId(), c->GetX(cath), c->GetY(cath), fZPlane, ix, iy);
+      isec=fSeg2[cath]->Sector(fInput->DetElemId(), ix, iy);
+
+      lower[0]=vstart[0]-fSeg2[cath]->Dpx(fInput->DetElemId(), isec)/2;
+      lower[1]=vstart[1]-fSeg2[cath]->Dpy(fInput->DetElemId(), isec)/2;
     
+      upper[0]=lower[0]+fSeg2[cath]->Dpx(fInput->DetElemId(), isec);
+      upper[1]=lower[1]+fSeg2[cath]->Dpy(fInput->DetElemId(), isec);
+    }
+
 // step sizes
     static Double_t step[2]={0.0005, 0.0005};
     
-    fgMyMinuit->mnparm(0,"x1",vstart[0],step[0],lower[0],upper[0],ierflag);
-    fgMyMinuit->mnparm(1,"y1",vstart[1],step[1],lower[1],upper[1],ierflag);
+    clusterInput.Fitter()->mnparm(0,"x1",vstart[0],step[0],lower[0],upper[0],ierflag);
+    clusterInput.Fitter()->mnparm(1,"y1",vstart[1],step[1],lower[1],upper[1],ierflag);
 // ready for minimisation      
-    fgMyMinuit->SetPrintLevel(1);
-    fgMyMinuit->mnexcm("SET OUT", arglist, 0, ierflag);
     arglist[0]= -1;
     arglist[1]= 0;
     
-    fgMyMinuit->mnexcm("SET NOGR", arglist, 0, ierflag);
-    fgMyMinuit->mnexcm("MIGRAD", arglist, 0, ierflag);
-    fgMyMinuit->mnexcm("EXIT" , arglist, 0, ierflag);
+    clusterInput.Fitter()->mnexcm("SET NOGR", arglist, 0, ierflag);
+    clusterInput.Fitter()->mnexcm("MIGRAD", arglist, 0, ierflag);
+    //    clusterInput.Fitter()->mnexcm("EXIT" , arglist, 0, ierflag);
     Double_t fmin, fedm, errdef;
     Int_t   npari, nparx, istat;
       
-    fgMyMinuit->mnstat(fmin, fedm, errdef, npari, nparx, istat);  
+    clusterInput.Fitter()->mnstat(fmin, fedm, errdef, npari, nparx, istat);  
     fFitStat=istat;
     
 // Print results
@@ -1436,67 +1799,125 @@ Float_t AliMUONClusterFinderVS::SingleMathiesonFit(AliMUONRawCluster *c, Int_t c
     TString chname;
     Double_t epxz, b1, b2;
     Int_t ierflg;
-    fgMyMinuit->mnpout(0, chname, xrec, epxz, b1, b2, ierflg); 
-    fgMyMinuit->mnpout(1, chname, yrec, epxz, b1, b2, ierflg); 
+    clusterInput.Fitter()->mnpout(0, chname, xrec, epxz, b1, b2, ierflg);      
+    clusterInput.Fitter()->mnpout(1, chname, yrec, epxz, b1, b2, ierflg);      
     fXFit[cath]=xrec;
     fYFit[cath]=yrec;
     return fmin;
 }
 
-Float_t AliMUONClusterFinderVS::CombiSingleMathiesonFit(AliMUONRawCluster *c)
+Float_t AliMUONClusterFinderVS::CombiSingleMathiesonFit(AliMUONRawCluster * /*c*/)
 {
 // Perform combined Mathieson fit on both cathode planes
 //
-    if (fgFirst) {
-       fgFirst=kFALSE;
-       fgMyMinuit = new TMinuit(5);
-    }
-
-    fgMyMinuit->SetFCN(fcnCombiS1);
-    fgMyMinuit->mninit(2,10,7);
     Double_t arglist[20];
     Int_t ierflag=0;
-    arglist[0]=1;
+    AliMUONClusterInput& clusterInput = *(AliMUONClusterInput::Instance());
+    clusterInput.Fitter()->SetFCN(fcnCombiS1);
+    clusterInput.Fitter()->mninit(2,10,7);
+    clusterInput.Fitter()->SetPrintLevel(-1+fDebugLevel);
+    arglist[0]=-1;
+    clusterInput.Fitter()->mnexcm("SET NOW", arglist, 0, ierflag);
     static Double_t vstart[2];
     vstart[0]=fXInit[0];
     vstart[1]=fYInit[0];
     
     
 // lower and upper limits
-    static Double_t lower[2], upper[2];
+    static Float_t lower[2], upper[2];
     Int_t ix,iy,isec;
-    Segmentation(0)->GetPadIxy(fXInit[0], fYInit[0], ix, iy);
-    isec=Segmentation(0)->Sector(ix, iy);
-    Float_t dpy=Segmentation(0)->Dpy(isec)/2;
-    Segmentation(1)->GetPadIxy(fXInit[0], fYInit[0], ix, iy);
-    isec=Segmentation(1)->Sector(ix, iy);
-    Float_t dpx=Segmentation(1)->Dpx(isec)/2;
+    Float_t dpy, dpx;
 
+    if (fSegmentationType == 1) {
+      fSeg[0]->GetPadI(fXInit[0], fYInit[0], fZPlane, ix, iy);
+      isec=fSeg[0]->Sector(ix, iy);
+      dpy=fSeg[0]->Dpy(isec);
+      fSeg[1]->GetPadI(fXInit[0], fYInit[0], fZPlane, ix, iy);
+      isec=fSeg[1]->Sector(ix, iy);
+      dpx=fSeg[1]->Dpx(isec);
 
-    lower[0]=vstart[0]-dpx;
-    lower[1]=vstart[1]-dpy;
+    } else {
+      fSeg2[0]->GetPadI(fInput->DetElemId(), fXInit[0], fYInit[0], fZPlane, ix, iy);
+      isec=fSeg2[0]->Sector(fInput->DetElemId(), ix, iy);
+      dpy=fSeg2[0]->Dpy(fInput->DetElemId(), isec);
+      fSeg2[1]->GetPadI(fInput->DetElemId(), fXInit[0], fYInit[0], fZPlane, ix, iy);
+      isec=fSeg2[1]->Sector(fInput->DetElemId(), ix, iy);
+      dpx=fSeg2[1]->Dpx(fInput->DetElemId(), isec);
+
+    }
+    Int_t icount;
+    Float_t xdum, ydum, zdum;
+
+//  Find save upper and lower limits    
     
-    upper[0]=vstart[0]+dpx;
-    upper[1]=vstart[1]+dpy;
+    icount = 0;
+    if (fSegmentationType == 1) {
+      for (fSeg[1]->FirstPad(fXInit[0], fYInit[0], fZPlane, dpx, 0.); 
+          fSeg[1]->MorePads(); 
+          fSeg[1]->NextPad())
+       {
+         ix=fSeg[1]->Ix(); iy=fSeg[1]->Iy();
+         fSeg[1]->GetPadC(ix,iy, upper[0], ydum, zdum);        
+         if (icount ==0) lower[0]=upper[0];
+         icount++;
+       }
+    } else {
+      for (fSeg2[1]->FirstPad(fInput->DetElemId(),fXInit[0], fYInit[0], fZPlane, dpx, 0.); 
+          fSeg2[1]->MorePads(fInput->DetElemId()); 
+          fSeg2[1]->NextPad(fInput->DetElemId()))
+       {
+         ix=fSeg2[1]->Ix(); iy=fSeg2[1]->Iy();
+         fSeg2[1]->GetPadC(fInput->DetElemId(), ix,iy, upper[0], ydum, zdum);  
+         if (icount ==0) lower[0]=upper[0];
+         icount++;
+       }
+    }
+    if (lower[0]>upper[0]) {xdum=lower[0]; lower[0]=upper[0]; upper[0]=xdum;}
+       
+    icount=0;
+    AliDebug(1,Form("\n single y %f %f", fXInit[0], fYInit[0]));
     
+    if (fSegmentationType == 1) {
+      for (fSeg[0]->FirstPad(fXInit[0], fYInit[0], fZPlane, 0., dpy); 
+          fSeg[0]->MorePads(); 
+          fSeg[0]->NextPad())
+       {
+         ix=fSeg[0]->Ix(); iy=fSeg[0]->Iy();
+         fSeg[0]->GetPadC(ix,iy,xdum,upper[1],zdum);   
+         if (icount ==0) lower[1]=upper[1];
+         icount++;
+         AliDebug(1,Form("\n upper lower %d %f %f", icount, upper[1], lower[1]));
+       }
+    } else {
+      for (fSeg2[0]->FirstPad(fInput->DetElemId(), fXInit[0], fYInit[0], fZPlane, 0., dpy); 
+          fSeg2[0]->MorePads(fInput->DetElemId()); 
+          fSeg2[0]->NextPad(fInput->DetElemId()))
+       {
+         ix=fSeg2[0]->Ix(); iy=fSeg2[0]->Iy();
+         fSeg2[0]->GetPadC(fInput->DetElemId(), ix,iy,xdum,upper[1],zdum);     
+         if (icount ==0) lower[1]=upper[1];
+         icount++;
+         AliDebug(1,Form("\n upper lower %d %f %f", icount, upper[1], lower[1]));
+       }
+    }
+    if (lower[1]>upper[1]) {xdum=lower[1]; lower[1]=upper[1]; upper[1]=xdum;}
+
 // step sizes
     static Double_t step[2]={0.00001, 0.0001};
     
-    fgMyMinuit->mnparm(0,"x1",vstart[0],step[0],lower[0],upper[0],ierflag);
-    fgMyMinuit->mnparm(1,"y1",vstart[1],step[1],lower[1],upper[1],ierflag);
+    clusterInput.Fitter()->mnparm(0,"x1",vstart[0],step[0],lower[0],upper[0],ierflag);
+    clusterInput.Fitter()->mnparm(1,"y1",vstart[1],step[1],lower[1],upper[1],ierflag);
 // ready for minimisation      
-    fgMyMinuit->SetPrintLevel(1);
-    fgMyMinuit->mnexcm("SET OUT", arglist, 0, ierflag);
     arglist[0]= -1;
     arglist[1]= 0;
     
-    fgMyMinuit->mnexcm("SET NOGR", arglist, 0, ierflag);
-    fgMyMinuit->mnexcm("MIGRAD", arglist, 0, ierflag);
-    fgMyMinuit->mnexcm("EXIT" , arglist, 0, ierflag);
+    clusterInput.Fitter()->mnexcm("SET NOGR", arglist, 0, ierflag);
+    clusterInput.Fitter()->mnexcm("MIGRAD", arglist, 0, ierflag);
+    //    clusterInput.Fitter()->mnexcm("EXIT" , arglist, 0, ierflag);
     Double_t fmin, fedm, errdef;
     Int_t   npari, nparx, istat;
       
-    fgMyMinuit->mnstat(fmin, fedm, errdef, npari, nparx, istat);  
+    clusterInput.Fitter()->mnstat(fmin, fedm, errdef, npari, nparx, istat);  
     fFitStat=istat;
     
 // Print results
@@ -1505,43 +1926,28 @@ Float_t AliMUONClusterFinderVS::CombiSingleMathiesonFit(AliMUONRawCluster *c)
     TString chname;
     Double_t epxz, b1, b2;
     Int_t ierflg;
-    fgMyMinuit->mnpout(0, chname, xrec, epxz, b1, b2, ierflg); 
-    fgMyMinuit->mnpout(1, chname, yrec, epxz, b1, b2, ierflg); 
+    clusterInput.Fitter()->mnpout(0, chname, xrec, epxz, b1, b2, ierflg);      
+    clusterInput.Fitter()->mnpout(1, chname, yrec, epxz, b1, b2, ierflg);      
     fXFit[0]=xrec;
     fYFit[0]=yrec;
     return fmin;
 }
 
-Bool_t AliMUONClusterFinderVS::DoubleMathiesonFit(AliMUONRawCluster *c, Int_t cath)
+Bool_t AliMUONClusterFinderVS::DoubleMathiesonFit(AliMUONRawCluster * /*c*/, Int_t cath)
 {
+// Performs a double Mathieson fit on one cathode
+// 
+
 //
 //  Initialise global variables for fit
-    Int_t i,j;
-    
-    fgSegmentation[0]=Segmentation(cath);
-    fgResponse    =fResponse;
-    fgNbins[0]=fMul[cath];
-    Float_t qtot=0;
-       
-    for (i=0; i<fMul[cath]; i++) {
-       fgix[i][0]=fIx[i][cath];
-       fgiy[i][0]=fIy[i][cath];
-       fgCharge[i][0]=Float_t(fQ[i][cath]);
-       qtot+=fgCharge[i][0];
-    }
-    fgQtot[0]=qtot;
-    fgChargeTot[0]=Int_t(qtot);
-    
-//
-    if (fgFirst) {
-       fgFirst=kFALSE;
-       fgMyMinuit = new TMinuit(5);
-    }
-    fgMyMinuit->SetFCN(fcnS2);
-    fgMyMinuit->mninit(5,10,7);
     Double_t arglist[20];
     Int_t ierflag=0;
-    arglist[0]=1;
+    AliMUONClusterInput& clusterInput = *(AliMUONClusterInput::Instance());
+    clusterInput.Fitter()->SetFCN(fcnS2);
+    clusterInput.Fitter()->mninit(5,10,7);
+    clusterInput.Fitter()->SetPrintLevel(-1+fDebugLevel);
+    arglist[0]=-1;
+    clusterInput.Fitter()->mnexcm("SET NOW", arglist, 0, ierflag);
 // Set starting values 
     static Double_t vstart[5];
     vstart[0]=fX[fIndLocal[0][cath]][cath];
@@ -1551,110 +1957,92 @@ Bool_t AliMUONClusterFinderVS::DoubleMathiesonFit(AliMUONRawCluster *c, Int_t ca
     vstart[4]=Float_t(fQ[fIndLocal[0][cath]][cath])/
        Float_t(fQ[fIndLocal[0][cath]][cath]+fQ[fIndLocal[1][cath]][cath]);
 // lower and upper limits
-    static Double_t lower[5], upper[5];
-    Int_t isec=Segmentation(cath)->Sector(fIx[fIndLocal[0][cath]][cath], fIy[fIndLocal[0][cath]][cath]);
-    lower[0]=vstart[0]-Segmentation(cath)->Dpx(isec);
-    lower[1]=vstart[1]-Segmentation(cath)->Dpy(isec);
+    static Float_t lower[5], upper[5];
+    Int_t isec;
+
+    if (fSegmentationType == 1) {
+      isec=fSeg[cath]->Sector(fIx[fIndLocal[0][cath]][cath], fIy[fIndLocal[0][cath]][cath]);
+      lower[0]=vstart[0]-fSeg[cath]->Dpx(isec);
+      lower[1]=vstart[1]-fSeg[cath]->Dpy(isec);
     
-    upper[0]=lower[0]+2.*Segmentation(cath)->Dpx(isec);
-    upper[1]=lower[1]+2.*Segmentation(cath)->Dpy(isec);
+      upper[0]=lower[0]+2.*fSeg[cath]->Dpx(isec);
+      upper[1]=lower[1]+2.*fSeg[cath]->Dpy(isec);
     
-    isec=Segmentation(cath)->Sector(fIx[fIndLocal[1][cath]][cath], fIy[fIndLocal[1][cath]][cath]);
-    lower[2]=vstart[2]-Segmentation(cath)->Dpx(isec)/2;
-    lower[3]=vstart[3]-Segmentation(cath)->Dpy(isec)/2;
+      isec=fSeg[cath]->Sector(fIx[fIndLocal[1][cath]][cath], fIy[fIndLocal[1][cath]][cath]);
+      lower[2]=vstart[2]-fSeg[cath]->Dpx(isec)/2;
+      lower[3]=vstart[3]-fSeg[cath]->Dpy(isec)/2;
     
-    upper[2]=lower[2]+Segmentation(cath)->Dpx(isec);
-    upper[3]=lower[3]+Segmentation(cath)->Dpy(isec);
+      upper[2]=lower[2]+fSeg[cath]->Dpx(isec);
+      upper[3]=lower[3]+fSeg[cath]->Dpy(isec);
+
+    } else {
+      isec=fSeg2[cath]->Sector(fInput->DetElemId(),fIx[fIndLocal[0][cath]][cath], 
+                              fIy[fIndLocal[0][cath]][cath]);
+      lower[0]=vstart[0]-fSeg2[cath]->Dpx(fInput->DetElemId(),isec);
+      lower[1]=vstart[1]-fSeg2[cath]->Dpy(fInput->DetElemId(),isec);
     
+      upper[0]=lower[0]+2.*fSeg2[cath]->Dpx(fInput->DetElemId(),isec);
+      upper[1]=lower[1]+2.*fSeg2[cath]->Dpy(fInput->DetElemId(),isec);
+    
+      isec=fSeg2[cath]->Sector(fInput->DetElemId(),fIx[fIndLocal[1][cath]][cath], 
+                             fIy[fIndLocal[1][cath]][cath]);
+      lower[2]=vstart[2]-fSeg2[cath]->Dpx(fInput->DetElemId(),isec)/2;
+      lower[3]=vstart[3]-fSeg2[cath]->Dpy(fInput->DetElemId(),isec)/2;
+    
+      upper[2]=lower[2]+fSeg2[cath]->Dpx(fInput->DetElemId(),isec);
+      upper[1]=lower[1]+2.*fSeg2[cath]->Dpy(fInput->DetElemId(),isec);
+
+    }
+
     lower[4]=0.;
     upper[4]=1.;
 // step sizes
     static Double_t step[5]={0.0005, 0.0005, 0.0005, 0.0005, 0.0001};
     
-    fgMyMinuit->mnparm(0,"x1",vstart[0],step[0],lower[0],upper[0],ierflag);
-    fgMyMinuit->mnparm(1,"y1",vstart[1],step[1],lower[1],upper[1],ierflag);
-    fgMyMinuit->mnparm(2,"x2",vstart[2],step[2],lower[2],upper[2],ierflag);
-    fgMyMinuit->mnparm(3,"y2",vstart[3],step[3],lower[3],upper[3],ierflag);
-    fgMyMinuit->mnparm(4,"a0",vstart[4],step[4],lower[4],upper[4],ierflag);
+    clusterInput.Fitter()->mnparm(0,"x1",vstart[0],step[0],lower[0],upper[0],ierflag);
+    clusterInput.Fitter()->mnparm(1,"y1",vstart[1],step[1],lower[1],upper[1],ierflag);
+    clusterInput.Fitter()->mnparm(2,"x2",vstart[2],step[2],lower[2],upper[2],ierflag);
+    clusterInput.Fitter()->mnparm(3,"y2",vstart[3],step[3],lower[3],upper[3],ierflag);
+    clusterInput.Fitter()->mnparm(4,"a0",vstart[4],step[4],lower[4],upper[4],ierflag);
 // ready for minimisation      
-    fgMyMinuit->SetPrintLevel(-1);
-    fgMyMinuit->mnexcm("SET OUT", arglist, 0, ierflag);
     arglist[0]= -1;
     arglist[1]= 0;
     
-    fgMyMinuit->mnexcm("SET NOGR", arglist, 0, ierflag);
-    fgMyMinuit->mnexcm("MIGRAD", arglist, 0, ierflag);
-    fgMyMinuit->mnexcm("EXIT" , arglist, 0, ierflag);
+    clusterInput.Fitter()->mnexcm("SET NOGR", arglist, 0, ierflag);
+    clusterInput.Fitter()->mnexcm("MIGRAD", arglist, 0, ierflag);
+    //    clusterInput.Fitter()->mnexcm("EXIT" , arglist, 0, ierflag);
 // Get fitted parameters
     Double_t xrec[2], yrec[2], qfrac;
     TString chname;
     Double_t epxz, b1, b2;
     Int_t ierflg;
-    fgMyMinuit->mnpout(0, chname, xrec[0], epxz, b1, b2, ierflg);      
-    fgMyMinuit->mnpout(1, chname, yrec[0], epxz, b1, b2, ierflg);      
-    fgMyMinuit->mnpout(2, chname, xrec[1], epxz, b1, b2, ierflg);      
-    fgMyMinuit->mnpout(3, chname, yrec[1], epxz, b1, b2, ierflg);      
-    fgMyMinuit->mnpout(4, chname, qfrac,   epxz, b1, b2, ierflg);      
+    clusterInput.Fitter()->mnpout(0, chname, xrec[0], epxz, b1, b2, ierflg);   
+    clusterInput.Fitter()->mnpout(1, chname, yrec[0], epxz, b1, b2, ierflg);   
+    clusterInput.Fitter()->mnpout(2, chname, xrec[1], epxz, b1, b2, ierflg);   
+    clusterInput.Fitter()->mnpout(3, chname, yrec[1], epxz, b1, b2, ierflg);   
+    clusterInput.Fitter()->mnpout(4, chname, qfrac,   epxz, b1, b2, ierflg);   
 
     Double_t fmin, fedm, errdef;
     Int_t   npari, nparx, istat;
       
-    fgMyMinuit->mnstat(fmin, fedm, errdef, npari, nparx, istat);  
+    clusterInput.Fitter()->mnstat(fmin, fedm, errdef, npari, nparx, istat);  
     fFitStat=istat;
-    
-    
-//
-// One cluster for each maximum
-//
-    for (j=0; j<2; j++) {
-       AliMUONRawCluster cnew;
-       cnew.fChi2[0]=Float_t(fmin);
-       
-       if (fNPeaks == 0) {
-           cnew.fNcluster[0]=-1;
-           cnew.fNcluster[1]=fNRawClusters;
-       } else {
-           cnew.fNcluster[0]=fNPeaks;
-           cnew.fNcluster[1]=0;
-       }
-       cnew.fMultiplicity[0]=0;
-       cnew.fX[0]=Float_t(xrec[j]);
-       cnew.fY[0]=Float_t(yrec[j]);
-       if (j==0) {
-           cnew.fQ[0]=Int_t(fgChargeTot[0]*qfrac);
-       } else {
-           cnew.fQ[0]=Int_t(fgChargeTot[0]*(1-qfrac));
-       }
-       fgSegmentation[0]->SetHit(xrec[j],yrec[j]);
-       for (i=0; i<fMul[cath]; i++) {
-           cnew.fIndexMap[cnew.fMultiplicity[0]][cath]=c->fIndexMap[i][cath];
-           fgSegmentation[0]->SetPad(fgix[i][0], fgiy[i][0]);
-           Float_t q1=fgResponse->IntXY(fgSegmentation[0]);
-           cnew.fContMap[cnew.fMultiplicity[0]][0]=(q1*cnew.fQ[0])/Float_t(fQ[i][cath]);
-           cnew.fMultiplicity[0]++;
-       }
-       FillCluster(&cnew,0,0);
-       cnew.fClusterType=cnew.PhysicsContribution();
-       AddRawCluster(cnew);
-       fNPeaks++;
-    }
     return kTRUE;
 }
 
-Float_t AliMUONClusterFinderVS::CombiDoubleMathiesonFit(AliMUONRawCluster *c)
+Float_t AliMUONClusterFinderVS::CombiDoubleMathiesonFit(AliMUONRawCluster * /*c*/)
 {
 //
 // Perform combined double Mathieson fit on both cathode planes
 //
-    if (fgFirst) {
-       fgFirst=kFALSE;
-       fgMyMinuit = new TMinuit(5);
-    }
-    fgMyMinuit->SetFCN(fcnCombiS2);
-    fgMyMinuit->mninit(6,10,7);
     Double_t arglist[20];
     Int_t ierflag=0;
-    arglist[0]=1;
+    AliMUONClusterInput& clusterInput = *(AliMUONClusterInput::Instance());
+    clusterInput.Fitter()->SetFCN(fcnCombiS2);
+    clusterInput.Fitter()->mninit(6,10,7);
+    clusterInput.Fitter()->SetPrintLevel(-1+fDebugLevel);
+    arglist[0]=-1;
+    clusterInput.Fitter()->mnexcm("SET NOW", arglist, 0, ierflag);
 // Set starting values 
     static Double_t vstart[6];
     vstart[0]=fXInit[0];
@@ -1664,37 +2052,186 @@ Float_t AliMUONClusterFinderVS::CombiDoubleMathiesonFit(AliMUONRawCluster *c)
     vstart[4]=fQrInit[0];
     vstart[5]=fQrInit[1];
 // lower and upper limits
-    static Double_t lower[6], upper[6];
+    static Float_t lower[6], upper[6];
     Int_t ix,iy,isec;
     Float_t dpx, dpy;
+  if (fSegmentationType == 1) {
+    fSeg[1]->GetPadI(fXInit[0], fYInit[0], fZPlane, ix, iy);
+    isec=fSeg[1]->Sector(ix, iy);
+    dpx=fSeg[1]->Dpx(isec);
+
+    fSeg[0]->GetPadI(fXInit[0], fYInit[0], fZPlane, ix, iy);
+    isec=fSeg[0]->Sector(ix, iy);
+    dpy=fSeg[0]->Dpy(isec);
+
+  } else {
+    fSeg2[1]->GetPadI(fInput->DetElemId(),fXInit[0], fYInit[0], fZPlane, ix, iy);
+    isec=fSeg2[1]->Sector(fInput->DetElemId(),ix, iy);
+    dpx=fSeg2[1]->Dpx(fInput->DetElemId(), isec);
+
+    fSeg2[0]->GetPadI(fInput->DetElemId(), fXInit[0], fYInit[0], fZPlane, ix, iy);
+    isec=fSeg2[0]->Sector(fInput->DetElemId(), ix, iy);
+    dpy=fSeg2[0]->Dpy(fInput->DetElemId(), isec);
+
+  }
+
+    Int_t icount;
+    Float_t xdum, ydum, zdum;
+    AliDebug(1,Form("\n Cluster Finder: %f %f %f %f  ", fXInit[0], fXInit[1],fYInit[0], fYInit[1] ));
+
+    if (fSegmentationType == 1) {
+      //  Find save upper and lower limits    
+      icount = 0;
+    
+      for (fSeg[1]->FirstPad(fXInit[0], fYInit[0], fZPlane, dpx, 0.); 
+          fSeg[1]->MorePads(); 
+          fSeg[1]->NextPad())
+       {
+         ix=fSeg[1]->Ix(); iy=fSeg[1]->Iy();
+         //    if (fHitMap[1]->TestHit(ix, iy) == kEmpty) continue;
+         fSeg[1]->GetPadC(ix,iy,upper[0],ydum,zdum);   
+         if (icount ==0) lower[0]=upper[0];
+         icount++;
+       }
+      if (lower[0]>upper[0]) {xdum=lower[0]; lower[0]=upper[0]; upper[0]=xdum;}    
+      //    vstart[0] = 0.5*(lower[0]+upper[0]);
+
+    
+      icount=0;
+    
+      for (fSeg[0]->FirstPad(fXInit[0], fYInit[0], fZPlane, 0., dpy); 
+          fSeg[0]->MorePads(); 
+          fSeg[0]->NextPad())
+       {
+         ix=fSeg[0]->Ix(); iy=fSeg[0]->Iy();
+         //    if (fHitMap[0]->TestHit(ix, iy) == kEmpty) continue;
+         fSeg[0]->GetPadC(ix,iy,xdum,upper[1],zdum);   
+         if (icount ==0) lower[1]=upper[1];
+         icount++;
+       }
+    
+      if (lower[1]>upper[1]) {xdum=lower[1]; lower[1]=upper[1]; upper[1]=xdum;}    
+      //     vstart[1] = 0.5*(lower[1]+upper[1]);
+
+
+      fSeg[1]->GetPadI(fXInit[1], fYInit[1], fZPlane, ix, iy);
+      isec=fSeg[1]->Sector(ix, iy);
+      dpx=fSeg[1]->Dpx(isec);
+      fSeg[0]->GetPadI(fXInit[1], fYInit[1], fZPlane, ix, iy);
+      isec=fSeg[0]->Sector(ix, iy);
+      dpy=fSeg[0]->Dpy(isec);
+
+
+      //  Find save upper and lower limits    
+
+      icount=0;
     
-    Segmentation(1)->GetPadIxy(fXInit[0], fYInit[0], ix, iy);
-    isec=Segmentation(1)->Sector(ix, iy);
-    dpx=Segmentation(1)->Dpx(isec);
+      for (fSeg[1]->FirstPad(fXInit[1], fYInit[1], fZPlane, dpx, 0); 
+          fSeg[1]->MorePads(); fSeg[1]->NextPad())
+       {
+         ix=fSeg[1]->Ix(); iy=fSeg[1]->Iy();
+         //    if (fHitMap[1]->TestHit(ix, iy) == kEmpty) continue;
+         fSeg[1]->GetPadC(ix,iy,upper[2],ydum,zdum);   
+         if (icount ==0) lower[2]=upper[2];
+         icount++;
+       }
+      if (lower[2]>upper[2]) {xdum=lower[2]; lower[2]=upper[2]; upper[2]=xdum;}    
+      //    vstart[2] = 0.5*(lower[2]+upper[2]);
 
-    Segmentation(0)->GetPadIxy(fXInit[0], fYInit[0], ix, iy);
-    isec=Segmentation(0)->Sector(ix, iy);
-    dpy=Segmentation(0)->Dpy(isec);
+      icount=0;
+    
+      for (fSeg[0]->FirstPad(fXInit[1], fYInit[1], fZPlane, 0, dpy); 
+          fSeg[0]-> MorePads(); fSeg[0]->NextPad())
+       {
+         ix=fSeg[0]->Ix(); iy=fSeg[0]->Iy();
+         //    if (fHitMap[0]->TestHit(ix, iy) != kEmpty) continue;
+       
+         fSeg[0]->GetPadC(ix,iy,xdum,upper[3],zdum);   
+         if (icount ==0) lower[3]=upper[3];
+         icount++;
 
-    lower[0]=vstart[0]-dpx;
-    lower[1]=vstart[1]-dpy;
-    upper[0]=vstart[0]+dpx;
-    upper[1]=vstart[1]+dpy;
+       }
+      if (lower[3]>upper[3]) {xdum=lower[3]; lower[3]=upper[3]; upper[3]=xdum;}    
+    
+      //     vstart[3] = 0.5*(lower[3]+upper[3]);
+    } else {
 
+    //  Find save upper and lower limits    
+      icount = 0;
+    
+      for (fSeg2[1]->FirstPad(fInput->DetElemId(),fXInit[0], fYInit[0], fZPlane, dpx, 0.); 
+          fSeg2[1]->MorePads(fInput->DetElemId()); 
+          fSeg2[1]->NextPad(fInput->DetElemId()))
+       {
+         ix=fSeg2[1]->Ix(); iy=fSeg2[1]->Iy();
+         //    if (fHitMap[1]->TestHit(ix, iy) == kEmpty) continue;
+         fSeg2[1]->GetPadC(fInput->DetElemId(),ix,iy,upper[0],ydum,zdum);      
+         if (icount ==0) lower[0]=upper[0];
+         icount++;
+       }
+      if (lower[0]>upper[0]) {xdum=lower[0]; lower[0]=upper[0]; upper[0]=xdum;}    
+      //    vstart[0] = 0.5*(lower[0]+upper[0]);
 
-    Segmentation(1)->GetPadIxy(fXInit[1], fYInit[1], ix, iy);
-    isec=Segmentation(1)->Sector(ix, iy);
-    dpx=Segmentation(1)->Dpx(isec);
-    Segmentation(0)->GetPadIxy(fXInit[1], fYInit[1], ix, iy);
-    isec=Segmentation(0)->Sector(ix, iy);
-    dpy=Segmentation(0)->Dpy(isec);
+    
+      icount=0;
+    
+      for (fSeg2[0]->FirstPad(fInput->DetElemId(),fXInit[0], fYInit[0], fZPlane, 0., dpy); 
+          fSeg2[0]->MorePads(fInput->DetElemId()); 
+          fSeg2[0]->NextPad(fInput->DetElemId()))
+       {
+         ix=fSeg2[0]->Ix(); iy=fSeg2[0]->Iy();
+         //    if (fHitMap[0]->TestHit(ix, iy) == kEmpty) continue;
+         fSeg2[0]->GetPadC(fInput->DetElemId(),ix,iy,xdum,upper[1],zdum);      
+         if (icount ==0) lower[1]=upper[1];
+         icount++;
+       }
+    
+      if (lower[1]>upper[1]) {xdum=lower[1]; lower[1]=upper[1]; upper[1]=xdum;}    
+      //     vstart[1] = 0.5*(lower[1]+upper[1]);
+
+
+      fSeg2[1]->GetPadI(fInput->DetElemId(),fXInit[1], fYInit[1], fZPlane, ix, iy);
+      isec=fSeg2[1]->Sector(fInput->DetElemId(),ix, iy);
+      dpx=fSeg2[1]->Dpx(fInput->DetElemId(),isec);
+      fSeg2[0]->GetPadI(fInput->DetElemId(),fXInit[1], fYInit[1], fZPlane, ix, iy);
+      isec=fSeg2[0]->Sector(fInput->DetElemId(),ix, iy);
+      dpy=fSeg2[0]->Dpy(fInput->DetElemId(),isec);
 
-    lower[2]=vstart[2]-dpx;
-    lower[3]=vstart[3]-dpy;
-    upper[2]=vstart[2]+dpx;
-    upper[3]=vstart[3]+dpy;
 
+      //  Find save upper and lower limits    
 
+      icount=0;
+    
+      for (fSeg2[1]->FirstPad(fInput->DetElemId(),fXInit[1], fYInit[1], fZPlane, dpx, 0); 
+          fSeg2[1]->MorePads(fInput->DetElemId()); 
+          fSeg2[1]->NextPad(fInput->DetElemId()))
+       {
+         ix=fSeg2[1]->Ix(); iy=fSeg2[1]->Iy();
+         //    if (fHitMap[1]->TestHit(ix, iy) == kEmpty) continue;
+         fSeg2[1]->GetPadC(fInput->DetElemId(),ix,iy,upper[2],ydum,zdum);      
+         if (icount ==0) lower[2]=upper[2];
+         icount++;
+       }
+      if (lower[2]>upper[2]) {xdum=lower[2]; lower[2]=upper[2]; upper[2]=xdum;}    
+      //    vstart[2] = 0.5*(lower[2]+upper[2]);
+
+      icount=0;
+    
+      for (fSeg2[0]->FirstPad(fInput->DetElemId(),fXInit[1], fYInit[1], fZPlane, 0, dpy); 
+          fSeg2[0]-> MorePads(fInput->DetElemId()); 
+          fSeg2[0]->NextPad(fInput->DetElemId()))
+       {
+         ix=fSeg2[0]->Ix(); iy=fSeg2[0]->Iy();
+         //    if (fHitMap[0]->TestHit(ix, iy) != kEmpty) continue;
+       
+         fSeg2[0]->GetPadC(fInput->DetElemId(),ix,iy,xdum,upper[3],zdum);      
+         if (icount ==0) lower[3]=upper[3];
+         icount++;
+
+       }
+      if (lower[3]>upper[3]) {xdum=lower[3]; lower[3]=upper[3]; upper[3]=xdum;}  
+    }
     lower[4]=0.;
     upper[4]=1.;
     lower[5]=0.;
@@ -1702,37 +2239,34 @@ Float_t AliMUONClusterFinderVS::CombiDoubleMathiesonFit(AliMUONRawCluster *c)
 
 // step sizes
     static Double_t step[6]={0.0005, 0.0005, 0.0005, 0.0005, 0.001, 0.001};
-    
-    fgMyMinuit->mnparm(0,"x1",vstart[0],step[0],lower[0],upper[0],ierflag);
-    fgMyMinuit->mnparm(1,"y1",vstart[1],step[1],lower[1],upper[1],ierflag);
-    fgMyMinuit->mnparm(2,"x2",vstart[2],step[2],lower[2],upper[2],ierflag);
-    fgMyMinuit->mnparm(3,"y2",vstart[3],step[3],lower[3],upper[3],ierflag);
-    fgMyMinuit->mnparm(4,"a0",vstart[4],step[4],lower[4],upper[4],ierflag);
-    fgMyMinuit->mnparm(5,"a1",vstart[5],step[5],lower[5],upper[5],ierflag);
+    clusterInput.Fitter()->mnparm(0,"x1",vstart[0],step[0],lower[0],upper[0],ierflag);
+    clusterInput.Fitter()->mnparm(1,"y1",vstart[1],step[1],lower[1],upper[1],ierflag);
+    clusterInput.Fitter()->mnparm(2,"x2",vstart[2],step[2],lower[2],upper[2],ierflag);
+    clusterInput.Fitter()->mnparm(3,"y2",vstart[3],step[3],lower[3],upper[3],ierflag);
+    clusterInput.Fitter()->mnparm(4,"a0",vstart[4],step[4],lower[4],upper[4],ierflag);
+    clusterInput.Fitter()->mnparm(5,"a1",vstart[5],step[5],lower[5],upper[5],ierflag);
 // ready for minimisation      
-    fgMyMinuit->SetPrintLevel(-1);
-    fgMyMinuit->mnexcm("SET OUT", arglist, 0, ierflag);
     arglist[0]= -1;
     arglist[1]= 0;
     
-    fgMyMinuit->mnexcm("SET NOGR", arglist, 0, ierflag);
-    fgMyMinuit->mnexcm("MIGRAD", arglist, 0, ierflag);
-    fgMyMinuit->mnexcm("EXIT" , arglist, 0, ierflag);
+    clusterInput.Fitter()->mnexcm("SET NOGR", arglist, 0, ierflag);
+    clusterInput.Fitter()->mnexcm("MIGRAD", arglist, 0, ierflag);
+    //    clusterInput.Fitter()->mnexcm("EXIT" , arglist, 0, ierflag);
 // Get fitted parameters
     TString chname;
     Double_t epxz, b1, b2;
     Int_t ierflg;
-    fgMyMinuit->mnpout(0, chname, fXFit[0],  epxz, b1, b2, ierflg);    
-    fgMyMinuit->mnpout(1, chname, fYFit[0],  epxz, b1, b2, ierflg);    
-    fgMyMinuit->mnpout(2, chname, fXFit[1],  epxz, b1, b2, ierflg);    
-    fgMyMinuit->mnpout(3, chname, fYFit[1],  epxz, b1, b2, ierflg);    
-    fgMyMinuit->mnpout(4, chname, fQrFit[0], epxz, b1, b2, ierflg);    
-    fgMyMinuit->mnpout(5, chname, fQrFit[1], epxz, b1, b2, ierflg);    
+    clusterInput.Fitter()->mnpout(0, chname, fXFit[0],  epxz, b1, b2, ierflg); 
+    clusterInput.Fitter()->mnpout(1, chname, fYFit[0],  epxz, b1, b2, ierflg); 
+    clusterInput.Fitter()->mnpout(2, chname, fXFit[1],  epxz, b1, b2, ierflg); 
+    clusterInput.Fitter()->mnpout(3, chname, fYFit[1],  epxz, b1, b2, ierflg); 
+    clusterInput.Fitter()->mnpout(4, chname, fQrFit[0], epxz, b1, b2, ierflg); 
+    clusterInput.Fitter()->mnpout(5, chname, fQrFit[1], epxz, b1, b2, ierflg); 
 
     Double_t fmin, fedm, errdef;
     Int_t   npari, nparx, istat;
       
-    fgMyMinuit->mnstat(fmin, fedm, errdef, npari, nparx, istat);  
+    clusterInput.Fitter()->mnstat(fmin, fedm, errdef, npari, nparx, istat);  
     fFitStat=istat;
     
     fChi2[0]=fmin;
@@ -1746,139 +2280,99 @@ void AliMUONClusterFinderVS::Split(AliMUONRawCluster* c)
 // One cluster for each maximum
 //
     Int_t i, j, cath;
-    
+    AliMUONClusterInput& clusterInput = *(AliMUONClusterInput::Instance());
     for (j=0; j<2; j++) {
        AliMUONRawCluster cnew;
+       cnew.SetGhost(c->GetGhost());
        for (cath=0; cath<2; cath++) {
-           cnew.fChi2[cath]=fChi2[0];
+           cnew.SetChi2(cath,fChi2[0]);
+           // ?? why not cnew.fChi2[cath]=fChi2[cath];
            
            if (fNPeaks == 0) {
-               cnew.fNcluster[0]=-1;
-               cnew.fNcluster[1]=fNRawClusters;
+               cnew.SetNcluster(0,-1);
+               cnew.SetNcluster(1,fNRawClusters);
            } else {
-               cnew.fNcluster[0]=fNPeaks;
-               cnew.fNcluster[1]=0;
+               cnew.SetNcluster(0,fNPeaks);
+               cnew.SetNcluster(1,0);
            }
-           cnew.fMultiplicity[cath]=0;
-           cnew.fX[cath]=Float_t(fXFit[j]);
-           cnew.fY[cath]=Float_t(fYFit[j]);
+           cnew.SetMultiplicity(cath,0);
+           cnew.SetX(cath, Float_t(fXFit[j]));
+           cnew.SetY(cath, Float_t(fYFit[j]));
+           cnew.SetZ(cath, fZPlane);
            if (j==0) {
-               cnew.fQ[cath]=Int_t(fgChargeTot[cath]*fQrFit[cath]);
+               cnew.SetCharge(cath, Int_t(clusterInput.TotalCharge(cath)*fQrFit[cath]));
            } else {
-               cnew.fQ[cath]=Int_t(fgChargeTot[cath]*(1-fQrFit[cath]));
+               cnew.SetCharge(cath, Int_t(clusterInput.TotalCharge(cath)*(1-fQrFit[cath])));
            }
-           fgSegmentation[cath]->SetHit(fXFit[j],fYFit[j]);
+           if (fSegmentationType == 1) 
+             fSeg[cath]->SetHit(fXFit[j],fYFit[j],fZPlane);
+           else 
+             fSeg2[cath]->SetHit(fInput->DetElemId(), fXFit[j],fYFit[j],fZPlane);
+
            for (i=0; i<fMul[cath]; i++) {
-               cnew.fIndexMap[cnew.fMultiplicity[cath]][cath]=
-                   c->fIndexMap[i][cath];
-               fgSegmentation[cath]->SetPad(fgix[i][cath], fgiy[i][cath]);
-               Float_t q1=fgResponse->IntXY(fgSegmentation[cath]);
-               cnew.fContMap[i][cath]
-                   =(q1*Float_t(cnew.fQ[cath]))/Float_t(fQ[i][cath]);
-               cnew.fMultiplicity[cath]++;
-//             printf(" fXFIT %f fYFIT %f Multiplicite %d\n",cnew.fX[cath],cnew.fY[cath],cnew.fMultiplicity[cath]);
+             Float_t q1;
+               cnew.SetIndex(cnew.GetMultiplicity(cath), cath, c->GetIndex(i,cath));
+               if (fSegmentationType == 1) {
+                 fSeg[cath]->SetPad(fIx[i][cath], fIy[i][cath]);
+                 q1 = fInput->Mathieson()->IntXY(fSeg[cath]);
+               } else {
+                 fSeg2[cath]->SetPad(fInput->DetElemId(),fIx[i][cath], fIy[i][cath]);
+                 q1 = fInput->Mathieson()->IntXY(fInput->DetElemId(),fSeg2[cath]);
+               }
+               cnew.SetContrib(i, cath, q1*Float_t(cnew.GetCharge(cath))/Float_t(fQ[i][cath]));
+               cnew.SetMultiplicity(cath, cnew.GetMultiplicity(cath)+1 );
            }
            FillCluster(&cnew,0,cath);
        } // cathode loop
        
-       cnew.fClusterType=cnew.PhysicsContribution();
-       if (cnew.fQ[0]>0 && cnew.fQ[1]>0) AddRawCluster(cnew);
+       cnew.SetClusterType(cnew.PhysicsContribution());
+       if (cnew.GetCharge(0)>0 && cnew.GetCharge(1)>0) AddRawCluster(cnew);
        fNPeaks++;
     }
 }
-
-
-Float_t DiscrChargeS1(Int_t i,Double_t *par) 
+void AliMUONClusterFinderVS::AddRawCluster(const AliMUONRawCluster& c)
 {
-// par[0]    x-position of cluster
-// par[1]    y-position of cluster
+  //
+  // Add a raw cluster copy to the list
+  //
 
-   fgSegmentation[0]->SetPad(fgix[i][0], fgiy[i][0]);
-//  First Cluster
-   fgSegmentation[0]->SetHit(par[0],par[1]);
-   Float_t q1=fgResponse->IntXY(fgSegmentation[0]);
-    
-   Float_t value = fgQtot[0]*q1;
-   return value;
+//     AliMUON *pMUON=(AliMUON*)gAlice->GetModule("MUON");
+//     pMUON->GetMUONData()->AddRawCluster(fInput->Chamber(),c); 
+//     fNRawClusters++;
+
+  
+    TClonesArray &lrawcl = *fRawClusters;
+    new(lrawcl[fNRawClusters++]) AliMUONRawCluster(c);
+    AliDebug(1,Form("\nfNRawClusters %d\n",fNRawClusters));
 }
 
-Float_t DiscrChargeCombiS1(Int_t i,Double_t *par, Int_t cath) 
+AliMUONClusterFinderVS& AliMUONClusterFinderVS
+::operator = (const AliMUONClusterFinderVS& rhs)
 {
-// par[0]    x-position of cluster
-// par[1]    y-position of cluster
-
-   fgSegmentation[cath]->SetPad(fgix[i][cath], fgiy[i][cath]);
-//  First Cluster
-   fgSegmentation[cath]->SetHit(par[0],par[1]);
-   Float_t q1=fgResponse->IntXY(fgSegmentation[cath]);
-    
-   Float_t value = fgQtot[cath]*q1;
-   return value;
-}
+// Protected assignement operator
 
+  if (this == &rhs) return *this;
 
-Float_t DiscrChargeS2(Int_t i,Double_t *par) 
-{
-// par[0]    x-position of first  cluster
-// par[1]    y-position of first  cluster
-// par[2]    x-position of second cluster
-// par[3]    y-position of second cluster
-// par[4]    charge fraction of first  cluster
-// 1-par[4]  charge fraction of second cluster
-
-   fgSegmentation[0]->SetPad(fgix[i][0], fgiy[i][0]);
-//  First Cluster
-   fgSegmentation[0]->SetHit(par[0],par[1]);
-   Float_t q1=fgResponse->IntXY(fgSegmentation[0]);
-    
-//  Second Cluster
-   fgSegmentation[0]->SetHit(par[2],par[3]);
-   Float_t q2=fgResponse->IntXY(fgSegmentation[0]);
+  AliFatal("Not implemented.");
     
-   Float_t value = fgQtot[0]*(par[4]*q1+(1.-par[4])*q2);
-   return value;
-}
-
-Float_t DiscrChargeCombiS2(Int_t i,Double_t *par, Int_t cath) 
-{
-// par[0]    x-position of first  cluster
-// par[1]    y-position of first  cluster
-// par[2]    x-position of second cluster
-// par[3]    y-position of second cluster
-// par[4]    charge fraction of first  cluster
-// 1-par[4]  charge fraction of second cluster
-
-   fgSegmentation[cath]->SetPad(fgix[i][cath], fgiy[i][cath]);
-//  First Cluster
-   fgSegmentation[cath]->SetHit(par[0],par[1]);
-   Float_t q1=fgResponse->IntXY(fgSegmentation[cath]);
-    
-//  Second Cluster
-   fgSegmentation[cath]->SetHit(par[2],par[3]);
-   Float_t q2=fgResponse->IntXY(fgSegmentation[cath]);
-   Float_t value;
-   if (cath==0) {
-       value = fgQtot[0]*(par[4]*q1+(1.-par[4])*q2);
-   } else {
-       value = fgQtot[1]*(par[5]*q1+(1.-par[5])*q2);
-   }
-   return value;
+  return *this;  
 }
 
 //
 // Minimisation functions
 // Single Mathieson
-void fcnS1(Int_t &npar, Double_t *gin, Double_t &f, Double_t *par, Int_t iflag)
+void fcnS1(Int_t & /*npar*/, Double_t * /*gin*/, Double_t &f, Double_t *par, Int_t /*iflag*/)
 {
+    AliMUONClusterInput& clusterInput = *(AliMUONClusterInput::Instance());    
     Int_t i;
     Float_t delta;
     Float_t chisq=0;
     Float_t qcont=0;
     Float_t qtot=0;
-    
-    for (i=0; i<fgNbins[0]; i++) {
-       Float_t q0=fgCharge[i][0];
-       Float_t q1=DiscrChargeS1(i,par);
+
+    for (i=0; i<clusterInput.Nmul(0); i++) {
+       Float_t q0=clusterInput.Charge(i,0);
+       Float_t q1=clusterInput.DiscrChargeS1(i,par);
        delta=(q0-q1)/q0;
        chisq+=delta*delta;
        qcont+=q1;
@@ -1887,106 +2381,68 @@ void fcnS1(Int_t &npar, Double_t *gin, Double_t &f, Double_t *par, Int_t iflag)
     f=chisq;
 }
 
-void fcnCombiS1(Int_t &npar, Double_t *gin, Double_t &f, Double_t *par, Int_t iflag)
+void fcnCombiS1(Int_t & /*npar*/, Double_t * /*gin*/, Double_t &f, Double_t *par, Int_t /*iflag*/)
 {
+    AliMUONClusterInput& clusterInput = *(AliMUONClusterInput::Instance());    
     Int_t i, cath;
     Float_t delta;
     Float_t chisq=0;
     Float_t qcont=0;
     Float_t qtot=0;
-    //    Float_t chi2temp=0;
 
     for (cath=0; cath<2; cath++) {
-//     chisq=0;
-       for (i=0; i<fgNbins[cath]; i++) {
-           Float_t q0=fgCharge[i][cath];
-           Float_t q1=DiscrChargeCombiS1(i,par,cath);
-           //      delta=(q0-q1);
+       for (i=0; i<clusterInput.Nmul(cath); i++) {
+           Float_t q0=clusterInput.Charge(i,cath);
+           Float_t q1=clusterInput.DiscrChargeCombiS1(i,par,cath);
            delta=(q0-q1)/q0;
            chisq+=delta*delta;
            qcont+=q1;
            qtot+=q0;
        }
-//     if (cath == 0) chi2temp=chisq/fgNbins[cath];
     }
-//    chisq = chisq/fgNbins[1]+chi2temp; 
-    
     f=chisq;
 }
 
 // Double Mathieson
-void fcnS2(Int_t &npar, Double_t *gin, Double_t &f, Double_t *par, Int_t iflag)
+void fcnS2(Int_t & /*npar*/, Double_t * /*gin*/, Double_t &f, Double_t *par, Int_t /*iflag*/)
 {
+    AliMUONClusterInput& clusterInput = *(AliMUONClusterInput::Instance());    
     Int_t i;
     Float_t delta;
     Float_t chisq=0;
     Float_t qcont=0;
     Float_t qtot=0;
     
-    for (i=0; i<fgNbins[0]; i++) {
+    for (i=0; i<clusterInput.Nmul(0); i++) {
 
-       Float_t q0=fgCharge[i][0];
-       Float_t q1=DiscrChargeS2(i,par);
+       Float_t q0=clusterInput.Charge(i,0);
+       Float_t q1=clusterInput.DiscrChargeS2(i,par);
        delta=(q0-q1)/q0;
        chisq+=delta*delta;
        qcont+=q1;
        qtot+=q0;
     }
-//    chisq=chisq+=(qtot-qcont)*(qtot-qcont)*0.5;
     f=chisq;
 }
 
 // Double Mathieson
-void fcnCombiS2(Int_t &npar, Double_t *gin, Double_t &f, Double_t *par, Int_t iflag)
+void fcnCombiS2(Int_t & /*npar*/, Double_t * /*gin*/, Double_t &f, Double_t *par, Int_t /*iflag*/)
 {
+    AliMUONClusterInput& clusterInput = *(AliMUONClusterInput::Instance());    
     Int_t i, cath;
     Float_t delta;
     Float_t chisq=0;
     Float_t qcont=0;
     Float_t qtot=0;
-    //    Float_t chi2temp=0;
-
     for (cath=0; cath<2; cath++) {
-//     chisq=0;
-       for (i=0; i<fgNbins[cath]; i++) {
-           Float_t q0=fgCharge[i][cath];
-           Float_t q1=DiscrChargeCombiS2(i,par,cath);
-           //      delta=(q0-q1);
+       for (i=0; i<clusterInput.Nmul(cath); i++) {
+           Float_t q0=clusterInput.Charge(i,cath);
+           Float_t q1=clusterInput.DiscrChargeCombiS2(i,par,cath);
            delta=(q0-q1)/q0;
            chisq+=delta*delta;
            qcont+=q1;
            qtot+=q0;
        }
-//     if (cath == 0) chi2temp=chisq/fgNbins[cath];
     }
-//    chisq = chisq/fgNbins[1]+chi2temp;       
     f=chisq;
 }
-
-void AliMUONClusterFinderVS::AddRawCluster(const AliMUONRawCluster c)
-{
-  //
-  // Add a raw cluster copy to the list
-  //
-    AliMUON *pMUON=(AliMUON*)gAlice->GetModule("MUON");
-    pMUON->AddRawCluster(fChamber,c); 
-    fNRawClusters++;
-    fprintf(stderr,"\nfNRawClusters %d\n",fNRawClusters);
-}
-
-
-AliMUONClusterFinderVS& AliMUONClusterFinderVS
-::operator = (const AliMUONClusterFinderVS& rhs)
-{
-// Dummy assignment operator
-    return *this;
-}
-
-
-
-
-
-
-
-
-