]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - TPC/AliTPCclustererMI.cxx
Add getters (Marian)
[u/mrichter/AliRoot.git] / TPC / AliTPCclustererMI.cxx
index b26df33a3a763a5555a9525d2079c22dace57328..ed26f3c405212663ee916affa9b72c13cfdec7bd 100644 (file)
 //   Origin: Marian Ivanov 
 //-------------------------------------------------------
 
-#include "AliTPCReconstructor.h"
-#include "AliTPCclustererMI.h"
-#include "AliTPCclusterMI.h"
-#include <TObjArray.h>
+#include "Riostream.h"
+#include <TF1.h>
 #include <TFile.h>
-#include "TGraph.h"
-#include "TF1.h"
-#include "TRandom.h"
-#include "AliMathBase.h"
+#include <TGraph.h>
+#include <TH1F.h>
+#include <TObjArray.h>
+#include <TRandom.h>
+#include <TTree.h>
+#include <TTreeStream.h>
+#include <TVirtualFFT.h>
 
-#include "AliTPCClustersArray.h"
-#include "AliTPCClustersRow.h"
 #include "AliDigits.h"
-#include "AliSimDigits.h"
-#include "AliTPCParam.h"
-#include "AliTPCRecoParam.h"
+#include "AliLoader.h"
+#include "AliLog.h"
+#include "AliMathBase.h"
+#include "AliRawEventHeaderBase.h"
 #include "AliRawReader.h"
-#include "AliTPCRawStream.h"
 #include "AliRunLoader.h"
-#include "AliLoader.h"
-#include "Riostream.h"
-#include <TTree.h>
-#include "AliTPCcalibDB.h"
+#include "AliSimDigits.h"
 #include "AliTPCCalPad.h"
 #include "AliTPCCalROC.h"
-#include "TTreeStream.h"
-#include "AliLog.h"
-
+#include "AliTPCClustersArray.h"
+#include "AliTPCClustersRow.h"
+#include "AliTPCParam.h"
+#include "AliTPCRawStream.h"
+#include "AliTPCRecoParam.h"
+#include "AliTPCReconstructor.h"
+#include "AliTPCcalibDB.h"
+#include "AliTPCclusterInfo.h"
+#include "AliTPCclusterMI.h"
+#include "AliTPCclustererMI.h"
 
 ClassImp(AliTPCclustererMI)
 
 
 
-  AliTPCclustererMI::AliTPCclustererMI(const AliTPCParam* par, const AliTPCRecoParam * recoParam)
+AliTPCclustererMI::AliTPCclustererMI(const AliTPCParam* par, const AliTPCRecoParam * recoParam):
+  fBins(0),
+  fResBins(0),
+  fLoop(0),
+  fMaxBin(0),
+  fMaxTime(0),
+  fMaxPad(0),
+  fSector(-1),
+  fRow(-1),
+  fSign(0),
+  fRx(0),
+  fPadWidth(0),
+  fPadLength(0),
+  fZWidth(0),
+  fPedSubtraction(kFALSE),
+  fIsOldRCUFormat(kFALSE),
+  fEventHeader(0),
+  fTimeStamp(0),
+  fEventType(0),
+  fInput(0),
+  fOutput(0),
+  fRowCl(0),
+  fRowDig(0),
+  fParam(0),
+  fNcluster(0),
+  fAmplitudeHisto(0),
+  fDebugStreamer(0),
+  fRecoParam(0),
+  fBDumpSignal(kFALSE),
+  fFFTr2c(0)
 {
+  //
+  // COSNTRUCTOR
+  // param     - tpc parameters for given file
+  // recoparam - reconstruction parameters 
+  //
   fIsOldRCUFormat = kFALSE;
   fInput =0;
   fOutput=0;
@@ -69,8 +106,55 @@ ClassImp(AliTPCclustererMI)
   }
   fDebugStreamer = new TTreeSRedirector("TPCsignal.root");
   fAmplitudeHisto = 0;
+  Int_t nPoints = fRecoParam->GetLastBin()-fRecoParam->GetFirstBin();
+  fFFTr2c = TVirtualFFT::FFT(1, &nPoints, "R2C  K");
 }
-
+//______________________________________________________________
+AliTPCclustererMI::AliTPCclustererMI(const AliTPCclustererMI &param)
+              :TObject(param),
+  fBins(0),
+  fResBins(0),
+  fLoop(0),
+  fMaxBin(0),
+  fMaxTime(0),
+  fMaxPad(0),
+  fSector(-1),
+  fRow(-1),
+  fSign(0),
+  fRx(0),
+  fPadWidth(0),
+  fPadLength(0),
+  fZWidth(0),
+  fPedSubtraction(kFALSE),
+  fIsOldRCUFormat(kFALSE),
+  fEventHeader(0),
+  fTimeStamp(0),
+  fEventType(0),
+  fInput(0),
+  fOutput(0),
+  fRowCl(0),
+  fRowDig(0),
+  fParam(0),
+  fNcluster(0),
+  fAmplitudeHisto(0),
+  fDebugStreamer(0),
+  fRecoParam(0)
+{
+  //
+  // dummy
+  //
+  fMaxBin = param.fMaxBin;
+}
+//______________________________________________________________
+AliTPCclustererMI & AliTPCclustererMI::operator =(const AliTPCclustererMI & param)
+{
+  //
+  // assignment operator - dummy
+  //
+  fMaxBin=param.fMaxBin;
+  return (*this);
+}
+//______________________________________________________________
 AliTPCclustererMI::~AliTPCclustererMI(){
   DumpHistos();
   if (fAmplitudeHisto) delete fAmplitudeHisto;
@@ -118,7 +202,7 @@ Float_t  AliTPCclustererMI::GetSigmaZ2(Int_t iz){
   //sigma z2 = in digits - angle estimated supposing vertex constraint
   Float_t z = iz*fZWidth+fParam->GetNTBinsL1()*fParam->GetZWidth();
   Float_t sd2 = (z*fParam->GetDiffL()*fParam->GetDiffL())/(fZWidth*fZWidth);
-  Float_t angular = fPadLength*(fParam->GetZLength()-z)/(fRx*fZWidth);
+  Float_t angular = fPadLength*(fParam->GetZLength(fSector)-z)/(fRx*fZWidth);
   angular*=angular;
   angular/=12.;
   Float_t sres = fParam->GetZSigma()/fZWidth;
@@ -130,6 +214,12 @@ Float_t  AliTPCclustererMI::GetSigmaZ2(Int_t iz){
 void AliTPCclustererMI::MakeCluster(Int_t k,Int_t max,Float_t *bins, UInt_t /*m*/,
 AliTPCclusterMI &c) 
 {
+  //
+  //  k    - Make cluster at position k  
+  //  bins - 2 D array of signals mapped to 1 dimensional array - 
+  //  max  - the number of time bins er one dimension
+  //  c    - refernce to cluster to be filled
+  //
   Int_t i0=k/max;  //central pad
   Int_t j0=k%max;  //central time bin
 
@@ -229,9 +319,11 @@ AliTPCclusterMI &c)
     c.SetQ(sumw);
     c.SetY(meani*fPadWidth); 
     c.SetZ(meanj*fZWidth); 
+    c.SetPad(meani);
+    c.SetTimeBin(meanj);
     c.SetSigmaY2(mi2);
     c.SetSigmaZ2(mj2);
-    AddCluster(c);
+    AddCluster(c,(Float_t*)vmatrix,k);
     //remove cluster data from data
     for (Int_t di=-2;di<=2;di++)
       for (Int_t dj=-2;dj<=2;dj++){
@@ -239,6 +331,7 @@ AliTPCclusterMI &c)
        if (resmatrix[di+2][dj]<0) resmatrix[di+2][dj]=0;
       }
     resmatrix[2][0] =0;
+
     return;     
   }
   //
@@ -264,10 +357,12 @@ AliTPCclusterMI &c)
   c.SetQ(sumu);
   c.SetY(meani*fPadWidth); 
   c.SetZ(meanj*fZWidth); 
+  c.SetPad(meani);
+  c.SetTimeBin(meanj);
   c.SetSigmaY2(mi2);
   c.SetSigmaZ2(mj2);
   c.SetType(Char_t(overlap)+1);
-  AddCluster(c);
+  AddCluster(c,(Float_t*)vmatrix,k);
 
   //unfolding 2
   meani-=i0;
@@ -425,7 +520,7 @@ Float_t AliTPCclustererMI::FitMax(Float_t vmatrix[5][5], Float_t y, Float_t z, F
   return max;
 }
 
-void AliTPCclustererMI::AddCluster(AliTPCclusterMI &c){
+void AliTPCclustererMI::AddCluster(AliTPCclusterMI &c, Float_t * matrix, Int_t pos){
   //
   // transform cluster to the global coordinata
   // add the cluster to the array
@@ -455,9 +550,14 @@ void AliTPCclustererMI::AddCluster(AliTPCclusterMI &c){
   w=fZWidth;
   c.SetSigmaZ2(s2*w*w);
   c.SetY((meani - 2.5 - 0.5*fMaxPad)*fParam->GetPadPitchWidth(fSector));
+  if (!fRecoParam->GetBYMirror()){
+    if (fSector%36>17){
+      c.SetY(-(meani - 2.5 - 0.5*fMaxPad)*fParam->GetPadPitchWidth(fSector));
+    }
+  }
   c.SetZ(fZWidth*(meanj-3)); 
   c.SetZ(c.GetZ() - 3.*fParam->GetZSigma() + fParam->GetNTBinsL1()*fParam->GetZWidth()); // PASA delay + L1 delay
-  c.SetZ(fSign*(fParam->GetZLength() - c.GetZ()));
+  c.SetZ(fSign*(fParam->GetZLength(fSector) - c.GetZ()));
   c.SetX(fRx);
   c.SetDetector(fSector);
   c.SetRow(fRow);
@@ -470,8 +570,17 @@ void AliTPCclustererMI::AddCluster(AliTPCclusterMI &c){
   if (fLoop==2) c.SetType(100);
 
   TClonesArray * arr = fRowCl->GetArray();
-  // AliTPCclusterMI * cl = 
-  new ((*arr)[fNcluster]) AliTPCclusterMI(c);
+  AliTPCclusterMI * cl = new ((*arr)[fNcluster]) AliTPCclusterMI(c);
+  if (matrix ) {
+    Int_t nbins=0;
+    Float_t *graph =0;
+    if (fRecoParam->GetCalcPedestal() && cl->GetMax()>fRecoParam->GetDumpAmplitudeMin() &&fBDumpSignal){
+      nbins = fMaxTime;
+      graph = &(fBins[fMaxTime*(pos/fMaxTime)]);
+    }
+    AliTPCclusterInfo * info = new AliTPCclusterInfo(matrix,nbins,graph);
+    cl->SetInfo(info);
+  }
 
   fNcluster++;
 }
@@ -495,6 +604,7 @@ void AliTPCclustererMI::Digits2Clusters()
   }
 
   AliTPCCalPad * gainTPC = AliTPCcalibDB::Instance()->GetPadGainFactor();
+  AliTPCCalPad * noiseTPC = AliTPCcalibDB::Instance()->GetPadNoise();
 
   AliSimDigits digarr, *dummy=&digarr;
   fRowDig = dummy;
@@ -513,7 +623,7 @@ void AliTPCclustererMI::Digits2Clusters()
     }
     Int_t row = fRow;
     AliTPCCalROC * gainROC = gainTPC->GetCalROC(fSector);  // pad gains per given sector
-    
+    AliTPCCalROC * noiseROC   = noiseTPC->GetCalROC(fSector); // noise per given sector
     //
     AliTPCClustersRow *clrow= new AliTPCClustersRow();
     fRowCl = clrow;
@@ -556,7 +666,7 @@ void AliTPCclustererMI::Digits2Clusters()
       } while (digarr.Next());
     digarr.ExpandTrackBuffer();
 
-    FindClusters();
+    FindClusters(noiseROC);
 
     fOutput->Fill();
     delete clrow;    
@@ -583,8 +693,17 @@ void AliTPCclustererMI::Digits2Clusters(AliRawReader* rawReader)
   }
 
   fRowDig = NULL;
-
+  AliTPCROC * roc = AliTPCROC::Instance();
   AliTPCCalPad * gainTPC = AliTPCcalibDB::Instance()->GetPadGainFactor();
+  AliTPCCalPad * pedestalTPC = AliTPCcalibDB::Instance()->GetPedestals();
+  AliTPCCalPad * noiseTPC = AliTPCcalibDB::Instance()->GetPadNoise();
+  AliTPCRawStream input(rawReader);
+  fEventHeader = (AliRawEventHeaderBase*)rawReader->GetEventHeader();
+  if (fEventHeader){
+    fTimeStamp = fEventHeader->Get("Timestamp");  
+    fEventType = fEventHeader->Get("Type");  
+  }
+
 
   Int_t nclusters  = 0;
   
@@ -594,14 +713,30 @@ void AliTPCclustererMI::Digits2Clusters(AliRawReader* rawReader)
   const Int_t kNS = kNIS + kNOS;
   fZWidth = fParam->GetZWidth();
   Int_t zeroSup = fParam->GetZeroSup();
-
+  //
+  //alocate memory for sector - maximal case
+  //
   Float_t** allBins = NULL;
   Float_t** allBinsRes = NULL;
-
+  Int_t nRowsMax = roc->GetNRows(roc->GetNSector()-1);
+  Int_t nPadsMax = roc->GetNPads(roc->GetNSector()-1,nRowsMax-1);
+  allBins = new Float_t*[nRowsMax];
+  allBinsRes = new Float_t*[nRowsMax];
+  for (Int_t iRow = 0; iRow < nRowsMax; iRow++) {
+    //
+    Int_t maxBin = fMaxTime*(nPadsMax+6);  // add 3 virtual pads  before and 3 after
+    allBins[iRow] = new Float_t[maxBin];
+    allBinsRes[iRow] = new Float_t[maxBin];
+    memset(allBins[iRow],0,sizeof(Float_t)*maxBin);
+  }
+  //
   // Loop over sectors
+  //
   for(fSector = 0; fSector < kNS; fSector++) {
 
-    AliTPCCalROC * gainROC = gainTPC->GetCalROC(fSector);  // pad gains per given sector
+    AliTPCCalROC * gainROC    = gainTPC->GetCalROC(fSector);  // pad gains per given sector
+    AliTPCCalROC * pedestalROC = pedestalTPC->GetCalROC(fSector);  // pedestal per given sector
+    AliTPCCalROC * noiseROC   = noiseTPC->GetCalROC(fSector);  // noise per given sector
  
     Int_t nRows = 0;
     Int_t nDDLs = 0, indexDDL = 0;
@@ -618,9 +753,6 @@ void AliTPCclustererMI::Digits2Clusters(AliRawReader* rawReader)
       indexDDL = (fSector-kNIS) * 4 + kNIS * 2;
     }
 
-    allBins = new Float_t*[nRows];
-    allBinsRes = new Float_t*[nRows];
-
     for (Int_t iRow = 0; iRow < nRows; iRow++) {
       Int_t maxPad;
       if (fSector < kNIS)
@@ -629,21 +761,20 @@ void AliTPCclustererMI::Digits2Clusters(AliRawReader* rawReader)
        maxPad = fParam->GetNPadsUp(iRow);
       
       Int_t maxBin = fMaxTime*(maxPad+6);  // add 3 virtual pads  before and 3 after
-      allBins[iRow] = new Float_t[maxBin];
-      allBinsRes[iRow] = new Float_t[maxBin];
       memset(allBins[iRow],0,sizeof(Float_t)*maxBin);
-      memset(allBinsRes[iRow],0,sizeof(Float_t)*maxBin);
     }
     
     // Loas the raw data for corresponding DDLs
     rawReader->Reset();
-    AliTPCRawStream input(rawReader);
     input.SetOldRCUFormat(fIsOldRCUFormat);
     rawReader->Select("TPC",indexDDL,indexDDL+nDDLs-1);
-    
+    Int_t digCounter=0;
     // Begin loop over altro data
+    Bool_t calcPedestal = fRecoParam->GetCalcPedestal();
+    Float_t gain =1;
+    Int_t lastPad=-1;
     while (input.Next()) {
-
+      digCounter++;
       if (input.GetSector() != fSector)
        AliFatal(Form("Sector index mismatch ! Expected (%d), but got (%d) !",fSector,input.GetSector()));
 
@@ -652,44 +783,38 @@ void AliTPCclustererMI::Digits2Clusters(AliRawReader* rawReader)
       if (iRow < 0 || iRow >= nRows)
        AliFatal(Form("Pad-row index (%d) outside the range (%d -> %d) !",
                      iRow, 0, nRows -1));
-
-      Int_t iPad = input.GetPad() + 3;
-
-      Int_t maxPad;
-      if (fSector < kNIS)
-       maxPad = fParam->GetNPadsLow(iRow);
-      else
-       maxPad = fParam->GetNPadsUp(iRow);
-
-      if (input.GetPad() < 0 || input.GetPad() >= maxPad)
+      //pad
+      Int_t iPad = input.GetPad();
+      if (iPad < 0 || iPad >= nPadsMax)
        AliFatal(Form("Pad index (%d) outside the range (%d -> %d) !",
-                     input.GetPad(), 0, maxPad -1));
-
-      Int_t iTimeBin = input.GetTime() + 3;
-      if ( input.GetTime() < 0 || input.GetTime() >= fParam->GetMaxTBin())
+                     iPad, 0, nPadsMax-1));
+      if (iPad!=lastPad){
+       gain    = gainROC->GetValue(iRow,iPad);
+       lastPad = iPad;
+      }
+      iPad+=3;
+      //time
+      Int_t iTimeBin = input.GetTime();
+      if ( iTimeBin < 0 || iTimeBin >= fParam->GetMaxTBin())
        AliFatal(Form("Timebin index (%d) outside the range (%d -> %d) !",
-                     input.GetTime(), 0, fParam->GetMaxTBin() -1));
-
-      Int_t maxBin = fMaxTime*(maxPad+6);  // add 3 virtual pads  before and 3 after
-
-      if (((iPad*fMaxTime+iTimeBin) >= maxBin) ||
-         ((iPad*fMaxTime+iTimeBin) < 0))
-       AliFatal(Form("Index outside the allowed range"
-                     " Sector=%d Row=%d Pad=%d Timebin=%d"
-                     " (Max.index=%d)",fSector,iRow,iPad,iTimeBin,maxBin));
-
+                     iTimeBin, 0, iTimeBin -1));
+      iTimeBin+=3;
+      //signal
       Float_t signal = input.GetSignal();
-      //      if (!fPedSubtraction && signal <= zeroSup) continue;
-      if (!fRecoParam->GetCalcPedestal() && signal <= zeroSup) continue;
-
-      Float_t gain = gainROC->GetValue(iRow,input.GetPad());
-      allBins[iRow][iPad*fMaxTime+iTimeBin] = signal/gain;
-      allBins[iRow][iPad*fMaxTime+0] = 1;  // pad with signal
+      if (!calcPedestal && signal <= zeroSup) continue;      
+      if (!calcPedestal) {
+       allBins[iRow][iPad*fMaxTime+iTimeBin] = signal/gain;
+      }else{
+       allBins[iRow][iPad*fMaxTime+iTimeBin] = signal;
+      }
+      allBins[iRow][iPad*fMaxTime+0]=1.;  // pad with signal
     } // End of the loop over altro data
-
+    //
+    //
     // Now loop over rows and perform pedestal subtraction
+    if (digCounter==0) continue;
     //    if (fPedSubtraction) {
-    if (fRecoParam->GetCalcPedestal()) {
+    if (calcPedestal) {
       for (Int_t iRow = 0; iRow < nRows; iRow++) {
        Int_t maxPad;
        if (fSector < kNIS)
@@ -697,25 +822,35 @@ void AliTPCclustererMI::Digits2Clusters(AliRawReader* rawReader)
        else
          maxPad = fParam->GetNPadsUp(iRow);
 
-       for (Int_t iPad = 0; iPad < maxPad + 6; iPad++) {
-         if (allBins[iRow][iPad*fMaxTime+0] !=1) continue;  // no data
+       for (Int_t iPad = 3; iPad < maxPad + 3; iPad++) {
+         if (allBins[iRow][iPad*fMaxTime+0] <1 ) continue;  // no data
          Float_t *p = &allBins[iRow][iPad*fMaxTime+3];
          //Float_t pedestal = TMath::Median(fMaxTime, p);      
          Int_t id[3] = {fSector, iRow, iPad-3};
-         Float_t pedestal = ProcesSignal(p, fMaxTime, id);
+         // calib values
+         Double_t rmsCalib=  noiseROC->GetValue(iRow,iPad-3);
+         Double_t pedestalCalib = pedestalROC->GetValue(iRow,iPad-3);
+         Double_t rmsEvent       = rmsCalib;
+         Double_t pedestalEvent  = pedestalCalib;
+         ProcesSignal(p, fMaxTime, id, rmsEvent, pedestalEvent);
+         if (rmsEvent<rmsCalib) rmsEvent = rmsCalib;   // take worst scenario
+         if (TMath::Abs(pedestalEvent-pedestalCalib)<1.0) pedestalEvent = pedestalCalib;  
+         
+         //
          for (Int_t iTimeBin = 0; iTimeBin < fMaxTime; iTimeBin++) {
-           allBins[iRow][iPad*fMaxTime+iTimeBin] -= pedestal;
+           allBins[iRow][iPad*fMaxTime+iTimeBin] -= pedestalEvent;
            if (iTimeBin < AliTPCReconstructor::GetRecoParam()->GetFirstBin())  
              allBins[iRow][iPad*fMaxTime+iTimeBin] = 0;
            if (iTimeBin > AliTPCReconstructor::GetRecoParam()->GetLastBin())  
              allBins[iRow][iPad*fMaxTime+iTimeBin] = 0;
            if (allBins[iRow][iPad*fMaxTime+iTimeBin] < zeroSup)
              allBins[iRow][iPad*fMaxTime+iTimeBin] = 0;
+           if (allBins[iRow][iPad*fMaxTime+iTimeBin] < 3.0*rmsEvent)   // 3 sigma cut on RMS
+             allBins[iRow][iPad*fMaxTime+iTimeBin] = 0;            
          }
        }
       }
     }
-
     // Now loop over rows and find clusters
     for (fRow = 0; fRow < nRows; fRow++) {
       fRowCl = new AliTPCClustersRow;
@@ -736,32 +871,35 @@ void AliTPCclustererMI::Digits2Clusters(AliRawReader* rawReader)
       fBins = allBins[fRow];
       fResBins = allBinsRes[fRow];
 
-      FindClusters();
+      FindClusters(noiseROC);
 
       fOutput->Fill();
       delete fRowCl;    
       nclusters += fNcluster;    
     } // End of loop to find clusters
-
-    for (Int_t iRow = 0; iRow < nRows; iRow++) {
-      delete [] allBins[iRow];
-      delete [] allBinsRes[iRow];
-    }
-
-    delete [] allBins;
-    delete [] allBinsRes;
-
   } // End of loop over sectors
-
-  Info("Digits2Clusters", "Number of found clusters : %d\n", nclusters);
+  
+  for (Int_t iRow = 0; iRow < nRowsMax; iRow++) {
+    delete [] allBins[iRow];
+    delete [] allBinsRes[iRow];
+  }  
+  delete [] allBins;
+  delete [] allBinsRes;
+  
+  Info("Digits2Clusters", "File  %s Event\t%d\tNumber of found clusters : %d\n", fOutput->GetName(),*(rawReader->GetEventId()), nclusters);
 
 }
 
-void AliTPCclustererMI::FindClusters()
+void AliTPCclustererMI::FindClusters(AliTPCCalROC * noiseROC)
 {
-  //add virtual charge at the edge   
-  for (Int_t i=0; i<fMaxTime; i++){
+  
+  //
+  // add virtual charge at the edge   
+  //
+  Double_t kMaxDumpSize = 500000;
+  if (fRecoParam->GetCalcPedestal() && fOutput->GetZipBytes()< kMaxDumpSize) fBDumpSignal =kTRUE;   //dump signal flag
+  //
+  if (0) for (Int_t i=0; i<fMaxTime; i++){
     Float_t amp1 = fBins[i+3*fMaxTime]; 
     Float_t amp0 =0;
     if (amp1>0){
@@ -783,99 +921,179 @@ void AliTPCclustererMI::FindClusters()
     }        
     fBins[(fMaxPad+3)*fMaxTime+i] = amp0;           
   }
-
-//  memcpy(fResBins,fBins, fMaxBin*2);
-  memcpy(fResBins,fBins, fMaxBin);
+  memcpy(fResBins,fBins, fMaxBin*sizeof(Float_t));
+  //
+  //
   //
   fNcluster=0;
-  //first loop - for "gold cluster" 
   fLoop=1;
   Float_t *b=&fBins[-1]+2*fMaxTime;
-  Int_t crtime = Int_t((fParam->GetZLength()-fRecoParam->GetCtgRange()*fRx)/fZWidth-fParam->GetNTBinsL1()-5);
-
+  Int_t crtime = Int_t((fParam->GetZLength(fSector)-fRecoParam->GetCtgRange()*fRx)/fZWidth-fParam->GetNTBinsL1()-5);
+  Float_t minMaxCutAbs       = fRecoParam->GetMinMaxCutAbs();
+  Float_t minLeftRightCutAbs = fRecoParam->GetMinLeftRightCutAbs();
+  Float_t minUpDownCutAbs    = fRecoParam->GetMinUpDownCutAbs();
+  Float_t minMaxCutSigma       = fRecoParam->GetMinMaxCutSigma();
+  Float_t minLeftRightCutSigma = fRecoParam->GetMinLeftRightCutSigma();
+  Float_t minUpDownCutSigma    = fRecoParam->GetMinUpDownCutSigma();
   for (Int_t i=2*fMaxTime; i<fMaxBin-2*fMaxTime; i++) {
     b++;
-    if (*b<8) continue;   //threshold form maxima
     if (i%fMaxTime<crtime) {
       Int_t delta = -(i%fMaxTime)+crtime;
       b+=delta;
       i+=delta;
       continue; 
     }
-     
+    //absolute custs
+    if (b[0]<minMaxCutAbs) continue;   //threshold for maxima  
+    //
+    if (b[-1]+b[1]+b[-fMaxTime]+b[fMaxTime]<=0) continue;  // cut on isolated clusters 
+    //    if (b[-1]+b[1]<=0) continue;               // cut on isolated clusters
+    //if (b[-fMaxTime]+b[fMaxTime]<=0) continue; // cut on isolated clusters
+    //
+    if ((b[0]+b[-1]+b[1])<minUpDownCutAbs) continue;   //threshold for up down  (TRF) 
+    if ((b[0]+b[-fMaxTime]+b[fMaxTime])<minLeftRightCutAbs) continue;   //threshold for left right (PRF)    
     if (!IsMaximum(*b,fMaxTime,b)) continue;
-    AliTPCclusterMI c;
+    //
+    Float_t noise = noiseROC->GetValue(fRow, i/fMaxTime);
+    // sigma cuts
+    if (b[0]<minMaxCutSigma*noise) continue;   //threshold form maxima  
+    if ((b[0]+b[-1]+b[1])<minUpDownCutSigma*noise) continue;   //threshold for up town TRF 
+    if ((b[0]+b[-fMaxTime]+b[fMaxTime])<minLeftRightCutSigma*noise) continue;   //threshold for left right (PRF)    
+  
+    AliTPCclusterMI c(kFALSE);   // default cosntruction  without info
     Int_t dummy=0;
     MakeCluster(i, fMaxTime, fBins, dummy,c);
+    
     //}
   }
-  //memcpy(fBins,fResBins, fMaxBin*2);
-  //second  loop - for rest cluster 
-  /*        
-  fLoop=2;
-  b=&fResBins[-1]+2*fMaxTime;
-  for (Int_t i=2*fMaxTime; i<fMaxBin-2*fMaxTime; i++) {
-    b++;
-    if (*b<25) continue;   // bigger threshold for maxima
-    if (!IsMaximum(*b,fMaxTime,b)) continue;
-    AliTPCclusterMI c;
-    Int_t dummy;
-    MakeCluster(i, fMaxTime, fResBins, dummy,c);
-    //}
-  }
-  */
 }
 
 
-Double_t AliTPCclustererMI::ProcesSignal(Float_t *signal, Int_t nchannels, Int_t id[3]){
+Double_t AliTPCclustererMI::ProcesSignal(Float_t *signal, Int_t nchannels, Int_t id[3], Double_t &rmsEvent, Double_t &pedestalEvent){
   //
   // process signal on given pad - + streaming of additional information in special mode
   //
   // id[0] - sector
   // id[1] - row
-  // id[2] - pad  
-  Int_t offset =100;
-  Float_t kMin =fRecoParam->GetDumpAmplitudeMin();   // minimal signal to be dumped
-  Double_t median = TMath::Median(nchannels-offset, &(signal[offset]));
-  if (AliLog::GetDebugLevel("","AliTPCclustererMI")==0) return median;
-  //
+  // id[2] - pad 
 
-  Double_t mean   = TMath::Mean(nchannels-offset, &(signal[offset]));
-  Double_t rms    = TMath::RMS(nchannels-offset, &(signal[offset]));
-  Double_t *dsignal = new Double_t[nchannels];
-  Double_t *dtime   = new Double_t[nchannels];
-  Float_t max    =  0;
-  Float_t maxPos =  0;
-  for (Int_t i=0; i<nchannels; i++){
-    dtime[i] = i;
-    dsignal[i] = signal[i];
-    if (i<offset) continue;
-    if (signal[i]>max && i <fMaxTime-100) {  // temporary remove spike signals at the end
+  //
+  // ESTIMATE pedestal and the noise
+  // 
+  const Int_t kPedMax = 100;
+  Double_t kMaxDebugSize = 5000000.;
+  Float_t  max    =  0;
+  Float_t  maxPos =  0;
+  Int_t    median =  -1;
+  Int_t    count0 =  0;
+  Int_t    count1 =  0;
+  Float_t  rmsCalib   = rmsEvent;       // backup initial value ( from calib)
+  Float_t  pedestalCalib = pedestalEvent;// backup initial value ( from calib)
+  Int_t    firstBin = AliTPCReconstructor::GetRecoParam()->GetFirstBin();
+  //
+  UShort_t histo[kPedMax];
+  memset(histo,0,kPedMax*sizeof(UShort_t));
+  for (Int_t i=0; i<fMaxTime; i++){
+    if (signal[i]<=0) continue;
+    if (signal[i]>max && i>firstBin) {
       max = signal[i];
       maxPos = i;
-    }    
+    }
+    if (signal[i]>kPedMax-1) continue;
+    histo[int(signal[i]+0.5)]++;
+    count0++;
   }
-  
-  Double_t mean06=0, mean09=0;
-  Double_t rms06=0, rms09=0; 
-  AliMathBase::EvaluateUni(nchannels-offset, &(dsignal[offset]), mean06, rms06, int(0.6*(nchannels-offset)));
-  AliMathBase::EvaluateUni(nchannels-offset, &(dsignal[offset]), mean09, rms09, int(0.9*(nchannels-offset)));
   //
+  for (Int_t i=1; i<kPedMax; i++){
+    if (count1<count0*0.5) median=i;
+    count1+=histo[i];
+  }
+  // truncated mean  
   //
-  UInt_t uid[3] = {UInt_t(id[0]),UInt_t(id[1]),UInt_t(id[2])};
-  if (uid[0]< AliTPCROC::Instance()->GetNSectors() 
-      && uid[1]<  AliTPCROC::Instance()->GetNRows(uid[0])  && 
-      uid[2] < AliTPCROC::Instance()->GetNPads(uid[0], uid[1])){
-    if (!fAmplitudeHisto){
-      fAmplitudeHisto = new TObjArray(72);
+  Float_t count10=histo[median] ,mean=histo[median]*median,  rms=histo[median]*median*median ;
+  Float_t count06=histo[median] ,mean06=histo[median]*median,  rms06=histo[median]*median*median ;
+  Float_t count09=histo[median] ,mean09=histo[median]*median,  rms09=histo[median]*median*median ;
+  //
+  for (Int_t idelta=1; idelta<10; idelta++){
+    if (median-idelta<=0) continue;
+    if (median+idelta>kPedMax) continue;
+    if (count06<0.6*count1){
+      count06+=histo[median-idelta];
+      mean06 +=histo[median-idelta]*(median-idelta);
+      rms06  +=histo[median-idelta]*(median-idelta)*(median-idelta);
+      count06+=histo[median+idelta];
+      mean06 +=histo[median+idelta]*(median+idelta);
+      rms06  +=histo[median+idelta]*(median+idelta)*(median+idelta);
+    }
+    if (count09<0.9*count1){
+      count09+=histo[median-idelta];
+      mean09 +=histo[median-idelta]*(median-idelta);
+      rms09  +=histo[median-idelta]*(median-idelta)*(median-idelta);
+      count09+=histo[median+idelta];
+      mean09 +=histo[median+idelta]*(median+idelta);
+      rms09  +=histo[median+idelta]*(median+idelta)*(median+idelta);
+    }
+    if (count10<0.95*count1){
+      count10+=histo[median-idelta];
+      mean +=histo[median-idelta]*(median-idelta);
+      rms  +=histo[median-idelta]*(median-idelta)*(median-idelta);
+      count10+=histo[median+idelta];
+      mean +=histo[median+idelta]*(median+idelta);
+      rms  +=histo[median+idelta]*(median+idelta)*(median+idelta);
     }
+  }
+  mean  /=count10;
+  mean06/=count06;
+  mean09/=count09;
+  rms    = TMath::Sqrt(TMath::Abs(rms/count10-mean*mean));
+  rms06    = TMath::Sqrt(TMath::Abs(rms06/count06-mean06*mean06));
+ rms09    = TMath::Sqrt(TMath::Abs(rms09/count09-mean09*mean09));
+  rmsEvent = rms09;
+  //
+  pedestalEvent = median;
+  if (AliLog::GetDebugLevel("","AliTPCclustererMI")==0) return median;
+  //
+  UInt_t uid[3] = {UInt_t(id[0]),UInt_t(id[1]),UInt_t(id[2])};
+  //
+  // Dump mean signal info
+  //
+  (*fDebugStreamer)<<"Signal"<<
+    "TimeStamp="<<fTimeStamp<<
+    "EventType="<<fEventType<<
+    "Sector="<<uid[0]<<
+    "Row="<<uid[1]<<
+    "Pad="<<uid[2]<<
+    "Max="<<max<<
+    "MaxPos="<<maxPos<<
+    //
+    "Median="<<median<<
+    "Mean="<<mean<<
+    "RMS="<<rms<<      
+    "Mean06="<<mean06<<
+    "RMS06="<<rms06<<
+    "Mean09="<<mean09<<
+    "RMS09="<<rms09<<
+    "RMSCalib="<<rmsCalib<<
+    "PedCalib="<<pedestalCalib<<
+    "\n";
+  //
+  // fill pedestal histogram
+  //
+  AliTPCROC * roc = AliTPCROC::Instance();
+  if (!fAmplitudeHisto){
+    fAmplitudeHisto = new TObjArray(72);
+  }  
+  //
+  if (uid[0]<roc->GetNSectors() 
+      && uid[1]< roc->GetNRows(uid[0])  && 
+      uid[2] <roc->GetNPads(uid[0], uid[1])){
     TObjArray  * sectorArray = (TObjArray*)fAmplitudeHisto->UncheckedAt(uid[0]);
     if (!sectorArray){
-      Int_t npads = AliTPCROC::Instance()->GetNChannels(uid[0]);
+      Int_t npads =roc->GetNChannels(uid[0]);
       sectorArray = new TObjArray(npads);
       fAmplitudeHisto->AddAt(sectorArray, uid[0]);
     }
-    Int_t position =  uid[2]+ AliTPCROC::Instance()->GetRowIndexes(uid[0])[uid[1]];
+    Int_t position =  uid[2]+roc->GetRowIndexes(uid[0])[uid[1]];
     TH1F * histo = (TH1F*)sectorArray->UncheckedAt(position);
     if (!histo){
       char hname[100];
@@ -888,20 +1106,130 @@ Double_t AliTPCclustererMI::ProcesSignal(Float_t *signal, Int_t nchannels, Int_t
       if (backup) backup->cd();
     }
     for (Int_t i=0; i<nchannels; i++){
-      if (signal[i]>0) histo->Fill(signal[i]);
+      histo->Fill(signal[i]);
     }
   }
   //
+  //
+  //
+  Float_t kMin =fRecoParam->GetDumpAmplitudeMin();   // minimal signal to be dumped
+  Float_t *dsignal = new Float_t[nchannels];
+  Float_t *dtime   = new Float_t[nchannels];
+  for (Int_t i=0; i<nchannels; i++){
+    dtime[i] = i;
+    dsignal[i] = signal[i];
+  }
+  //
+  // Digital noise
+  //
+ //  if (max-median>30.*TMath::Max(1.,Double_t(rms06)) &&  (((*fDebugStreamer)<<"SignalDN").GetSize()<kMaxDebugSize)){    
+//     //
+//     //
+//     TGraph * graph =new TGraph(nchannels, dtime, dsignal);
+//     //
+//     //
+//     // jumps left - right
+//     Int_t    njumps0=0;
+//     Double_t deltaT0[2000];
+//     Double_t deltaA0[2000];
+//     Int_t    lastJump0 = fRecoParam->GetFirstBin();
+//     Int_t    njumps1=0;
+//     Double_t deltaT1[2000];
+//     Double_t deltaA1[2000];
+//     Int_t    lastJump1 = fRecoParam->GetFirstBin();
+//     Int_t    njumps2=0;
+//     Double_t deltaT2[2000];
+//     Double_t deltaA2[2000];
+//     Int_t    lastJump2 = fRecoParam->GetFirstBin();
+
+//     for (Int_t itime=fRecoParam->GetFirstBin()+1; itime<fRecoParam->GetLastBin()-1; itime++){
+//       if (TMath::Abs(dsignal[itime]-dsignal[itime-1])>30.*TMath::Max(1.,Double_t(rms06))  && 
+//       TMath::Abs(dsignal[itime]-dsignal[itime+1])>30.*TMath::Max(1.,Double_t(rms06))  &&
+//       (dsignal[itime-1]-median<5.*rms06) &&
+//       (dsignal[itime+1]-median<5.*rms06)      
+//       ){
+//     deltaA0[njumps0] = dsignal[itime]-dsignal[itime-1];
+//     deltaT0[njumps0] = itime-lastJump0;
+//     lastJump0 = itime;
+//     njumps0++;
+//       }
+//       if (TMath::Abs(dsignal[itime]-dsignal[itime-1])>30.*TMath::Max(1.,Double_t(rms06)) &&
+//       (dsignal[itime-1]-median<5.*rms06) 
+//       ) {
+//     deltaA1[njumps1] = dsignal[itime]-dsignal[itime-1];
+//     deltaT1[njumps1] = itime-lastJump1;
+//     lastJump1 = itime;
+//     njumps1++;
+//       }
+//       if (TMath::Abs(dsignal[itime]-dsignal[itime+1])>30.*TMath::Max(1.,Double_t(rms06)) &&
+//       (dsignal[itime+1]-median<5.*rms06) 
+//       ) {
+//     deltaA2[njumps2] = dsignal[itime]-dsignal[itime+1];
+//     deltaT2[njumps2] = itime-lastJump2;
+//     lastJump2 = itime;
+//     njumps2++;
+//       }
+//     }
+//     //
+//     if (njumps0>0 || njumps1>0 || njumps2>0){
+//       TGraph *graphDN0 = new TGraph(njumps0, deltaT0, deltaA0);
+//       TGraph *graphDN1 = new TGraph(njumps1, deltaT1, deltaA1);
+//       TGraph *graphDN2 = new TGraph(njumps2, deltaT2, deltaA2);
+//       (*fDebugStreamer)<<"SignalDN"<<    //digital - noise pads - or random sample of pads
+//     "TimeStamp="<<fTimeStamp<<
+//     "EventType="<<fEventType<<
+//     "Sector="<<uid[0]<<
+//     "Row="<<uid[1]<<
+//     "Pad="<<uid[2]<<
+//     "Graph="<<graph<<
+//     "Max="<<max<<
+//     "MaxPos="<<maxPos<<
+//     "Graph.="<<graph<<  
+//     "P0GraphDN0.="<<graphDN0<<
+//     "P1GraphDN1.="<<graphDN1<<
+//     "P2GraphDN2.="<<graphDN2<<
+//     //
+//     "Median="<<median<<
+//     "Mean="<<mean<<
+//     "RMS="<<rms<<      
+//     "Mean06="<<mean06<<
+//     "RMS06="<<rms06<<
+//     "Mean09="<<mean09<<
+//     "RMS09="<<rms09<<
+//     "\n";
+//       delete graphDN0;
+//       delete graphDN1;
+//       delete graphDN2;
+//     }
+//     delete graph;
+//   }
+
+  //
+  // NOISE STUDY  Fourier transform
+  //
   TGraph * graph;
-  Bool_t random = (gRandom->Rndm()<0.0001);
-  if (max-median>kMin || rms06>2.*fParam->GetZeroSup() || random){
+  Bool_t random = (gRandom->Rndm()<0.0003);
+  if (((*fDebugStreamer)<<"SignalN").GetSize()<kMaxDebugSize)
+    if (max-median>kMin || rms06>1.*fParam->GetZeroSup() || random){
     graph =new TGraph(nchannels, dtime, dsignal);
-    if (rms06>2.*fParam->GetZeroSup() || random)
+    if (rms06>1.*fParam->GetZeroSup() || random){
+      //Double_t *input, Double_t threshold, Bool_t locMax, Double_t *freq, Double_t *re, Double_t *im, Double_t *mag, Double_t *phi);
+      Float_t * input = &(dsignal[fRecoParam->GetFirstBin()]);
+      Float_t freq[2000], re[2000], im[2000], mag[2000], phi[2000];
+      Int_t npoints = TransformFFT(input, -1,kFALSE, freq, re, im, mag, phi);
+      TGraph *graphMag0 = new TGraph(npoints, freq, mag);
+      TGraph *graphPhi0 = new TGraph(npoints, freq, phi);
+      npoints = TransformFFT(input, 0.5,kTRUE, freq, re, im, mag, phi);
+      TGraph *graphMag1 = new TGraph(npoints, freq, mag);
+      TGraph *graphPhi1 = new TGraph(npoints, freq, phi);
+      
       (*fDebugStreamer)<<"SignalN"<<    //noise pads - or random sample of pads
+       "TimeStamp="<<fTimeStamp<<
+       "EventType="<<fEventType<<
        "Sector="<<uid[0]<<
        "Row="<<uid[1]<<
        "Pad="<<uid[2]<<
-       "Graph="<<graph<<
+       "Graph.="<<graph<<
        "Max="<<max<<
        "MaxPos="<<maxPos<<
        //
@@ -912,9 +1240,25 @@ Double_t AliTPCclustererMI::ProcesSignal(Float_t *signal, Int_t nchannels, Int_t
        "RMS06="<<rms06<<
        "Mean09="<<mean09<<
        "RMS09="<<rms09<<
+       // FFT part
+       "Mag0.="<<graphMag0<<
+       "Mag1.="<<graphMag1<<
+       "Phi0.="<<graphPhi0<<
+       "Phi1.="<<graphPhi1<<
        "\n";
-    if (max-median>kMin) 
+      delete graphMag0;
+      delete graphMag1;
+      delete graphPhi0;
+      delete graphPhi1;
+    }
+    //
+    // Big signals dumping
+    //
+    
+    if (max-median>kMin &&maxPos>AliTPCReconstructor::GetRecoParam()->GetFirstBin()) 
       (*fDebugStreamer)<<"SignalB"<<     // pads with signal
+       "TimeStamp="<<fTimeStamp<<
+       "EventType="<<fEventType<<
        "Sector="<<uid[0]<<
        "Row="<<uid[1]<<
        "Pad="<<uid[2]<<
@@ -933,60 +1277,59 @@ Double_t AliTPCclustererMI::ProcesSignal(Float_t *signal, Int_t nchannels, Int_t
     delete graph;
   }
   
-  (*fDebugStreamer)<<"Signal"<<
-    "Sector="<<uid[0]<<
-    "Row="<<uid[1]<<
-    "Pad="<<uid[2]<<
-    "Max="<<max<<
-    "MaxPos="<<maxPos<<
-    //
-    "Median="<<median<<
-    "Mean="<<mean<<
-    "RMS="<<rms<<      
-    "Mean06="<<mean06<<
-    "RMS06="<<rms06<<
-    "Mean09="<<mean09<<
-    "RMS09="<<rms09<<
-    "\n";
   //
   //
   //  Central Electrode signal analysis  
   //
-  Double_t ceQmax  =0, ceQsum=0, ceTime=0;
-  Double_t cemean  = mean06, cerms=rms06 ;
+  Float_t ceQmax  =0, ceQsum=0, ceTime=0;
+  Float_t cemean  = mean06, cerms=rms06 ;
   Int_t    cemaxpos= 0;
-  Double_t ceThreshold=5.*cerms;
-  Double_t ceSumThreshold=8.*cerms;
-  const Int_t    cemin=5;  // range for the analysis of the ce signal +- channels from the peak
-  const Int_t    cemax=5;
-  for (Int_t i=nchannels-2; i>1; i--){
+  Float_t ceThreshold=5.*cerms;
+  Float_t ceSumThreshold=8.*cerms;
+  const Int_t    kCemin=5;  // range for the analysis of the ce signal +- channels from the peak
+  const Int_t    kCemax=5;
+  for (Int_t i=nchannels-2; i>nchannels/2; i--){
     if ( (dsignal[i]-mean06)>ceThreshold && dsignal[i]>=dsignal[i+1] && dsignal[i]>=dsignal[i-1] ){
       cemaxpos=i;
       break;
     }
   }
   if (cemaxpos!=0){
-      for (Int_t i=cemaxpos-cemin; i<cemaxpos+cemax; i++){
-         if (i>0 && i<nchannels&&dsignal[i]- cemean>0){
-             Double_t val=dsignal[i]- cemean;
-             ceTime+=val*dtime[i];
-             ceQsum+=val;
-             if (val>ceQmax) ceQmax=val;
-         }
+    ceQmax = 0;
+    Int_t cemaxpos2=0;
+    for (Int_t i=cemaxpos-20; i<cemaxpos+5; i++){
+      if (i<0 || i>nchannels-1) continue;
+      Double_t val=dsignal[i]- cemean;
+      if (val>ceQmax){
+       cemaxpos2=i;
+       ceQmax = val;
       }
-      if (ceQmax&&ceQsum>ceSumThreshold) {
-         ceTime/=ceQsum;
-         (*fDebugStreamer)<<"Signalce"<<
-             "Sector="<<uid[0]<<
-             "Row="<<uid[1]<<
-             "Pad="<<uid[2]<<
-             "Max="<<ceQmax<<
-             "Qsum="<<ceQsum<<
-             "Time="<<ceTime<<
-             "RMS06="<<rms06<<
-             //
-             "\n";
+    }
+    cemaxpos = cemaxpos2;
+    for (Int_t i=cemaxpos-kCemin; i<cemaxpos+kCemax; i++){
+      if (i>0 && i<nchannels&&dsignal[i]- cemean>0){
+       Double_t val=dsignal[i]- cemean;
+       ceTime+=val*dtime[i];
+       ceQsum+=val;
+       if (val>ceQmax) ceQmax=val;
       }
+    }
+    if (ceQmax&&ceQsum>ceSumThreshold) {
+      ceTime/=ceQsum;
+      (*fDebugStreamer)<<"Signalce"<<
+       "TimeStamp="<<fTimeStamp<<
+       "EventType="<<fEventType<<
+       "Sector="<<uid[0]<<
+       "Row="<<uid[1]<<
+       "Pad="<<uid[2]<<
+       "Max="<<ceQmax<<
+       "Qsum="<<ceQsum<<
+       "Time="<<ceTime<<
+       "RMS06="<<rms06<<
+       //
+       "\n";
+    }
   }
   // end of ce signal analysis
   //
@@ -1000,7 +1343,7 @@ Double_t AliTPCclustererMI::ProcesSignal(Float_t *signal, Int_t nchannels, Int_t
   Double_t ggThreshold=5.*ggrms;
   Double_t ggSumThreshold=8.*ggrms;
 
-  for (Int_t i=1; i<nchannels-1; i++){
+  for (Int_t i=1; i<nchannels/4; i++){
     if ( (dsignal[i]-mean06)>ggThreshold && dsignal[i]>=dsignal[i+1] && dsignal[i]>=dsignal[i-1] &&
         (dsignal[i]+dsignal[i+1]+dsignal[i-1]-3*mean06)>ggSumThreshold){
       ggmaxpos=i;
@@ -1020,6 +1363,8 @@ Double_t AliTPCclustererMI::ProcesSignal(Float_t *signal, Int_t nchannels, Int_t
       if (ggQmax&&ggQsum>ggSumThreshold) {
          ggTime/=ggQsum;
          (*fDebugStreamer)<<"Signalgg"<<
+           "TimeStamp="<<fTimeStamp<<
+           "EventType="<<fEventType<<
              "Sector="<<uid[0]<<
              "Row="<<uid[1]<<
              "Pad="<<uid[2]<<
@@ -1036,14 +1381,21 @@ Double_t AliTPCclustererMI::ProcesSignal(Float_t *signal, Int_t nchannels, Int_t
 
   delete [] dsignal;
   delete [] dtime;
-  if (rms06>fRecoParam->GetMaxNoise()) return 1024+median; // sign noisy channel in debug mode
+  if (rms06>fRecoParam->GetMaxNoise()) {
+    pedestalEvent+=1024.;
+    return 1024+median; // sign noisy channel in debug mode
+  }
   return median;
 }
 
 
 
 void AliTPCclustererMI::DumpHistos(){
+  //
+  // Dump histogram information
+  //
   if (!fAmplitudeHisto) return;
+  AliTPCROC * roc = AliTPCROC::Instance();
   for (UInt_t isector=0; isector<AliTPCROC::Instance()->GetNSectors(); isector++){
     TObjArray * array = (TObjArray*)fAmplitudeHisto->UncheckedAt(isector);
     if (!array) continue;
@@ -1056,13 +1408,15 @@ void AliTPCclustererMI::DumpHistos(){
       Float_t rms  =  histo->GetRMS();
       Float_t gmean = histo->GetFunction("gaus")->GetParameter(1);
       Float_t gsigma = histo->GetFunction("gaus")->GetParameter(2);
+      Float_t gmeanErr = histo->GetFunction("gaus")->GetParError(1);
+      Float_t gsigmaErr = histo->GetFunction("gaus")->GetParError(2);
       Float_t max = histo->GetFunction("gaus")->GetParameter(0);
 
       // get pad number
       UInt_t row=0, pad =0;
-      const UInt_t *indexes = AliTPCROC::Instance()->GetRowIndexes(isector);
-      for (UInt_t irow=0; irow< AliTPCROC::Instance()->GetNRows(isector); irow++){
-       if (indexes[irow]<ipad){
+      const UInt_t *indexes =roc->GetRowIndexes(isector);
+      for (UInt_t irow=0; irow<roc->GetNRows(isector); irow++){
+       if (indexes[irow]<=ipad){
          row = irow;
          pad = ipad-indexes[irow];
        }
@@ -1070,6 +1424,8 @@ void AliTPCclustererMI::DumpHistos(){
       Int_t rpad = pad - (AliTPCROC::Instance()->GetNPads(isector,row))/2;
       //
       (*fDebugStreamer)<<"Fit"<<
+       "TimeStamp="<<fTimeStamp<<
+       "EventType="<<fEventType<<
        "Sector="<<isector<<
        "Row="<<row<<
        "Pad="<<pad<<
@@ -1079,8 +1435,58 @@ void AliTPCclustererMI::DumpHistos(){
        "RMS="<<rms<<      
        "GMean="<<gmean<<
        "GSigma="<<gsigma<<
+       "GMeanErr="<<gmeanErr<<
+       "GSigmaErr="<<gsigmaErr<<
        "\n";
       if (array->UncheckedAt(ipad)) fDebugStreamer->StoreObject(array->UncheckedAt(ipad));
     }
   }
 }
+
+
+
+Int_t  AliTPCclustererMI::TransformFFT(Float_t *input, Float_t threshold, Bool_t locMax, Float_t *freq, Float_t *re, Float_t *im, Float_t *mag, Float_t *phi)
+{
+  //
+  // calculate fourrie transform 
+  // return only frequncies with mag over threshold
+  // if locMax is spectified only freque with local maxima over theshold is returned 
+
+  if (! fFFTr2c) return kFALSE;
+  if (!freq) return kFALSE;
+
+  Int_t current=0;
+  Int_t nPoints = fRecoParam->GetLastBin()-fRecoParam->GetFirstBin();
+  Double_t *in = new Double_t[nPoints];
+  Double_t *rfft = new Double_t[nPoints];
+  Double_t *ifft = new Double_t[nPoints];
+  for (Int_t i=0; i<nPoints; i++){in[i]=input[i];}
+  fFFTr2c->SetPoints(in);
+  fFFTr2c->Transform();
+  fFFTr2c->GetPointsComplex(rfft, ifft);
+  for (Int_t i=3; i<nPoints/2-3; i++){
+    Float_t lmag =  TMath::Sqrt(rfft[i]*rfft[i]+ifft[i]*ifft[i])/nPoints;
+    if (lmag<threshold) continue;
+    if (locMax){
+      if ( TMath::Sqrt(rfft[i-1]*rfft[i-1]+ifft[i-1]*ifft[i-1])/nPoints>lmag) continue;
+      if ( TMath::Sqrt(rfft[i+1]*rfft[i+1]+ifft[i+1]*ifft[i+1])/nPoints>lmag) continue;
+      if ( TMath::Sqrt(rfft[i-2]*rfft[i-2]+ifft[i-2]*ifft[i-2])/nPoints>lmag) continue;
+      if ( TMath::Sqrt(rfft[i+2]*rfft[i+2]+ifft[i+2]*ifft[i+2])/nPoints>lmag) continue;
+      if ( TMath::Sqrt(rfft[i-3]*rfft[i-3]+ifft[i-3]*ifft[i-3])/nPoints>lmag) continue;
+      if ( TMath::Sqrt(rfft[i+3]*rfft[i+3]+ifft[i+3]*ifft[i+3])/nPoints>lmag) continue;
+    }
+    
+    freq[current] = Float_t(i)/Float_t(nPoints);
+    //
+    re[current] = rfft[i];
+    im[current] = ifft[i];
+    mag[current]=lmag;
+    phi[current]=TMath::ATan2(ifft[i],rfft[i]);
+    current++;
+  }
+  delete [] in;
+  delete [] rfft;
+  delete [] ifft;
+  return current;
+}
+