[u/mrichter/AliRoot.git] / PHOS / AliPHOSv3.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.                  *
 **************************************************************************/

/* $Id$ */

//_________________________________________________________________________
// Implementation version v0 of PHOS Manager class 
// Layout EMC + PPSD has name GPS2  
// The main goal of this version of AliPHOS is to calculte the 
//  induced charged in the PIN diode, taking into account light
//  tracking in the PbWO4 crystal, induced signal in the 
//  PIN due to MIPS particle and electronic noise.
// This is done in the StepManager 
//                  
//*-- Author:  Odd Harald Odland & Gines Martinez (SUBATECH)


// --- ROOT system ---
#include "TRandom.h"

// --- Standard library ---

#include <string.h>
#include <stdlib.h>
#include <strstream.h>

// --- AliRoot header files ---

#include "AliPHOSv3.h"
#include "AliPHOSHit.h"
#include "AliPHOSCPVDigit.h"
#include "AliRun.h"
#include "AliConst.h"
#include "AliMC.h"
#include "AliPHOSGeometry.h"

ClassImp(AliPHOSv3)

//____________________________________________________________________________
  AliPHOSv3::AliPHOSv3(void) : AliPHOSv1() 
{
  // default ctor: initialize daa members

  fLightYieldMean         = 0. ;         
  fIntrinsicPINEfficiency = 0. ; 
  fLightYieldAttenuation  = 0. ;  
  fRecalibrationFactor    = 0. ;    
  fElectronsPerGeV        = 0. ;
  fAPDGain                = 0. ;    
  
}

//____________________________________________________________________________
  AliPHOSv3::AliPHOSv3(const char *name, const char *title):
AliPHOSv1(name,title)
{
  // ctor 

  // The light yield is a poissonian distribution of the number of
  // photons created in the PbWo4 crystal, calculated using following formula
  // NumberOfPhotons = EnergyLost * LightYieldMean* APDEfficiency * 
  //              exp (-LightYieldAttenuation * DistanceToPINdiodeFromTheHit);
  // LightYieldMean is parameter calculated to be over 47000 photons per GeV  
  // APDEfficiency is 0.02655
  // k_0 is 0.0045 from Valery Antonenko 
  // The number of electrons created in the APD is 
  // NumberOfElectrons = APDGain * LightYield
  // The APD Gain is 300

  fLightYieldMean = 47000;
  fIntrinsicPINEfficiency = 0.02655 ; //APD= 0.1875/0.1271 * 0.018 (PIN)
  fLightYieldAttenuation = 0.0045 ; 
  fRecalibrationFactor = 13.418/ fLightYieldMean ;
  fElectronsPerGeV = 2.77e+8 ;
  fAPDGain= 300. ;
}

// //____________________________________________________________________________
// AliPHOSv3::AliPHOSv3(AliPHOSReconstructioner * Reconstructioner, const char *name, const char *title):
//   AliPHOSv1(Reconstructioner,name,title)
// {
//   // ctor 

//   // Number of electrons created in the PIN due to light collected in the PbWo4 crystal is calculated using 
//   // following formula
//   // NumberOfElectrons = EnergyLost * LightYield * PINEfficiency * 
//   //                     exp (-LightYieldAttenuation * DistanceToPINdiodeFromTheHit) *
//   //                     RecalibrationFactor ;
//   // LightYield is obtained as a Poissonian distribution with a mean at 700000 photons per GeV fromValery Antonenko
//   // PINEfficiency is 0.1875 
//   // k_0 is 0.0045 from Valery Antonenko 

//   fLightYieldMean = 700000.;
//   fIntrinsicPINEfficiency = 0.1875 ;
//   fLightYieldAttenuation = 0.0045 ;
//   fRecalibrationFactor = 6.2 / fLightYieldMean ;
//   fRecalibrationFactor = 5.67 /fLightYieldMean ;//25.04.2001 OHO
//   fElectronsPerGeV = 2.77e+8 ;
// }
//____________________________________________________________________________

void AliPHOSv3::StepManager(void)
{
  // Accumulates hits as long as the track stays in a single crystal or PPSD gas Cell

//    if (gMC->IsTrackEntering())
//      cout << "Track enters the volume " << gMC->CurrentVolName() << endl;
//    if (gMC->IsTrackExiting())
//      cout << "Track leaves the volume " << gMC->CurrentVolName() << endl;

  Int_t          relid[4] ;        // (box, layer, row, column) indices
  Int_t          absid    ;        // absolute cell ID number
  Float_t        xyze[4]={0,0,0,0}  ; // position wrt MRS and energy deposited

  TLorentzVector pos      ;     // Lorentz vector of the track current position
  Int_t          copy     ;
  Float_t        fLightYield ;   // Light Yield per GeV

  Int_t tracknumber =  gAlice->CurrentTrack() ; 
  Int_t primary     =  gAlice->GetPrimary( gAlice->CurrentTrack() ); 
  TString name      =  GetGeometry()->GetName() ; 
  Float_t        lostenergy ;
  Float_t        global[3] ;
  Float_t        local[3] ;


  if ( name == "GPS2" || name == "MIXT" ) {            // ======> CPV is a GPS' PPSD

    if( gMC->CurrentVolID(copy) == gMC->VolId("PPCE") ) // We are inside a gas cell 
    {
      gMC->TrackPosition(pos) ;
      xyze[0] = pos[0] ;
      xyze[1] = pos[1] ;
      xyze[2] = pos[2] ;
      xyze[3] = gMC->Edep() ; 

      if ( xyze[3] != 0) { // there is deposited energy 
       	gMC->CurrentVolOffID(5, relid[0]) ;  // get the PHOS Module number
	if ( name == "MIXT" && strcmp(gMC->CurrentVolOffName(5),"PHO1") == 0 ){
	  relid[0] += GetGeometry()->GetNModules() - GetGeometry()->GetNPPSDModules();
	}
       	gMC->CurrentVolOffID(3, relid[1]) ;  // get the Micromegas Module number 
      // 1-> GetGeometry()->GetNumberOfModulesPhi() * GetGeometry()->GetNumberOfModulesZ() upper
      //   > GetGeometry()->GetNumberOfModulesPhi() * GetGeometry()->GetNumberOfModulesZ() lower
       	gMC->CurrentVolOffID(1, relid[2]) ;  // get the row number of the cell
        gMC->CurrentVolID(relid[3]) ;        // get the column number 

	// get the absolute Id number

       	GetGeometry()->RelToAbsNumbering(relid, absid) ; 

	// add current hit to the hit list      
	  AddHit(fIshunt, primary, tracknumber, absid, xyze);


      } // there is deposited energy 
    } // We are inside the gas of the CPV  
  } // GPS2 configuration

  if ( name == "IHEP" || name == "MIXT" ) {       // ======> CPV is a IHEP's one

    // Yuri Kharlov, 28 September 2000

    if( gMC->CurrentVolID(copy) == gMC->VolId("PCPQ") &&
	gMC->IsTrackEntering()  &&
	gMC->TrackCharge() != 0) {      

      gMC -> TrackPosition(pos);
      Float_t xyzm[3], xyzd[3] ;
      Int_t i;
      for (i=0; i<3; i++) xyzm[i] = pos[i];
      gMC -> Gmtod (xyzm, xyzd, 1);    // transform coordinate from master to daughter system

      Float_t        xyd[3]={0,0,0}   ;   //local posiiton of the entering
      xyd[0]  = xyzd[0];
      xyd[1]  =-xyzd[1];
      xyd[2]  =-xyzd[2];

      
      // Current momentum of the hit's track in the local ref. system
        TLorentzVector pmom     ;        //momentum of the particle initiated hit
      gMC -> TrackMomentum(pmom);
      Float_t pm[3], pd[3];
      for (i=0; i<3; i++) pm[i]   = pmom[i];
      gMC -> Gmtod (pm, pd, 2);        // transform 3-momentum from master to daughter system
      pmom[0] = pd[0];
      pmom[1] =-pd[1];
      pmom[2] =-pd[2];
      
      // Digitize the current CPV hit:

      // 1. find pad response and
      
      Int_t moduleNumber;
      gMC->CurrentVolOffID(3,moduleNumber);
      moduleNumber--;


      TClonesArray *cpvDigits = new TClonesArray("AliPHOSCPVDigit",0);   // array of digits for current hit
      CPVDigitize(pmom,xyd,moduleNumber,cpvDigits);
      
      Float_t xmean = 0;
      Float_t zmean = 0;
      Float_t qsum  = 0;
      Int_t   idigit,ndigits;

      // 2. go through the current digit list and sum digits in pads

      ndigits = cpvDigits->GetEntriesFast();
      for (idigit=0; idigit<ndigits-1; idigit++) {
	AliPHOSCPVDigit  *cpvDigit1 = dynamic_cast<AliPHOSCPVDigit*>(cpvDigits->UncheckedAt(idigit));
	Float_t x1 = cpvDigit1->GetXpad() ;
	Float_t z1 = cpvDigit1->GetYpad() ;
	for (Int_t jdigit=idigit+1; jdigit<ndigits; jdigit++) {
	  AliPHOSCPVDigit  *cpvDigit2 = dynamic_cast<AliPHOSCPVDigit*>(cpvDigits->UncheckedAt(jdigit));
	  Float_t x2 = cpvDigit2->GetXpad() ;
	  Float_t z2 = cpvDigit2->GetYpad() ;
	  if (x1==x2 && z1==z2) {
	    Float_t qsum = cpvDigit1->GetQpad() + cpvDigit2->GetQpad() ;
	    cpvDigit2->SetQpad(qsum) ;
	    cpvDigits->RemoveAt(idigit) ;
	  }
	}
      }
      cpvDigits->Compress() ;

      // 3. add digits to temporary hit list fTmpHits

      ndigits = cpvDigits->GetEntriesFast();
      for (idigit=0; idigit<ndigits; idigit++) {
	AliPHOSCPVDigit  *cpvDigit = dynamic_cast<AliPHOSCPVDigit*>(cpvDigits->UncheckedAt(idigit));
	relid[0] = moduleNumber + 1 ;                             // CPV (or PHOS) module number
	relid[1] =-1 ;                                            // means CPV
	relid[2] = cpvDigit->GetXpad() ;                          // column number of a pad
	relid[3] = cpvDigit->GetYpad() ;                          // row    number of a pad
	
	// get the absolute Id number
	GetGeometry()->RelToAbsNumbering(relid, absid) ; 

	// add current digit to the temporary hit list
	xyze[0] = 0. ;
	xyze[1] = 0. ;
	xyze[2] = 0. ;
	xyze[3] = cpvDigit->GetQpad() ;                           // amplitude in a pad
	primary = -1;                                             // No need in primary for CPV
	AddHit(fIshunt, primary, tracknumber, absid, xyze);

	if (cpvDigit->GetQpad() > 0.02) {
	  xmean += cpvDigit->GetQpad() * (cpvDigit->GetXpad() + 0.5);
	  zmean += cpvDigit->GetQpad() * (cpvDigit->GetYpad() + 0.5);
	  qsum  += cpvDigit->GetQpad();
	}
      }
      delete cpvDigits;
    }
  } // end of IHEP configuration
  

if(gMC->CurrentVolID(copy)==gMC->VolId("PXTL")){// We are inside a PBWO4 crystal
    gMC->TrackPosition(pos) ;
    xyze[0] = pos[0] ;
    xyze[1] = pos[1] ;
    xyze[2] = pos[2] ;
    global[0] = pos[0] ;
    global[1] = pos[1] ;
    global[2] = pos[2] ;
    lostenergy = gMC->Edep(); 
    xyze[3] = gMC->Edep() ;

  
  if ( (xyze[3] != 0) ){//Track is inside the crystal and deposits some energy

      gMC->CurrentVolOffID(10, relid[0]) ; // get the PHOS module number ;

      if ( name == "MIXT" && strcmp(gMC->CurrentVolOffName(10),"PHO1") == 0 )
	relid[0] += GetGeometry()->GetNModules() - GetGeometry()->GetNPPSDModules();      

      relid[1] = 0   ;                    // means PBW04
   gMC->CurrentVolOffID(4, relid[2]) ; // get the row number inside the module
   gMC->CurrentVolOffID(3, relid[3]) ; // get the cell number inside the module
      
      // get the absolute Id number

   GetGeometry()->RelToAbsNumbering(relid, absid) ; 

   gMC->Gmtod(global, local, 1) ;

   //Calculates the light yield, the number of photns produced in the
   //crystal 
   fLightYield = gRandom->Poisson(
				  fLightYieldMean * lostenergy *
				  fIntrinsicPINEfficiency * 
				  exp(-fLightYieldAttenuation *
				      (local[1]+GetGeometry()->GetCrystalSize(1)/2.0 ))
				  ) ;
   //Calculates de energy deposited in the crystal  
   xyze[3] = (fRecalibrationFactor/100.) * fAPDGain * fLightYield  ;
  
    
   // cout<<"xyze[3]:    "<<xyze[3]<<   endl;
   //cout<<"lostenergy: "<<lostenergy<<endl; 


      // add current hit to the hit list
 

   if (xyze[3] != 0.) AddHit(fIshunt, primary,tracknumber, absid, xyze);
  

    } // there is deposited energy
  } // we are inside a PHOS Xtal

//  if(gMC->CurrentVolID(copy) == gMC->VolId("PPIN"))//We are inside the PIN diode 
//     {
//       cout<<" Inside PIN "<<endl;
//       gMC->TrackPosition(pos) ;
//       global[0] = pos[0] ;
//       global[1] = pos[1] ;
//       global[2] = pos[2] ;
//       xyze[0] = pos[0] ;
//       xyze[1] = pos[1] ;
//       xyze[2] = pos[2] ;
//       lostenergy = gMC->Edep() ;
//       xyze[3] = gMC->Edep() ;
      
//       if ( xyze[3] != 0 ) {
// 	gMC->CurrentVolOffID(11, relid[0]) ; // get the PHOS module number ;
// 	relid[1] = 0   ;                    // means PW04 and PIN
// 	gMC->CurrentVolOffID(5, relid[2]) ; // get the row number inside the module
// 	gMC->CurrentVolOffID(4, relid[3]) ; // get the cell number inside the module
	
// 	// get the absolute Id number
	
// 	Int_t absid ; 
// 	GetGeometry()->RelToAbsNumbering(relid,absid) ;
// 	gMC->Gmtod(global, local, 1) ;

// // calculating number of electrons in the PIN diode asociated to this hit

// 	  //nElectrons = lostenergy * fElectronsPerGeV ;
//        //  xyze[3] = nElectrons * fRecalibrationFactor ;
//           apdgain = gRandom->Poisson(300.) ;
//           // apdgain = 300.;
//    //if(local[1]<-0.0045) xyze[3] = apdgain * nElectrons * fRecalibrationFactor/10000.;

//     if(local[1]<-0.0045) xyze[3] = apdgain * lostenergy * fElectronsPerGeV* (fRecalibrationFactor/100.);

//    //if((local[1]>-0.0045)&&(gMC->TrackPid()==-11)) xyze[3] = apdgain * nElectrons * fRecalibrationFactor/10000.;

//      if((local[1]>-0.0045)&&(gMC->TrackPid()==-11)) xyze[3] = apdgain * lostenergy * fElectronsPerGeV * (fRecalibrationFactor/100.);

//    //if(local[1]>-0.0045) xyze[3] = nElectrons * fRecalibrationFactor/10000.;

//      if(local[1]>-0.0045) xyze[3] = lostenergy * fElectronsPerGeV * (fRecalibrationFactor/100.);
	  
// 	  // add current hit to the hit list

// 	  AddHit(fIshunt, primary, tracknumber, absid, xyze);

// 	  //printf("PIN volume is  %d, %d, %d, %d \n",relid[0],relid[1],relid[2],relid[3]);
// 	  printf("Lost energy in the PIN is %f \n",lostenergy) ;
//       } // there is deposited energy
//     } // we are inside a PHOS XtalPHOS PIN diode
}
Commit	Line	Data
5f20d3fb	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	/* $Id$ */
	17
	18	//_________________________________________________________________________
	19	// Implementation version v0 of PHOS Manager class
	20	// Layout EMC + PPSD has name GPS2
	21	// The main goal of this version of AliPHOS is to calculte the
	22	// induced charged in the PIN diode, taking into account light
	23	// tracking in the PbWO4 crystal, induced signal in the
	24	// PIN due to MIPS particle and electronic noise.
	25	// This is done in the StepManager
	26	//
50abc6f8	27	//*-- Author: Odd Harald Odland & Gines Martinez (SUBATECH)
5f20d3fb	28
	29
	30	// --- ROOT system ---
	31	#include "TRandom.h"
	32
	33	// --- Standard library ---
	34
5f20d3fb	35	#include <string.h>
	36	#include <stdlib.h>
	37	#include <strstream.h>
	38
	39	// --- AliRoot header files ---
	40
	41	#include "AliPHOSv3.h"
	42	#include "AliPHOSHit.h"
97cee223	43	#include "AliPHOSCPVDigit.h"
5f20d3fb	44	#include "AliRun.h"
5f20d3fb	45	#include "AliConst.h"
94de3818	46	#include "AliMC.h"
97cee223	47	#include "AliPHOSGeometry.h"
5f20d3fb	48
	49	ClassImp(AliPHOSv3)
	50
735e58f1	51	//____________________________________________________________________________
	52	AliPHOSv3::AliPHOSv3(void) : AliPHOSv1()
	53	{
	54	// default ctor: initialize daa members
	55
	56	fLightYieldMean = 0. ;
	57	fIntrinsicPINEfficiency = 0. ;
	58	fLightYieldAttenuation = 0. ;
	59	fRecalibrationFactor = 0. ;
3dab1cef	60	fElectronsPerGeV = 0. ;
3dab1cef	61	fAPDGain = 0. ;
735e58f1	62
	63	}
	64
5f20d3fb	65	//____________________________________________________________________________
e04976bd	66	AliPHOSv3::AliPHOSv3(const char name, const char title):
e04976bd	67	AliPHOSv1(name,title)
5f20d3fb	68	{
	69	// ctor
	70
3dab1cef	71	// The light yield is a poissonian distribution of the number of
	72	// photons created in the PbWo4 crystal, calculated using following formula
	73	// NumberOfPhotons = EnergyLost * LightYieldMean* APDEfficiency *
	74	// exp (-LightYieldAttenuation * DistanceToPINdiodeFromTheHit);
	75	// LightYieldMean is parameter calculated to be over 47000 photons per GeV
	76	// APDEfficiency is 0.02655
5f20d3fb	77	// k_0 is 0.0045 from Valery Antonenko
3dab1cef	78	// The number of electrons created in the APD is
	79	// NumberOfElectrons = APDGain * LightYield
	80	// The APD Gain is 300
	81
	82	fLightYieldMean = 47000;
	83	fIntrinsicPINEfficiency = 0.02655 ; //APD= 0.1875/0.1271 * 0.018 (PIN)
	84	fLightYieldAttenuation = 0.0045 ;
	85	fRecalibrationFactor = 13.418/ fLightYieldMean ;
	86	fElectronsPerGeV = 2.77e+8 ;
	87	fAPDGain= 300. ;
5f20d3fb	88	}
5f20d3fb	89
97cee223	90	// //____________________________________________________________________________
	91	// AliPHOSv3::AliPHOSv3(AliPHOSReconstructioner * Reconstructioner, const char name, const char title):
	92	// AliPHOSv1(Reconstructioner,name,title)
	93	// {
	94	// // ctor
	95
	96	// // Number of electrons created in the PIN due to light collected in the PbWo4 crystal is calculated using
	97	// // following formula
	98	// // NumberOfElectrons = EnergyLost * LightYield * PINEfficiency *
	99	// // exp (-LightYieldAttenuation * DistanceToPINdiodeFromTheHit) *
	100	// // RecalibrationFactor ;
	101	// // LightYield is obtained as a Poissonian distribution with a mean at 700000 photons per GeV fromValery Antonenko
50abc6f8	102	// // PINEfficiency is 0.1875
97cee223	103	// // k_0 is 0.0045 from Valery Antonenko
	104
	105	// fLightYieldMean = 700000.;
	106	// fIntrinsicPINEfficiency = 0.1875 ;
	107	// fLightYieldAttenuation = 0.0045 ;
	108	// fRecalibrationFactor = 6.2 / fLightYieldMean ;
50abc6f8	109	// fRecalibrationFactor = 5.67 /fLightYieldMean ;//25.04.2001 OHO
97cee223	110	// fElectronsPerGeV = 2.77e+8 ;
97cee223	111	// }
5f20d3fb	112	//____________________________________________________________________________
037cc66d	113
5f20d3fb	114	void AliPHOSv3::StepManager(void)
	115	{
	116	// Accumulates hits as long as the track stays in a single crystal or PPSD gas Cell
037cc66d	117
	118	// if (gMC->IsTrackEntering())
	119	// cout << "Track enters the volume " << gMC->CurrentVolName() << endl;
	120	// if (gMC->IsTrackExiting())
	121	// cout << "Track leaves the volume " << gMC->CurrentVolName() << endl;
5f20d3fb	122
5c617c31	123	Int_t relid[4] ; // (box, layer, row, column) indices
5c617c31	124	Int_t absid ; // absolute cell ID number
037cc66d	125	Float_t xyze[4]={0,0,0,0} ; // position wrt MRS and energy deposited
3dab1cef	126
3dab1cef	127	TLorentzVector pos ; // Lorentz vector of the track current position
037cc66d	128	Int_t copy ;
3dab1cef	129	Float_t fLightYield ; // Light Yield per GeV
3dab1cef	130
5f20d3fb	131	Int_t tracknumber = gAlice->CurrentTrack() ;
037cc66d	132	Int_t primary = gAlice->GetPrimary( gAlice->CurrentTrack() );
fa7cce36	133	TString name = GetGeometry()->GetName() ;
50abc6f8	134	Float_t lostenergy ;
	135	Float_t global[3] ;
	136	Float_t local[3] ;
037cc66d	137
	138
	139	if ( name == "GPS2" \|\| name == "MIXT" ) { // ======> CPV is a GPS' PPSD
5f20d3fb	140
dc999bc0	141	if( gMC->CurrentVolID(copy) == gMC->VolId("PPCE") ) // We are inside a gas cell
5f20d3fb	142	{
	143	gMC->TrackPosition(pos) ;
	144	xyze[0] = pos[0] ;
	145	xyze[1] = pos[1] ;
	146	xyze[2] = pos[2] ;
037cc66d	147	xyze[3] = gMC->Edep() ;
5f20d3fb	148
b37750a6	149	if ( xyze[3] != 0) { // there is deposited energy
5f20d3fb	150	gMC->CurrentVolOffID(5, relid[0]) ; // get the PHOS Module number
037cc66d	151	if ( name == "MIXT" && strcmp(gMC->CurrentVolOffName(5),"PHO1") == 0 ){
fa7cce36	152	relid[0] += GetGeometry()->GetNModules() - GetGeometry()->GetNPPSDModules();
037cc66d	153	}
5f20d3fb	154	gMC->CurrentVolOffID(3, relid[1]) ; // get the Micromegas Module number
fa7cce36	155	// 1-> GetGeometry()->GetNumberOfModulesPhi() * GetGeometry()->GetNumberOfModulesZ() upper
fa7cce36	156	// > GetGeometry()->GetNumberOfModulesPhi() * GetGeometry()->GetNumberOfModulesZ() lower
5f20d3fb	157	gMC->CurrentVolOffID(1, relid[2]) ; // get the row number of the cell
	158	gMC->CurrentVolID(relid[3]) ; // get the column number
	159
	160	// get the absolute Id number
	161
fa7cce36	162	GetGeometry()->RelToAbsNumbering(relid, absid) ;
037cc66d	163
037cc66d	164	// add current hit to the hit list
b37750a6	165	AddHit(fIshunt, primary, tracknumber, absid, xyze);
5f20d3fb	166
5f20d3fb	167
5f20d3fb	168	} // there is deposited energy
037cc66d	169	} // We are inside the gas of the CPV
	170	} // GPS2 configuration
	171
	172	if ( name == "IHEP" \|\| name == "MIXT" ) { // ======> CPV is a IHEP's one
	173
	174	// Yuri Kharlov, 28 September 2000
	175
97cee223	176	if( gMC->CurrentVolID(copy) == gMC->VolId("PCPQ") &&
b37750a6	177	gMC->IsTrackEntering() &&
037cc66d	178	gMC->TrackCharge() != 0) {
b37750a6	179
	180	gMC -> TrackPosition(pos);
	181	Float_t xyzm[3], xyzd[3] ;
	182	Int_t i;
	183	for (i=0; i<3; i++) xyzm[i] = pos[i];
	184	gMC -> Gmtod (xyzm, xyzd, 1); // transform coordinate from master to daughter system
	185
	186	Float_t xyd[3]={0,0,0} ; //local posiiton of the entering
	187	xyd[0] = xyzd[0];
	188	xyd[1] =-xyzd[1];
	189	xyd[2] =-xyzd[2];
	190
	191
	192	// Current momentum of the hit's track in the local ref. system
	193	TLorentzVector pmom ; //momentum of the particle initiated hit
	194	gMC -> TrackMomentum(pmom);
	195	Float_t pm[3], pd[3];
	196	for (i=0; i<3; i++) pm[i] = pmom[i];
	197	gMC -> Gmtod (pm, pd, 2); // transform 3-momentum from master to daughter system
	198	pmom[0] = pd[0];
	199	pmom[1] =-pd[1];
	200	pmom[2] =-pd[2];
037cc66d	201
	202	// Digitize the current CPV hit:
	203
	204	// 1. find pad response and
	205
	206	Int_t moduleNumber;
	207	gMC->CurrentVolOffID(3,moduleNumber);
	208	moduleNumber--;
	209
	210
	211	TClonesArray *cpvDigits = new TClonesArray("AliPHOSCPVDigit",0); // array of digits for current hit
	212	CPVDigitize(pmom,xyd,moduleNumber,cpvDigits);
	213
	214	Float_t xmean = 0;
	215	Float_t zmean = 0;
	216	Float_t qsum = 0;
	217	Int_t idigit,ndigits;
	218
	219	// 2. go through the current digit list and sum digits in pads
	220
	221	ndigits = cpvDigits->GetEntriesFast();
	222	for (idigit=0; idigit<ndigits-1; idigit++) {
29b077b5	223	AliPHOSCPVDigit cpvDigit1 = dynamic_cast<AliPHOSCPVDigit>(cpvDigits->UncheckedAt(idigit));
037cc66d	224	Float_t x1 = cpvDigit1->GetXpad() ;
	225	Float_t z1 = cpvDigit1->GetYpad() ;
	226	for (Int_t jdigit=idigit+1; jdigit<ndigits; jdigit++) {
29b077b5	227	AliPHOSCPVDigit cpvDigit2 = dynamic_cast<AliPHOSCPVDigit>(cpvDigits->UncheckedAt(jdigit));
037cc66d	228	Float_t x2 = cpvDigit2->GetXpad() ;
	229	Float_t z2 = cpvDigit2->GetYpad() ;
	230	if (x1==x2 && z1==z2) {
	231	Float_t qsum = cpvDigit1->GetQpad() + cpvDigit2->GetQpad() ;
	232	cpvDigit2->SetQpad(qsum) ;
	233	cpvDigits->RemoveAt(idigit) ;
	234	}
	235	}
	236	}
	237	cpvDigits->Compress() ;
	238
	239	// 3. add digits to temporary hit list fTmpHits
	240
	241	ndigits = cpvDigits->GetEntriesFast();
	242	for (idigit=0; idigit<ndigits; idigit++) {
29b077b5	243	AliPHOSCPVDigit cpvDigit = dynamic_cast<AliPHOSCPVDigit>(cpvDigits->UncheckedAt(idigit));
037cc66d	244	relid[0] = moduleNumber + 1 ; // CPV (or PHOS) module number
	245	relid[1] =-1 ; // means CPV
	246	relid[2] = cpvDigit->GetXpad() ; // column number of a pad
	247	relid[3] = cpvDigit->GetYpad() ; // row number of a pad
	248
	249	// get the absolute Id number
fa7cce36	250	GetGeometry()->RelToAbsNumbering(relid, absid) ;
037cc66d	251
	252	// add current digit to the temporary hit list
	253	xyze[0] = 0. ;
	254	xyze[1] = 0. ;
	255	xyze[2] = 0. ;
	256	xyze[3] = cpvDigit->GetQpad() ; // amplitude in a pad
	257	primary = -1; // No need in primary for CPV
b37750a6	258	AddHit(fIshunt, primary, tracknumber, absid, xyze);
037cc66d	259
	260	if (cpvDigit->GetQpad() > 0.02) {
	261	xmean += cpvDigit->GetQpad() * (cpvDigit->GetXpad() + 0.5);
	262	zmean += cpvDigit->GetQpad() * (cpvDigit->GetYpad() + 0.5);
	263	qsum += cpvDigit->GetQpad();
	264	}
	265	}
	266	delete cpvDigits;
	267	}
	268	} // end of IHEP configuration
5f20d3fb	269
5f20d3fb	270
50abc6f8	271	if(gMC->CurrentVolID(copy)==gMC->VolId("PXTL")){// We are inside a PBWO4 crystal
037cc66d	272	gMC->TrackPosition(pos) ;
	273	xyze[0] = pos[0] ;
	274	xyze[1] = pos[1] ;
	275	xyze[2] = pos[2] ;
50abc6f8	276	global[0] = pos[0] ;
	277	global[1] = pos[1] ;
	278	global[2] = pos[2] ;
	279	lostenergy = gMC->Edep();
037cc66d	280	xyze[3] = gMC->Edep() ;
5f20d3fb	281
037cc66d	282
50abc6f8	283	if ( (xyze[3] != 0) ){//Track is inside the crystal and deposits some energy
5f20d3fb	284
037cc66d	285	gMC->CurrentVolOffID(10, relid[0]) ; // get the PHOS module number ;
5f20d3fb	286
037cc66d	287	if ( name == "MIXT" && strcmp(gMC->CurrentVolOffName(10),"PHO1") == 0 )
fa7cce36	288	relid[0] += GetGeometry()->GetNModules() - GetGeometry()->GetNPPSDModules();
037cc66d	289
037cc66d	290	relid[1] = 0 ; // means PBW04
50abc6f8	291	gMC->CurrentVolOffID(4, relid[2]) ; // get the row number inside the module
50abc6f8	292	gMC->CurrentVolOffID(3, relid[3]) ; // get the cell number inside the module
037cc66d	293
5f20d3fb	294	// get the absolute Id number
50abc6f8	295
3dab1cef	296	GetGeometry()->RelToAbsNumbering(relid, absid) ;
037cc66d	297
3dab1cef	298	gMC->Gmtod(global, local, 1) ;
50abc6f8	299
3dab1cef	300	//Calculates the light yield, the number of photns produced in the
	301	//crystal
	302	fLightYield = gRandom->Poisson(
	303	fLightYieldMean * lostenergy *
	304	fIntrinsicPINEfficiency *
	305	exp(-fLightYieldAttenuation *
	306	(local[1]+GetGeometry()->GetCrystalSize(1)/2.0 ))
	307	) ;
	308	//Calculates de energy deposited in the crystal
	309	xyze[3] = (fRecalibrationFactor/100.) * fAPDGain * fLightYield ;
	310
68140e39	311
3dab1cef	312	// cout<<"xyze[3]: "<<xyze[3]<< endl;
68140e39	313	//cout<<"lostenergy: "<<lostenergy<<endl;
50abc6f8	314
50abc6f8	315
3dab1cef	316
50abc6f8	317
037cc66d	318	// add current hit to the hit list
3dab1cef	319
50abc6f8	320
3dab1cef	321	if (xyze[3] != 0.) AddHit(fIshunt, primary,tracknumber, absid, xyze);
3dab1cef	322
5f20d3fb	323
037cc66d	324	} // there is deposited energy
	325	} // we are inside a PHOS Xtal
	326
3dab1cef	327	// if(gMC->CurrentVolID(copy) == gMC->VolId("PPIN"))//We are inside the PIN diode
	328	// {
	329	// cout<<" Inside PIN "<<endl;
	330	// gMC->TrackPosition(pos) ;
	331	// global[0] = pos[0] ;
	332	// global[1] = pos[1] ;
	333	// global[2] = pos[2] ;
	334	// xyze[0] = pos[0] ;
	335	// xyze[1] = pos[1] ;
	336	// xyze[2] = pos[2] ;
	337	// lostenergy = gMC->Edep() ;
	338	// xyze[3] = gMC->Edep() ;
037cc66d	339
3dab1cef	340	// if ( xyze[3] != 0 ) {
	341	// gMC->CurrentVolOffID(11, relid[0]) ; // get the PHOS module number ;
	342	// relid[1] = 0 ; // means PW04 and PIN
	343	// gMC->CurrentVolOffID(5, relid[2]) ; // get the row number inside the module
	344	// gMC->CurrentVolOffID(4, relid[3]) ; // get the cell number inside the module
037cc66d	345
3dab1cef	346	// // get the absolute Id number
037cc66d	347
3dab1cef	348	// Int_t absid ;
	349	// GetGeometry()->RelToAbsNumbering(relid,absid) ;
	350	// gMC->Gmtod(global, local, 1) ;
50abc6f8	351
3dab1cef	352	// // calculating number of electrons in the PIN diode asociated to this hit
50abc6f8	353
3dab1cef	354	// //nElectrons = lostenergy * fElectronsPerGeV ;
	355	// // xyze[3] = nElectrons * fRecalibrationFactor ;
	356	// apdgain = gRandom->Poisson(300.) ;
	357	// // apdgain = 300.;
	358	// //if(local[1]<-0.0045) xyze[3] = apdgain * nElectrons * fRecalibrationFactor/10000.;
68140e39	359
3dab1cef	360	// if(local[1]<-0.0045) xyze[3] = apdgain * lostenergy * fElectronsPerGeV* (fRecalibrationFactor/100.);
68140e39	361
3dab1cef	362	// //if((local[1]>-0.0045)&&(gMC->TrackPid()==-11)) xyze[3] = apdgain * nElectrons * fRecalibrationFactor/10000.;
68140e39	363
3dab1cef	364	// if((local[1]>-0.0045)&&(gMC->TrackPid()==-11)) xyze[3] = apdgain * lostenergy * fElectronsPerGeV * (fRecalibrationFactor/100.);
68140e39	365
3dab1cef	366	// //if(local[1]>-0.0045) xyze[3] = nElectrons * fRecalibrationFactor/10000.;
68140e39	367
3dab1cef	368	// if(local[1]>-0.0045) xyze[3] = lostenergy * fElectronsPerGeV * (fRecalibrationFactor/100.);
037cc66d	369
3dab1cef	370	// // add current hit to the hit list
50abc6f8	371
3dab1cef	372	// AddHit(fIshunt, primary, tracknumber, absid, xyze);
50abc6f8	373
3dab1cef	374	// //printf("PIN volume is %d, %d, %d, %d \n",relid[0],relid[1],relid[2],relid[3]);
	375	// printf("Lost energy in the PIN is %f \n",lostenergy) ;
	376	// } // there is deposited energy
	377	// } // we are inside a PHOS XtalPHOS PIN diode
5f20d3fb	378	}