[u/mrichter/AliRoot.git] / PHOS / AliPHOSv4.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 of the PHOS manager class for fast simulations     
// Tracks particles until the reach a grossly designed PHOS module
// Modify the particles property (momentum, energy, type) according to
//  the PHOS response function. The result is called a virtual reconstructed
//  particle.                
//
//*-- Author: Yves Schutz (SUBATECH)

// --- ROOT system ---

#include "TBRIK.h"
#include "TNode.h"
#include "TParticle.h"
#include "TTree.h"
#include "TGeometry.h"
#include "TFile.h"

// --- Standard library ---

#include <stdio.h>

// --- AliRoot header files ---

#include "AliPHOSv4.h"
#include "AliRun.h"
#include "AliConst.h"
#include "AliMC.h"

ClassImp(AliPHOSv4)

//____________________________________________________________________________
AliPHOSv4::AliPHOSv4(const char *name, const char *title):
  AliPHOS(name,title)
{
  // ctor

  // gets an instance of the geometry parameters class  
  if (strcmp(GetTitle(),"") != 0 ) 
    fGeom =  AliPHOSGeometry::GetInstance(GetTitle(), "") ; 
     
    
    SetBigBox(0, fGeom->GetOuterBoxSize(0) ) ;
    SetBigBox(1, fGeom->GetOuterBoxSize(1) + fGeom->GetCPVBoxSize(1) ) ; 
    SetBigBox(2, fGeom->GetOuterBoxSize(0) ); 
    
    fNRecParticles = 0 ; 
    fFastRecParticles = new AliPHOSFastRecParticle::FastRecParticlesList("AliPHOSFastRecParticle", 100) ;

    fResPara1 = 0.030 ;    // GeV
    fResPara2 = 0.00003 ; 
    fResPara3 = 0.00001 ; 
    
    fPosParaA0 = 2.87 ;    // mm
    fPosParaA1 = -0.0975 ;  
    fPosParaB0 = 0.257 ;   
    fPosParaB1 = 0.137 ; 
    fPosParaB2 = 0.00619 ; 
}

//____________________________________________________________________________
AliPHOSv4::~AliPHOSv4()
{
  // dtor
 
  fFastRecParticles->Delete() ; 
  delete fFastRecParticles ;
  fFastRecParticles = 0 ; 

}

//____________________________________________________________________________
void AliPHOSv4::AddRecParticle(const AliPHOSFastRecParticle & rp)
{  
  // Add a virtually reconstructed particle to the list 

  new( (*fFastRecParticles)[fNRecParticles] ) AliPHOSFastRecParticle(rp) ;
  fNRecParticles++ ; 
}

//____________________________________________________________________________
void AliPHOSv4::BuildGeometry()
{
  // Build the PHOS geometry for the ROOT display
   //BEGIN_HTML
  /*
    <H2>
     PHOS FAST in ALICE displayed by root
    </H2>
    <H4> All Views </H4>
    <P>
    <CENTER>
    <IMG Align=BOTTOM ALT="Fast All Views" SRC="../images/AliPHOSv4AllViews.gif"> 
    </CENTER></P>
    <H4> Front View </H4>
    <P>
    <CENTER>
    <IMG Align=BOTTOM ALT="Fast Front View" SRC="../images/AliPHOSv4FrontView.gif"> 
    </CENTER></P>
  */
  //END_HTML  
 
  const Int_t kColorPHOS = kRed ;
  
  Double_t const kRADDEG = 180.0 / kPI ;
  
  new TBRIK( "BigBox", "PHOS box", "void", GetBigBox(0)/2, 
	     GetBigBox(1)/2, 
	     GetBigBox(2)/2 );
  
  // position PHOS into ALICE

  Float_t r = fGeom->GetIPtoCrystalSurface() + GetBigBox(1) / 2.0 ;
  Int_t number = 988 ; 
  Float_t pphi =  TMath::ATan( GetBigBox(0)  / ( 2.0 * fGeom->GetIPtoCrystalSurface() ) ) ;
  pphi *= kRADDEG ;
  TNode * top = gAlice->GetGeometry()->GetNode("alice") ;
 
  char * nodename = new char[20] ;  
  char * rotname  = new char[20] ; 

  for( Int_t i = 1; i <= fGeom->GetNModules(); i++ ) { 
   Float_t angle = pphi * 2 * ( i - fGeom->GetNModules() / 2.0 - 0.5 ) ;
   sprintf(rotname, "%s%d", "rot", number++) ;
   new TRotMatrix(rotname, rotname, 90, angle, 90, 90 + angle, 0, 0);
   top->cd();
   sprintf(nodename,"%s%d", "Module", i) ;    
   Float_t x =  r * TMath::Sin( angle / kRADDEG ) ;
   Float_t y = -r * TMath::Cos( angle / kRADDEG ) ;
   TNode * bigboxnode = new TNode(nodename, nodename, "BigBox", x, y, 0, rotname ) ;
   bigboxnode->SetLineColor(kColorPHOS) ;
   fNodes->Add(bigboxnode) ;
  }
  delete[] nodename ; 
  delete[] rotname ; 
}

//____________________________________________________________________________
void AliPHOSv4::CreateGeometry()
{
  // Create the geometry for GEANT
  
  AliPHOSv4 *phostmp = (AliPHOSv4*)gAlice->GetModule("PHOS") ;
  
  if ( phostmp == NULL ) {
    
    fprintf(stderr, "PHOS detector not found!\n") ;
    return ;
    
  }

  // Get pointer to the array containing media indeces
  Int_t *idtmed = fIdtmed->GetArray() - 699 ;
  
  Float_t bigbox[3] ; 
  bigbox[0] =   GetBigBox(0) / 2.0 ;
  bigbox[1] =   GetBigBox(1) / 2.0 ;
  bigbox[2] =   GetBigBox(2) / 2.0 ;
  
  gMC->Gsvolu("PHOS", "BOX ", idtmed[798], bigbox, 3) ;
  
  // --- Position  PHOS mdules in ALICE setup ---
  
  Int_t idrotm[99] ;
  Double_t const kRADDEG = 180.0 / kPI ;
  
  for( Int_t i = 1; i <= fGeom->GetNModules(); i++ ) {
    
    Float_t angle = fGeom->GetPHOSAngle(i) ;
    AliMatrix(idrotm[i-1], 90.0, angle, 90.0, 90.0+angle, 0.0, 0.0) ;
 
    Float_t r = fGeom->GetIPtoCrystalSurface() + GetBigBox(1) / 2.0 ;

    Float_t xP1 = r * TMath::Sin( angle / kRADDEG ) ;
    Float_t yP1 = -r * TMath::Cos( angle / kRADDEG ) ;
    gMC->Gspos("PHOS", i, "ALIC", xP1, yP1, 0.0, idrotm[i-1], "ONLY") ;
 
  } // for GetNModules

}


//____________________________________________________________________________
void AliPHOSv4::Init(void)
{
  // Prints out an information message
  
  Int_t i;

  printf("\n");
  for(i=0;i<35;i++) printf("*");
  printf(" FAST PHOS_INIT ");
  for(i=0;i<35;i++) printf("*");
  printf("\n");

  // Here the PHOS initialisation code (if any!)

  for(i=0;i<80;i++) printf("*");
  printf("\n");
  
}

//___________________________________________________________________________
Float_t AliPHOSv4::GetBigBox(Int_t index)
{
  // Get the X, Y or Z dimension of the box describing a PHOS module
  
  Float_t rv = 0 ; 

  switch (index) {
  case 0:
    rv = fBigBoxX ; 
    break ; 
  case 1:
     rv = fBigBoxY ; 
    break ; 
  case 2:
     rv = fBigBoxZ ; 
    break ; 
 }
  return rv ; 
}

//___________________________________________________________________________
void AliPHOSv4::MakeBranch(Option_t* opt, char *file)
{  
  // Create new branch in the current reconstructed Root Tree
 
  AliDetector::MakeBranch(opt,file) ;
  
  char branchname[10];
  sprintf(branchname,"%s",GetName());
  const char *cd = strstr(opt,"R");
  
  if (fFastRecParticles && gAlice->TreeR() && cd) {
    gAlice->MakeBranchInTree(gAlice->TreeR(), 
                             branchname, &fFastRecParticles, fBufferSize, file) ;
  }
}

//____________________________________________________________________________
Double_t AliPHOSv4::MakeEnergy(const Double_t energy)
{  
  // Smears the energy according to the energy dependent energy resolution.
  // A gaussian distribution is assumed

  Double_t sigma  = SigmaE(energy) ; 
  return  fRan.Gaus(energy, sigma) ;   
}

//____________________________________________________________________________
TVector3 AliPHOSv4::MakePosition(const Double_t energy, const TVector3 pos, const Double_t theta, const Double_t phi)
{
  // Smears the impact position according to the energy dependent position resolution
  // A gaussian position distribution is assumed

  TVector3 newpos ;
  Double_t sigma = SigmaP( energy, theta*180./TMath::Pi() ) ;
  Double_t x = fRan.Gaus( pos.X(), sigma ) ;
  sigma = SigmaP( energy, phi*180./TMath::Pi() ) ;
  Double_t z = fRan.Gaus( pos.Z(), sigma ) ;
  Double_t y = pos.Y() ; 
  
  newpos.SetX(x) ; 
  newpos.SetY(y) ; 
  newpos.SetZ(z) ; 
	      
  return newpos ; 
}

//____________________________________________________________________________
void AliPHOSv4::MakeRecParticle(const Int_t modid, const TVector3 pos, AliPHOSFastRecParticle & rp)
{
  // Modify the primary particle properties according
  //  1. the response function of PHOS
  //  2. the performance of the EMC+PPSD setup
  
  Int_t type = MakeType( rp ) ;
  rp.SetType(type) ;

  
  // get the detected energy

  TLorentzVector momentum ;  
  rp.Momentum(momentum) ; 
  Double_t kineticenergy = TMath::Sqrt( TMath::Power(momentum.E(), 2) - TMath::Power(rp.GetMass(), 2) ) ; 
  Double_t modifiedkineticenergy = MakeEnergy(kineticenergy ) ;
  Double_t modifiedenergy = TMath::Sqrt( TMath::Power(modifiedkineticenergy, 2)  
					 + TMath::Power( rp.GetMass(), 2) ) ;
 
  // get the angle of incidence 
  
  Double_t incidencetheta = 90. * TMath::Pi() /180 - rp.Theta() ; 
  Double_t incidencephi   = ( 270 + fGeom->GetPHOSAngle(modid) ) * TMath::Pi() / 180. - rp.Phi() ;   

  // get the detected direction
  
  TVector3 modifiedposition = MakePosition(kineticenergy, pos, incidencetheta, incidencephi) ; 
  modifiedposition *= modifiedkineticenergy / modifiedposition.Mag() ; 

  // Set the modified 4-momentum of the reconstructed particle

  rp.SetMomentum(modifiedposition.X(), modifiedposition.Y(), modifiedposition.Z(), modifiedenergy) ; 

 }

//____________________________________________________________________________
Int_t AliPHOSv4::MakeType(AliPHOSFastRecParticle & rp )
{
  // Generate a particle type using the performance of the EMC+PPSD setup

  Int_t rv =   AliPHOSFastRecParticle::kUNDEFINED ;
  Int_t charge = (Int_t)rp.GetPDG()->Charge() ;
  Int_t test ; 
  Float_t ran ; 
  if ( charge != 0 && ( TMath::Abs(rp.GetPdgCode()) != 11 ) ) 
    test = - 1 ;
  else
    test = rp.GetPdgCode() ; 

  switch (test) { 

  case 22:    // it's a photon
    ran = fRan.Rndm() ; 
    if ( ran <= 0.5 )  // 50 % 
      rv =  AliPHOSFastRecParticle::kGAMMA ; 
    else {
      ran = fRan.Rndm() ; 
      if( ran <= 0.9498 )
	rv =  AliPHOSFastRecParticle::kNEUTRALEM ; 
      else
	rv =  AliPHOSFastRecParticle::kNEUTRALHA ; 
    }     
    break ; 

  case 2112:  // it's a neutron
    ran = fRan.Rndm() ; 
    if ( ran <= 0.9998 )
      rv =  AliPHOSFastRecParticle::kNEUTRALHA ; 
    else 
      rv = AliPHOSFastRecParticle::kNEUTRALEM ; 
    break ; 

  case -2112: // it's a anti-neutron
    ran = fRan.Rndm() ; 
    if ( ran <= 0.9984 )
      rv =  AliPHOSFastRecParticle::kNEUTRALHA ; 
    else 
      rv =  AliPHOSFastRecParticle::kNEUTRALEM ; 
    break ; 
    
  case 11:    // it's a electron
    ran = fRan.Rndm() ; 
    if ( ran <= 0.9996 )
      rv =  AliPHOSFastRecParticle::kELECTRON ; 
    else 
      rv =  AliPHOSFastRecParticle::kCHARGEDHA ; 
    break; 

  case -11:   // it's a positon
    ran = fRan.Rndm() ; 
    if ( ran <= 0.9996 )
      rv =  AliPHOSFastRecParticle::kELECTRON ; 
    else 
      rv =  AliPHOSFastRecParticle::kCHARGEDHA ; 
    break; 

  case -1:    // it's a charged
    ran = fRan.Rndm() ; 
    if ( ran <= 0.9996 )
      rv =  AliPHOSFastRecParticle::kCHARGEDHA ; 
    else 
      rv =  AliPHOSFastRecParticle::kGAMMA ; 

    break ; 
  }
    
  
  return rv ;
}

//___________________________________________________________________________
void AliPHOSv4::ResetPoints()
{
  // This overloads the method in AliDetector
  
  ResetFastRecParticles() ; 
}

//___________________________________________________________________________
void AliPHOSv4::ResetFastRecParticles()
{
  // Resets the list of virtual reconstructed particles
 
  if (fFastRecParticles) 
    fFastRecParticles->Clear() ;
  fNRecParticles = 0 ; 
}

//___________________________________________________________________________
void AliPHOSv4::SetBigBox(Int_t index, Float_t value)
{
  // Set the size of the Box describing a PHOS module
  
  switch (index) {
  case 0:
    fBigBoxX = value ; 
    break ; 
  case 1:
    fBigBoxY = value ; 
    break ; 
  case 2:
    fBigBoxZ = value ; 
    break ; 
 }

}

//____________________________________________________________________________
Double_t AliPHOSv4::SigmaE(Double_t energy)
{
  // Calculates the energy dependent energy resolution
  
  Double_t rv = -1 ; 
  
  rv = TMath::Sqrt( TMath::Power(fResPara1/energy, 2) 
	       + TMath::Power(fResPara2/TMath::Sqrt(energy), 2) 
	       + TMath::Power(fResPara3, 2) ) ;  

  return rv * energy ; 
}

//____________________________________________________________________________
Double_t AliPHOSv4::SigmaP(Double_t energy, Int_t incidence)
{
  // Calculates the energy dependent position resolution 

  Double_t paraA = fPosParaA0 + fPosParaA1 * incidence ; 
  Double_t paraB = fPosParaB0 + fPosParaB1 * incidence + fPosParaB2 * incidence * incidence ; 

  return ( paraA / TMath::Sqrt(energy) + paraB ) * 0.1   ; // in cm  
}

//____________________________________________________________________________
void AliPHOSv4::StepManager(void)
{
  // Only verifies if the particle reaches PHOS and stops the tracking 

  Int_t primary =  gAlice->GetPrimary( gAlice->CurrentTrack() ); 

  TLorentzVector lv ; 
  gMC->TrackPosition(lv) ;
  TVector3 pos = lv.Vect() ; 
  Int_t modid  ; 
  gMC->CurrentVolID(modid);
  
  Float_t energy = gMC->Etot() ; //Total energy of current track

  //Calculating mass of current particle
  TDatabasePDG * pdg = TDatabasePDG::Instance() ;
  TParticlePDG * partPDG = pdg->GetParticle(gMC->TrackPid()) ;
  Float_t mass = partPDG->Mass() ;

  if(energy > mass){
    pos.SetMag(TMath::Sqrt(energy*energy-mass*mass)) ;
    TLorentzVector pTrack(pos, energy) ;  

    TParticle * part = new TParticle(gMC->TrackPid(), 0,-1,-1,-1,-1, pTrack, lv)  ;
        
    AliPHOSFastRecParticle rp(*part) ;
    rp.SetPrimary(primary) ; 

    // Adds the response of PHOS to the particle
    MakeRecParticle(modid, pos, rp) ;
    
    // add the `track' particle to the FastRecParticles list
  
    AddRecParticle(rp) ;

    part->Delete() ;
  }
  // stop the track as soon PHOS is reached
  
  gMC->StopTrack() ; 

}
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 of the PHOS manager class for fast simulations
	20	// Tracks particles until the reach a grossly designed PHOS module
	21	// Modify the particles property (momentum, energy, type) according to
	22	// the PHOS response function. The result is called a virtual reconstructed
	23	// particle.
	24	//
	25	//*-- Author: Yves Schutz (SUBATECH)
	26
	27	// --- ROOT system ---
	28
	29	#include "TBRIK.h"
	30	#include "TNode.h"
	31	#include "TParticle.h"
94de3818	32	#include "TTree.h"
94de3818	33	#include "TGeometry.h"
2ab0c725	34	#include "TFile.h"
5f20d3fb	35
	36	// --- Standard library ---
	37
	38	#include <stdio.h>
	39
	40	// --- AliRoot header files ---
	41
	42	#include "AliPHOSv4.h"
	43	#include "AliRun.h"
	44	#include "AliConst.h"
94de3818	45	#include "AliMC.h"
5f20d3fb	46
	47	ClassImp(AliPHOSv4)
	48
5f20d3fb	49	//____________________________________________________________________________
	50	AliPHOSv4::AliPHOSv4(const char name, const char title):
	51	AliPHOS(name,title)
	52	{
	53	// ctor
	54
	55	// gets an instance of the geometry parameters class
5cbba5aa	56	if (strcmp(GetTitle(),"") != 0 )
5cbba5aa	57	fGeom = AliPHOSGeometry::GetInstance(GetTitle(), "") ;
e04976bd	58
aafe457d	59
aafe457d	60	SetBigBox(0, fGeom->GetOuterBoxSize(0) ) ;
9a00a811	61	SetBigBox(1, fGeom->GetOuterBoxSize(1) + fGeom->GetCPVBoxSize(1) ) ;
aafe457d	62	SetBigBox(2, fGeom->GetOuterBoxSize(0) );
	63
	64	fNRecParticles = 0 ;
	65	fFastRecParticles = new AliPHOSFastRecParticle::FastRecParticlesList("AliPHOSFastRecParticle", 100) ;
5cbba5aa	66
aafe457d	67	fResPara1 = 0.030 ; // GeV
	68	fResPara2 = 0.00003 ;
	69	fResPara3 = 0.00001 ;
	70
	71	fPosParaA0 = 2.87 ; // mm
	72	fPosParaA1 = -0.0975 ;
	73	fPosParaB0 = 0.257 ;
	74	fPosParaB1 = 0.137 ;
	75	fPosParaB2 = 0.00619 ;
5f20d3fb	76	}
	77
	78	//____________________________________________________________________________
	79	AliPHOSv4::~AliPHOSv4()
	80	{
	81	// dtor
	82
	83	fFastRecParticles->Delete() ;
	84	delete fFastRecParticles ;
	85	fFastRecParticles = 0 ;
	86
	87	}
	88
	89	//____________________________________________________________________________
	90	void AliPHOSv4::AddRecParticle(const AliPHOSFastRecParticle & rp)
	91	{
	92	// Add a virtually reconstructed particle to the list
	93
	94	new( (*fFastRecParticles)[fNRecParticles] ) AliPHOSFastRecParticle(rp) ;
	95	fNRecParticles++ ;
	96	}
	97
	98	//____________________________________________________________________________
	99	void AliPHOSv4::BuildGeometry()
	100	{
	101	// Build the PHOS geometry for the ROOT display
	102	//BEGIN_HTML
	103	/*
	104	<H2>
	105	PHOS FAST in ALICE displayed by root
	106	</H2>
	107	<H4> All Views </H4>
	108	<P>
	109	<CENTER>
	110	<IMG Align=BOTTOM ALT="Fast All Views" SRC="../images/AliPHOSv4AllViews.gif">
	111	</CENTER></P>
	112	<H4> Front View </H4>
	113	<P>
	114	<CENTER>
	115	<IMG Align=BOTTOM ALT="Fast Front View" SRC="../images/AliPHOSv4FrontView.gif">
	116	</CENTER></P>
	117	*/
	118	//END_HTML
	119
	120	const Int_t kColorPHOS = kRed ;
	121
	122	Double_t const kRADDEG = 180.0 / kPI ;
	123
	124	new TBRIK( "BigBox", "PHOS box", "void", GetBigBox(0)/2,
	125	GetBigBox(1)/2,
	126	GetBigBox(2)/2 );
	127
	128	// position PHOS into ALICE
	129
	130	Float_t r = fGeom->GetIPtoCrystalSurface() + GetBigBox(1) / 2.0 ;
	131	Int_t number = 988 ;
	132	Float_t pphi = TMath::ATan( GetBigBox(0) / ( 2.0 * fGeom->GetIPtoCrystalSurface() ) ) ;
	133	pphi *= kRADDEG ;
	134	TNode * top = gAlice->GetGeometry()->GetNode("alice") ;
	135
	136	char * nodename = new char[20] ;
	137	char * rotname = new char[20] ;
	138
	139	for( Int_t i = 1; i <= fGeom->GetNModules(); i++ ) {
140	Float_t angle = pphi * 2 * ( i - fGeom->GetNModules() / 2.0 - 0.5 ) ;
141	sprintf(rotname, "%s%d", "rot", number++) ;
142	new TRotMatrix(rotname, rotname, 90, angle, 90, 90 + angle, 0, 0);
143	top->cd();
144	sprintf(nodename,"%s%d", "Module", i) ;
145	Float_t x = r * TMath::Sin( angle / kRADDEG ) ;
146	Float_t y = -r * TMath::Cos( angle / kRADDEG ) ;
147	TNode * bigboxnode = new TNode(nodename, nodename, "BigBox", x, y, 0, rotname ) ;
148	bigboxnode->SetLineColor(kColorPHOS) ;
149	fNodes->Add(bigboxnode) ;
150	}
151	delete[] nodename ;
152	delete[] rotname ;
153	}
154
155	//____________________________________________________________________________
156	void AliPHOSv4::CreateGeometry()
157	{
158	// Create the geometry for GEANT
159
160	AliPHOSv4 phostmp = (AliPHOSv4)gAlice->GetModule("PHOS") ;
161
162	if ( phostmp == NULL ) {
163
164	fprintf(stderr, "PHOS detector not found!\n") ;
165	return ;
166
167	}
168
169	// Get pointer to the array containing media indeces
170	Int_t *idtmed = fIdtmed->GetArray() - 699 ;
171
172	Float_t bigbox[3] ;
173	bigbox[0] = GetBigBox(0) / 2.0 ;
174	bigbox[1] = GetBigBox(1) / 2.0 ;
175	bigbox[2] = GetBigBox(2) / 2.0 ;
176
177	gMC->Gsvolu("PHOS", "BOX ", idtmed[798], bigbox, 3) ;
178
179	// --- Position PHOS mdules in ALICE setup ---
180
181	Int_t idrotm[99] ;
182	Double_t const kRADDEG = 180.0 / kPI ;
183
184	for( Int_t i = 1; i <= fGeom->GetNModules(); i++ ) {
185
186	Float_t angle = fGeom->GetPHOSAngle(i) ;
187	AliMatrix(idrotm[i-1], 90.0, angle, 90.0, 90.0+angle, 0.0, 0.0) ;
188
189	Float_t r = fGeom->GetIPtoCrystalSurface() + GetBigBox(1) / 2.0 ;
190
191	Float_t xP1 = r * TMath::Sin( angle / kRADDEG ) ;
192	Float_t yP1 = -r * TMath::Cos( angle / kRADDEG ) ;
193	gMC->Gspos("PHOS", i, "ALIC", xP1, yP1, 0.0, idrotm[i-1], "ONLY") ;
194
195	} // for GetNModules
196
197	}
198
199
200	//____________________________________________________________________________
201	void AliPHOSv4::Init(void)
202	{
203	// Prints out an information message
204
205	Int_t i;
206
207	printf("\n");
208	for(i=0;i<35;i++) printf("*");
209	printf(" FAST PHOS_INIT ");
210	for(i=0;i<35;i++) printf("*");
211	printf("\n");
212
213	// Here the PHOS initialisation code (if any!)
214
215	for(i=0;i<80;i++) printf("*");
216	printf("\n");
217
218	}
219
220	//___________________________________________________________________________
221	Float_t AliPHOSv4::GetBigBox(Int_t index)
222	{
223	// Get the X, Y or Z dimension of the box describing a PHOS module
224
225	Float_t rv = 0 ;
226
227	switch (index) {
228	case 0:
229	rv = fBigBoxX ;
230	break ;
231	case 1:
232	rv = fBigBoxY ;
233	break ;
234	case 2:
235	rv = fBigBoxZ ;
236	break ;
237	}
238	return rv ;
239	}
240
241	//___________________________________________________________________________
2ab0c725	242	void AliPHOSv4::MakeBranch(Option_t* opt, char *file)
5f20d3fb	243	{
	244	// Create new branch in the current reconstructed Root Tree
	245
2ab0c725	246	AliDetector::MakeBranch(opt,file) ;
5f20d3fb	247
	248	char branchname[10];
	249	sprintf(branchname,"%s",GetName());
5cf7bbad	250	const char *cd = strstr(opt,"R");
5f20d3fb	251
5f20d3fb	252	if (fFastRecParticles && gAlice->TreeR() && cd) {
2ab0c725	253	gAlice->MakeBranchInTree(gAlice->TreeR(),
2ab0c725	254	branchname, &fFastRecParticles, fBufferSize, file) ;
5f20d3fb	255	}
	256	}
	257
	258	//____________________________________________________________________________
	259	Double_t AliPHOSv4::MakeEnergy(const Double_t energy)
	260	{
	261	// Smears the energy according to the energy dependent energy resolution.
	262	// A gaussian distribution is assumed
	263
	264	Double_t sigma = SigmaE(energy) ;
	265	return fRan.Gaus(energy, sigma) ;
	266	}
	267
	268	//____________________________________________________________________________
	269	TVector3 AliPHOSv4::MakePosition(const Double_t energy, const TVector3 pos, const Double_t theta, const Double_t phi)
	270	{
	271	// Smears the impact position according to the energy dependent position resolution
	272	// A gaussian position distribution is assumed
	273
	274	TVector3 newpos ;
	275	Double_t sigma = SigmaP( energy, theta*180./TMath::Pi() ) ;
	276	Double_t x = fRan.Gaus( pos.X(), sigma ) ;
	277	sigma = SigmaP( energy, phi*180./TMath::Pi() ) ;
	278	Double_t z = fRan.Gaus( pos.Z(), sigma ) ;
	279	Double_t y = pos.Y() ;
	280
	281	newpos.SetX(x) ;
	282	newpos.SetY(y) ;
	283	newpos.SetZ(z) ;
	284
	285	return newpos ;
	286	}
	287
	288	//____________________________________________________________________________
	289	void AliPHOSv4::MakeRecParticle(const Int_t modid, const TVector3 pos, AliPHOSFastRecParticle & rp)
	290	{
	291	// Modify the primary particle properties according
	292	// 1. the response function of PHOS
	293	// 2. the performance of the EMC+PPSD setup
	294
	295	Int_t type = MakeType( rp ) ;
	296	rp.SetType(type) ;
	297
	298
	299	// get the detected energy
	300
	301	TLorentzVector momentum ;
	302	rp.Momentum(momentum) ;
	303	Double_t kineticenergy = TMath::Sqrt( TMath::Power(momentum.E(), 2) - TMath::Power(rp.GetMass(), 2) ) ;
	304	Double_t modifiedkineticenergy = MakeEnergy(kineticenergy ) ;
	305	Double_t modifiedenergy = TMath::Sqrt( TMath::Power(modifiedkineticenergy, 2)
	306	+ TMath::Power( rp.GetMass(), 2) ) ;
	307
	308	// get the angle of incidence
	309
	310	Double_t incidencetheta = 90. * TMath::Pi() /180 - rp.Theta() ;
	311	Double_t incidencephi = ( 270 + fGeom->GetPHOSAngle(modid) ) * TMath::Pi() / 180. - rp.Phi() ;
	312
	313	// get the detected direction
	314
	315	TVector3 modifiedposition = MakePosition(kineticenergy, pos, incidencetheta, incidencephi) ;
	316	modifiedposition *= modifiedkineticenergy / modifiedposition.Mag() ;
	317
	318	// Set the modified 4-momentum of the reconstructed particle
319
320	rp.SetMomentum(modifiedposition.X(), modifiedposition.Y(), modifiedposition.Z(), modifiedenergy) ;
321
322	}
323
324	//____________________________________________________________________________
325	Int_t AliPHOSv4::MakeType(AliPHOSFastRecParticle & rp )
326	{
327	// Generate a particle type using the performance of the EMC+PPSD setup
328
329	Int_t rv = AliPHOSFastRecParticle::kUNDEFINED ;
330	Int_t charge = (Int_t)rp.GetPDG()->Charge() ;
331	Int_t test ;
332	Float_t ran ;
333	if ( charge != 0 && ( TMath::Abs(rp.GetPdgCode()) != 11 ) )
334	test = - 1 ;
335	else
336	test = rp.GetPdgCode() ;
337
338	switch (test) {
339
340	case 22: // it's a photon
341	ran = fRan.Rndm() ;
342	if ( ran <= 0.5 ) // 50 %
343	rv = AliPHOSFastRecParticle::kGAMMA ;
344	else {
345	ran = fRan.Rndm() ;
346	if( ran <= 0.9498 )
347	rv = AliPHOSFastRecParticle::kNEUTRALEM ;
348	else
349	rv = AliPHOSFastRecParticle::kNEUTRALHA ;
350	}
351	break ;
352
353	case 2112: // it's a neutron
354	ran = fRan.Rndm() ;
355	if ( ran <= 0.9998 )
356	rv = AliPHOSFastRecParticle::kNEUTRALHA ;
357	else
358	rv = AliPHOSFastRecParticle::kNEUTRALEM ;
359	break ;
360
361	case -2112: // it's a anti-neutron
362	ran = fRan.Rndm() ;
363	if ( ran <= 0.9984 )
364	rv = AliPHOSFastRecParticle::kNEUTRALHA ;
365	else
366	rv = AliPHOSFastRecParticle::kNEUTRALEM ;
367	break ;
368
369	case 11: // it's a electron
370	ran = fRan.Rndm() ;
371	if ( ran <= 0.9996 )
372	rv = AliPHOSFastRecParticle::kELECTRON ;
373	else
374	rv = AliPHOSFastRecParticle::kCHARGEDHA ;
375	break;
376
377	case -11: // it's a positon
378	ran = fRan.Rndm() ;
379	if ( ran <= 0.9996 )
380	rv = AliPHOSFastRecParticle::kELECTRON ;
381	else
382	rv = AliPHOSFastRecParticle::kCHARGEDHA ;
383	break;
384
385	case -1: // it's a charged
386	ran = fRan.Rndm() ;
387	if ( ran <= 0.9996 )
388	rv = AliPHOSFastRecParticle::kCHARGEDHA ;
389	else
390	rv = AliPHOSFastRecParticle::kGAMMA ;
391
392	break ;
393	}
394
395
396	return rv ;
397	}
398
399	//___________________________________________________________________________
400	void AliPHOSv4::ResetPoints()
401	{
402	// This overloads the method in AliDetector
403
404	ResetFastRecParticles() ;
405	}
406
407	//___________________________________________________________________________
408	void AliPHOSv4::ResetFastRecParticles()
409	{
410	// Resets the list of virtual reconstructed particles
411
412	if (fFastRecParticles)
413	fFastRecParticles->Clear() ;
414	fNRecParticles = 0 ;
415	}
416
417	//___________________________________________________________________________
418	void AliPHOSv4::SetBigBox(Int_t index, Float_t value)
419	{
420	// Set the size of the Box describing a PHOS module
421
422	switch (index) {
423	case 0:
424	fBigBoxX = value ;
425	break ;
426	case 1:
427	fBigBoxY = value ;
428	break ;
429	case 2:
430	fBigBoxZ = value ;
431	break ;
432	}
433
434	}
435
436	//____________________________________________________________________________
437	Double_t AliPHOSv4::SigmaE(Double_t energy)
438	{
439	// Calculates the energy dependent energy resolution
440
441	Double_t rv = -1 ;
442
443	rv = TMath::Sqrt( TMath::Power(fResPara1/energy, 2)
444	+ TMath::Power(fResPara2/TMath::Sqrt(energy), 2)
445	+ TMath::Power(fResPara3, 2) ) ;
446
447	return rv * energy ;
448	}
449
450	//____________________________________________________________________________
451	Double_t AliPHOSv4::SigmaP(Double_t energy, Int_t incidence)
452	{
453	// Calculates the energy dependent position resolution
454
455	Double_t paraA = fPosParaA0 + fPosParaA1 * incidence ;
456	Double_t paraB = fPosParaB0 + fPosParaB1 * incidence + fPosParaB2 * incidence * incidence ;
457
458	return ( paraA / TMath::Sqrt(energy) + paraB ) * 0.1 ; // in cm
459	}
460
461	//____________________________________________________________________________
462	void AliPHOSv4::StepManager(void)
463	{
464	// Only verifies if the particle reaches PHOS and stops the tracking
5cbba5aa	465
5f20d3fb	466	Int_t primary = gAlice->GetPrimary( gAlice->CurrentTrack() );
5cbba5aa	467
5f20d3fb	468	TLorentzVector lv ;
	469	gMC->TrackPosition(lv) ;
	470	TVector3 pos = lv.Vect() ;
	471	Int_t modid ;
	472	gMC->CurrentVolID(modid);
	473
2f04ed65	474	Float_t energy = gMC->Etot() ; //Total energy of current track
5cbba5aa	475
5cbba5aa	476	//Calculating mass of current particle
2f04ed65	477	TDatabasePDG * pdg = TDatabasePDG::Instance() ;
2f04ed65	478	TParticlePDG * partPDG = pdg->GetParticle(gMC->TrackPid()) ;
5cbba5aa	479	Float_t mass = partPDG->Mass() ;
5f20d3fb	480
2f04ed65	481	if(energy > mass){
	482	pos.SetMag(TMath::Sqrt(energyenergy-massmass)) ;
	483	TLorentzVector pTrack(pos, energy) ;
5cbba5aa	484
	485	TParticle * part = new TParticle(gMC->TrackPid(), 0,-1,-1,-1,-1, pTrack, lv) ;
	486
	487	AliPHOSFastRecParticle rp(*part) ;
	488	rp.SetPrimary(primary) ;
	489
	490	// Adds the response of PHOS to the particle
	491	MakeRecParticle(modid, pos, rp) ;
	492
	493	// add the `track' particle to the FastRecParticles list
5f20d3fb	494
5cbba5aa	495	AddRecParticle(rp) ;
5f20d3fb	496
5cbba5aa	497	part->Delete() ;
5cbba5aa	498	}
5f20d3fb	499	// stop the track as soon PHOS is reached
	500
	501	gMC->StopTrack() ;
	502
	503	}
	504