[u/mrichter/AliRoot.git] / PHOS / AliPHOSClusterizerv1.cxx

/**************************************************************************
 * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
 *                                                                        *
 * Author: The ALICE Off-line Project.                                    *
 * Contributors are mentioned in the code where appropriate.              *
 *                                                                        *
 * Permission to use, copy, modify and distribute this software and its   *
 * documentation strictly for non-commercial purposes is hereby granted   *
 * without fee, provided that the above copyright notice appears in all   *
 * copies and that both the copyright notice and this permission notice   *
 * appear in the supporting documentation. The authors make no claims     *
 * about the suitability of this software for any purpose. It is          *
 * provided "as is" without express or implied warranty.                  *
 **************************************************************************/

//_________________________________________________________________________
// A brief description of the class
//*-- Author : Yves Schutz  SUBATECH 
//////////////////////////////////////////////////////////////////////////////

// --- ROOT system ---

#include "TMath.h" 

// --- Standard library ---

#include <iostream>

// --- AliRoot header files ---

#include "AliPHOSClusterizerv1.h"
#include "AliPHOSDigit.h"
#include "AliPHOSEmcRecPoint.h"
#include "AliPHOSPpsdRecPoint.h"
#include "AliPHOSv0.h" 
#include "AliRun.h" 

ClassImp(AliPHOSClusterizerv1)

//____________________________________________________________________________
AliPHOSClusterizerv1::AliPHOSClusterizerv1()
{
  fA                       = 0.;
  fB                       = 0.01 ;
  fNumberOfEmcClusters     = 0 ; 
  fNumberOfPpsdClusters    = 0 ; 
  fEmcClusteringThreshold  = 0.1;   
  fEmcEnergyThreshold      = 0.01;    
  fPpsdClusteringThreshold = 0.00000015; 
  fPpsdEnergyThreshold     = 0.0000001;  
  fW0                      = 4.5 ;
  fLocMaxCut               = 0.06 ;
}

//____________________________________________________________________________
Int_t AliPHOSClusterizerv1::AreNeighbours(AliPHOSDigit * d1, AliPHOSDigit * d2)
{
  // neigbours are defined as digits having at least common vertex
  // The order of A and B in AreNeighbours(A,B) is important: first (A) should be digit 
  // in cluster, which compared with digits not clusterized yet  
  Int_t rv = 0 ; 

  AliPHOSGeometry * geom = AliPHOSGeometry::GetInstance() ;

  Int_t relid1[4] ; 
  geom->AbsToRelNumbering(d1->GetId(), relid1) ; 

  Int_t relid2[4] ; 
  geom->AbsToRelNumbering(d2->GetId(), relid2) ; 
 
  if ( (relid1[0] == relid2[0]) && (relid1[1]==relid2[1]) ) { // inside the same PHOS module and the same PPSD Module 
    Int_t RowDiff = TMath::Abs( relid1[2] - relid2[2] ) ;  
    Int_t ColDiff = TMath::Abs( relid1[3] - relid2[3] ) ;  
    
    if (( ColDiff<=1 )  && ( RowDiff <= 1 )){
      rv = 1 ; 
    }
    else {
      if((relid2[2] > relid1[2]) && (relid2[3] > relid1[3]+1)) 
	rv = 2; //  Difference in row numbers is too large to look further 
    }

  } 
  else {
    
    if( (relid1[0] < relid2[0]) || (relid1[1] < relid2[1]) )  
      rv=2 ;

  }
  
  return rv ; 
}

//____________________________________________________________________________
void AliPHOSClusterizerv1::FillandSort(const DigitsList * dl, TObjArray * tl) 
{
  // copies the digits with energy above thershold and sorts the list
  // according to increasing Id number

  AliPHOSGeometry * geom = AliPHOSGeometry::GetInstance() ;
  Int_t relid[4] ;  
  
  TIter next(dl) ; 
  AliPHOSDigit * digit ;
  
  while ( (digit = (AliPHOSDigit *)next()) ) { 
    
    Int_t id    = digit->GetId() ; 
    Float_t ene = Calibrate(digit->GetAmp()) ; 
    geom->AbsToRelNumbering(id, relid) ;
    
    if(relid[1]==0){ // EMC
      if ( ene > fEmcEnergyThreshold ) 
	tl->Add(digit) ;
    }

    else { //Ppsd
      if ( ene > fPpsdEnergyThreshold )
	tl->Add(digit) ;	
    }

  }
  tl->Sort() ; 
}

//____________________________________________________________________________
void AliPHOSClusterizerv1:: GetNumberOfClustersFound(Int_t * numb) 
{
 numb[0] = fNumberOfEmcClusters ; 
 numb[1] = fNumberOfPpsdClusters ; 
}

//____________________________________________________________________________
Bool_t AliPHOSClusterizerv1::IsInEmc(AliPHOSDigit * digit) 
{
  Bool_t rv = kFALSE ; 

  AliPHOSGeometry * geom = AliPHOSGeometry::GetInstance() ;  

  Int_t relid[4] ; 
  geom->AbsToRelNumbering(digit->GetId(), relid) ; 

  if ( relid[1] == 0  )
    rv = kTRUE; 

  return rv ; 
}

//____________________________________________________________________________
void AliPHOSClusterizerv1::MakeClusters(const DigitsList * dl, RecPointsList * emcl, RecPointsList * ppsdl)
{
  // Fill and sort the working digits list
  TObjArray TempoDigitsList( dl->GetEntries() ) ;
  FillandSort(dl, &TempoDigitsList) ; 

  // Clusterization starts  
  TIter nextdigit(&TempoDigitsList) ; 
  AliPHOSDigit * digit ; 
  Bool_t NotRemoved = kTRUE ;

  while ( (digit = (AliPHOSDigit *)nextdigit()) ) { // scan over the list of digits
    AliPHOSRecPoint * clu ; 
   
    int * ClusterDigitsList[dl->GetEntries()] ;   
    Int_t index ;
    if (( ( IsInEmc(digit) ) && ( Calibrate(digit->GetAmp() ) > fEmcClusteringThreshold ) ) || 
        ( ( !IsInEmc(digit) ) && ( Calibrate(digit->GetAmp() ) > fPpsdClusteringThreshold ) ) ) {
  
      Int_t iDigitInCluster = 0 ; 

      if  ( IsInEmc(digit) ) {   
        new ((*emcl)[fNumberOfEmcClusters]) AliPHOSEmcRecPoint(fW0, fLocMaxCut) ; // start a new EMC RecPoint
	clu = (AliPHOSEmcRecPoint *) (*emcl)[fNumberOfEmcClusters] ; 
	fNumberOfEmcClusters++ ; 
	clu->AddDigit(*digit, Calibrate(digit->GetAmp())) ; 

	ClusterDigitsList[iDigitInCluster] = (int* ) digit ;	
	iDigitInCluster++ ; 
	TempoDigitsList.Remove(digit) ; 
      }

      else { 
	new ((*ppsdl)[fNumberOfPpsdClusters]) AliPHOSPpsdRecPoint() ; // start a new PPSD cluster
	clu =  (AliPHOSPpsdRecPoint *) ppsdl->At(fNumberOfPpsdClusters)  ;  
	fNumberOfPpsdClusters++ ; 
	clu->AddDigit(*digit, Calibrate(digit->GetAmp()) ) ;	
	ClusterDigitsList[iDigitInCluster] = (int* ) digit ;	
	iDigitInCluster++ ; 
	TempoDigitsList.Remove(digit) ; 
        nextdigit.Reset() ;
	
	// Here we remove resting EMC digits, which cannot make cluster

        if( NotRemoved ) { 
	  
	  while( ( digit = (AliPHOSDigit *)nextdigit() ) ) {
	    
            if( IsInEmc(digit) ) 
	      TempoDigitsList.Remove(digit) ;
            else 
	      break ;
	  
	  } // while digit  
	  
	} // if NotRemoved 
	
      } // else        
      
      nextdigit.Reset() ;

      AliPHOSDigit * digitN ; 
      index = 0 ;
      while (index < iDigitInCluster){ // scan over digits already in cluster 
	digit = (AliPHOSDigit *) ClusterDigitsList[index]  ;      
	index++ ; 
        while ( (digitN = (AliPHOSDigit *)nextdigit()) ) { // scan over the reduced list of digits 
	  Int_t ineb = AreNeighbours(digit, digitN);   //  call (digit,digitN) in THAT oder !!!!!
          switch (ineb ) {
          case 0 :   // not a neighbour
	    break ;	 
	  case 1 :   // are neighbours 
	    clu->AddDigit( *digitN, Calibrate( digitN->GetAmp() ) ) ;
	    ClusterDigitsList[iDigitInCluster] =(int*) digitN ; 
	    iDigitInCluster++ ; 
	    TempoDigitsList.Remove(digitN) ;
	    break ;
          case 2 :   // too far from each other
	    goto endofloop;   
	  } // switch
	  
	} // while digitN

      endofloop: ;
	nextdigit.Reset() ; 
	
      } // loop over cluster     
 
   }  //below energy theshold  
  
  } // while digit

  TempoDigitsList.Clear() ; 
}

//____________________________________________________________________________
void AliPHOSClusterizerv1::PrintParameters() 
{
  cout << "PHOS Clusterizer version 1 :" << endl 
       << "                       EMC  Clustering threshold = " << fEmcClusteringThreshold << endl
       << "                       EMC  Energy threshold     = " << fEmcEnergyThreshold << endl                  
       << "                      PPSD  Clustering threshold = " << fPpsdClusteringThreshold << endl
       << "                      PPSD  Energy threshold     = " << fPpsdEnergyThreshold << endl ;                
}
Commit	Line	Data
d15a28e7	1	/**************************************************************************
	2	* Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. *
	3	* *
	4	* Author: The ALICE Off-line Project. *
	5	* Contributors are mentioned in the code where appropriate. *
	6	* *
	7	* Permission to use, copy, modify and distribute this software and its *
	8	* documentation strictly for non-commercial purposes is hereby granted *
	9	* without fee, provided that the above copyright notice appears in all *
	10	* copies and that both the copyright notice and this permission notice *
	11	* appear in the supporting documentation. The authors make no claims *
	12	* about the suitability of this software for any purpose. It is *
	13	* provided "as is" without express or implied warranty. *
	14	**************************************************************************/
	15
	16	//_________________________________________________________________________
	17	// A brief description of the class
	18	//*-- Author : Yves Schutz SUBATECH
	19	//////////////////////////////////////////////////////////////////////////////
	20
	21	// --- ROOT system ---
	22
	23	#include "TMath.h"
	24
	25	// --- Standard library ---
	26
9f616d61	27	#include <iostream>
d15a28e7	28
	29	// --- AliRoot header files ---
	30
	31	#include "AliPHOSClusterizerv1.h"
	32	#include "AliPHOSDigit.h"
	33	#include "AliPHOSEmcRecPoint.h"
	34	#include "AliPHOSPpsdRecPoint.h"
	35	#include "AliPHOSv0.h"
	36	#include "AliRun.h"
	37
	38	ClassImp(AliPHOSClusterizerv1)
	39
	40	//____________________________________________________________________________
	41	AliPHOSClusterizerv1::AliPHOSClusterizerv1()
	42	{
	43	fA = 0.;
	44	fB = 0.01 ;
	45	fNumberOfEmcClusters = 0 ;
	46	fNumberOfPpsdClusters = 0 ;
	47	fEmcClusteringThreshold = 0.1;
	48	fEmcEnergyThreshold = 0.01;
	49	fPpsdClusteringThreshold = 0.00000015;
	50	fPpsdEnergyThreshold = 0.0000001;
	51	fW0 = 4.5 ;
	52	fLocMaxCut = 0.06 ;
	53	}
	54
	55	//____________________________________________________________________________
	56	Int_t AliPHOSClusterizerv1::AreNeighbours(AliPHOSDigit * d1, AliPHOSDigit * d2)
	57	{
9f616d61	58	// neigbours are defined as digits having at least common vertex
d15a28e7	59	// The order of A and B in AreNeighbours(A,B) is important: first (A) should be digit
9f616d61	60	// in cluster, which compared with digits not clusterized yet
d15a28e7	61	Int_t rv = 0 ;
	62
	63	AliPHOSGeometry * geom = AliPHOSGeometry::GetInstance() ;
	64
	65	Int_t relid1[4] ;
	66	geom->AbsToRelNumbering(d1->GetId(), relid1) ;
	67
	68	Int_t relid2[4] ;
	69	geom->AbsToRelNumbering(d2->GetId(), relid2) ;
	70
	71	if ( (relid1[0] == relid2[0]) && (relid1[1]==relid2[1]) ) { // inside the same PHOS module and the same PPSD Module
	72	Int_t RowDiff = TMath::Abs( relid1[2] - relid2[2] ) ;
	73	Int_t ColDiff = TMath::Abs( relid1[3] - relid2[3] ) ;
	74
	75	if (( ColDiff<=1 ) && ( RowDiff <= 1 )){
	76	rv = 1 ;
	77	}
	78	else {
	79	if((relid2[2] > relid1[2]) && (relid2[3] > relid1[3]+1))
	80	rv = 2; // Difference in row numbers is too large to look further
	81	}
	82
	83	}
	84	else {
	85
	86	if( (relid1[0] < relid2[0]) \|\| (relid1[1] < relid2[1]) )
	87	rv=2 ;
	88
	89	}
	90
	91	return rv ;
	92	}
	93
	94	//____________________________________________________________________________
	95	void AliPHOSClusterizerv1::FillandSort(const DigitsList * dl, TObjArray * tl)
	96	{
	97	// copies the digits with energy above thershold and sorts the list
	98	// according to increasing Id number
	99
d15a28e7	100	AliPHOSGeometry * geom = AliPHOSGeometry::GetInstance() ;
	101	Int_t relid[4] ;
	102
	103	TIter next(dl) ;
	104	AliPHOSDigit * digit ;
	105
	106	while ( (digit = (AliPHOSDigit *)next()) ) {
	107
	108	Int_t id = digit->GetId() ;
	109	Float_t ene = Calibrate(digit->GetAmp()) ;
	110	geom->AbsToRelNumbering(id, relid) ;
	111
	112	if(relid[1]==0){ // EMC
	113	if ( ene > fEmcEnergyThreshold )
	114	tl->Add(digit) ;
	115	}
	116
	117	else { //Ppsd
	118	if ( ene > fPpsdEnergyThreshold )
	119	tl->Add(digit) ;
	120	}
	121
	122	}
	123	tl->Sort() ;
	124	}
	125
	126	//____________________________________________________________________________
	127	void AliPHOSClusterizerv1:: GetNumberOfClustersFound(Int_t * numb)
	128	{
	129	numb[0] = fNumberOfEmcClusters ;
	130	numb[1] = fNumberOfPpsdClusters ;
	131	}
	132
	133	//____________________________________________________________________________
	134	Bool_t AliPHOSClusterizerv1::IsInEmc(AliPHOSDigit * digit)
	135	{
9f616d61	136	Bool_t rv = kFALSE ;
d15a28e7	137
	138	AliPHOSGeometry * geom = AliPHOSGeometry::GetInstance() ;
	139
	140	Int_t relid[4] ;
	141	geom->AbsToRelNumbering(digit->GetId(), relid) ;
	142
	143	if ( relid[1] == 0 )
	144	rv = kTRUE;
	145
	146	return rv ;
	147	}
	148
	149	//____________________________________________________________________________
	150	void AliPHOSClusterizerv1::MakeClusters(const DigitsList * dl, RecPointsList * emcl, RecPointsList * ppsdl)
	151	{
d15a28e7	152	// Fill and sort the working digits list
d15a28e7	153	TObjArray TempoDigitsList( dl->GetEntries() ) ;
9f616d61	154	FillandSort(dl, &TempoDigitsList) ;
d15a28e7	155
	156	// Clusterization starts
	157	TIter nextdigit(&TempoDigitsList) ;
	158	AliPHOSDigit * digit ;
	159	Bool_t NotRemoved = kTRUE ;
6ad0bfa0	160
d15a28e7	161	while ( (digit = (AliPHOSDigit *)nextdigit()) ) { // scan over the list of digits
d15a28e7	162	AliPHOSRecPoint * clu ;
9f616d61	163
d15a28e7	164	int * ClusterDigitsList[dl->GetEntries()] ;
d15a28e7	165	Int_t index ;
9f616d61	166	if (( ( IsInEmc(digit) ) && ( Calibrate(digit->GetAmp() ) > fEmcClusteringThreshold ) ) \|\|
9f616d61	167	( ( !IsInEmc(digit) ) && ( Calibrate(digit->GetAmp() ) > fPpsdClusteringThreshold ) ) ) {
d15a28e7	168
	169	Int_t iDigitInCluster = 0 ;
	170
6ad0bfa0	171	if ( IsInEmc(digit) ) {
9f616d61	172	new ((*emcl)[fNumberOfEmcClusters]) AliPHOSEmcRecPoint(fW0, fLocMaxCut) ; // start a new EMC RecPoint
	173	clu = (AliPHOSEmcRecPoint ) (emcl)[fNumberOfEmcClusters] ;
	174	fNumberOfEmcClusters++ ;
	175	clu->AddDigit(*digit, Calibrate(digit->GetAmp())) ;
d15a28e7	176
9f616d61	177	ClusterDigitsList[iDigitInCluster] = (int* ) digit ;
9f616d61	178	iDigitInCluster++ ;
d15a28e7	179	TempoDigitsList.Remove(digit) ;
	180	}
	181
	182	else {
9f616d61	183	new ((*ppsdl)[fNumberOfPpsdClusters]) AliPHOSPpsdRecPoint() ; // start a new PPSD cluster
	184	clu = (AliPHOSPpsdRecPoint *) ppsdl->At(fNumberOfPpsdClusters) ;
	185	fNumberOfPpsdClusters++ ;
6ad0bfa0	186	clu->AddDigit(*digit, Calibrate(digit->GetAmp()) ) ;
9f616d61	187	ClusterDigitsList[iDigitInCluster] = (int* ) digit ;
	188	iDigitInCluster++ ;
	189	TempoDigitsList.Remove(digit) ;
d15a28e7	190	nextdigit.Reset() ;
d15a28e7	191
9f616d61	192	// Here we remove resting EMC digits, which cannot make cluster
	193
	194	if( NotRemoved ) {
d15a28e7	195
9f616d61	196	while( ( digit = (AliPHOSDigit *)nextdigit() ) ) {
d15a28e7	197
9f616d61	198	if( IsInEmc(digit) )
9f616d61	199	TempoDigitsList.Remove(digit) ;
d15a28e7	200	else
d15a28e7	201	break ;
9f616d61	202
9f616d61	203	} // while digit
d15a28e7	204
	205	} // if NotRemoved
	206
	207	} // else
	208
	209	nextdigit.Reset() ;
	210
	211	AliPHOSDigit * digitN ;
	212	index = 0 ;
9f616d61	213	while (index < iDigitInCluster){ // scan over digits already in cluster
	214	digit = (AliPHOSDigit *) ClusterDigitsList[index] ;
	215	index++ ;
d15a28e7	216	while ( (digitN = (AliPHOSDigit *)nextdigit()) ) { // scan over the reduced list of digits
	217	Int_t ineb = AreNeighbours(digit, digitN); // call (digit,digitN) in THAT oder !!!!!
	218	switch (ineb ) {
9f616d61	219	case 0 : // not a neighbour
d15a28e7	220	break ;
9f616d61	221	case 1 : // are neighbours
	222	clu->AddDigit( *digitN, Calibrate( digitN->GetAmp() ) ) ;
	223	ClusterDigitsList[iDigitInCluster] =(int*) digitN ;
	224	iDigitInCluster++ ;
d15a28e7	225	TempoDigitsList.Remove(digitN) ;
d15a28e7	226	break ;
9f616d61	227	case 2 : // too far from each other
d15a28e7	228	goto endofloop;
	229	} // switch
	230
	231	} // while digitN
	232
	233	endofloop: ;
	234	nextdigit.Reset() ;
	235
	236	} // loop over cluster
	237
	238	} //below energy theshold
	239
	240	} // while digit
	241
	242	TempoDigitsList.Clear() ;
	243	}
	244
	245	//____________________________________________________________________________
	246	void AliPHOSClusterizerv1::PrintParameters()
	247	{
	248	cout << "PHOS Clusterizer version 1 :" << endl
	249	<< " EMC Clustering threshold = " << fEmcClusteringThreshold << endl
	250	<< " EMC Energy threshold = " << fEmcEnergyThreshold << endl
	251	<< " PPSD Clustering threshold = " << fPpsdClusteringThreshold << endl
	252	<< " PPSD Energy threshold = " << fPpsdEnergyThreshold << endl ;
	253	}