[u/mrichter/AliRoot.git] / EMCAL / AliEMCALJetFinderInputSimPrep.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$ */

//_________________________________________________________________________
//  Class for JetFinder Input preparation from simulated data 
//
//*-- Author: Mark Horner (LBL/UCT)
//


#include "AliEMCALJetFinderInputSimPrep.h"

#include <TParticle.h>
#include <TParticlePDG.h>
#include <TPDGCode.h>
#include <TFile.h>
#include <TTree.h>
#include <TObjectTable.h>
#include <TMath.h>


#include "AliRun.h"
#include "AliMagF.h"
#include "AliEMCALFast.h"
#include "AliEMCAL.h"
#include "AliEMCALHit.h"
#include "AliEMCALGeometry.h"
#include "AliEMCALGetter.h"
#include "AliEMCALLoader.h"
#include "AliGenEventHeader.h"
#include "AliGenPythiaEventHeader.h"
#include "AliGenerator.h"
#include "AliHeader.h"
#include "AliMC.h"


ClassImp(AliEMCALJetFinderInputSimPrep)
	
AliEMCALJetFinderInputSimPrep::AliEMCALJetFinderInputSimPrep()
{
	// Default constructor
if (fDebug > 0) Info("AliEMCALJetFinderInputSimPrep","Beginning Constructor");	
  
  fDebug = 0;
  fSmearType = kSmearEffic;
  fEMCALType = kHits;
  fTrackType = kCharged;
  fEfficiency = 0.90;
  
}
AliEMCALJetFinderInputSimPrep::~AliEMCALJetFinderInputSimPrep()
{
if (fDebug > 0) Info("~AliEMCALJetFinderInputSimPrep","Beginning Destructor");	
	
}

void AliEMCALJetFinderInputSimPrep::Reset(AliEMCALJetFinderResetType_t resettype)
{
	// Method to reset data
if (fDebug > 1) Info("Reset","Beginning Reset");
	switch (resettype){

	case kResetData:
		fInputObject.Reset(resettype);
		break;
	case kResetTracks:
		fInputObject.Reset(resettype);
		break;
	case kResetDigits:
		fInputObject.Reset(resettype);
		break;
	case kResetParameters:
		fSmearType = kSmearEffic;
	       	fEMCALType = kHits;
		fTrackType = kCharged;
		break;
	case kResetAll:
		fSmearType = kSmearEffic;
	       	fEMCALType = kHits;
		fTrackType = kCharged;
		fInputObject.Reset(resettype);
		break;
	case kResetPartons:
	  Warning("FillFromFile", "kResetPartons not implemented") ; 
	  break;
	case kResetParticles:
	  Warning("FillFromFile", "kResetParticles not implemented") ; 
	  break;
	case kResetJets:
	  Warning("FillFromFile", "kResetJets not implemented") ; 
	  break;
	}// end switch

}

Int_t AliEMCALJetFinderInputSimPrep::FillFromFile(TString *filename, AliEMCALJetFinderFileType_t filetype,Int_t EventNumber)
{
if (fDebug > 1) Info("FillFromFile","Beginning FillFromFile");
   fFileType = filetype;	
   AliEMCALGetter *gime = AliEMCALGetter::Instance(filename->Data());
   if (fDebug > 1) Info("FillFromFile","Instantiated Getter with %s as the file",filename->Data());
   gime->Event(EventNumber,"XH") ;
   if (fDebug > 1) Info("FillFromFile","Got event %i with option \"XH\"",EventNumber);

   if (	fEMCALType == kHits ||
	fEMCALType == kTimeCut )  FillHits();
   if ( fTrackType != kNoTracks  )  FillTracks();	
   if ( fFileType  != kData){
	   FillPartons();
   }
/*   gime->EmcalLoader()->UnloadRecParticles();   
   gime->EmcalLoader()->UnloadTracks();   
   gime->Reset();*/
   return 0;	
}

void AliEMCALJetFinderInputSimPrep::FillHits()		
{
	// Fill from the hits to input object from simulation
if (fDebug > 1) Info("FillHits","Beginning FillHits");
	
// Access hit information
    AliEMCALHit *mHit;
//  AliEMCAL* pEMCAL = (AliEMCAL*) gAlice->GetModule("EMCAL");
//  Info("AliEMCALJetFinderInputSimPrep","Title of the geometry is %s",pEMCAL->GetTitle());
    AliEMCALGeometry* geom =  AliEMCALGetter::Instance()->EMCALGeometry();
    AliEMCALGetter *gime = AliEMCALGetter::Instance();
    
    //    TTree *treeH = AliEMCALGetter::Instance()->TreeH();
//    Int_t ntracks = (Int_t) treeH->GetEntries();
//
//   Loop over tracks
//
    Double_t etH = 0.0;

/*    for (Int_t track=0; track<ntracks;track++) {
        gAlice->ResetHits();
        nbytes += treeH->GetEvent(track);*/
//
//  Loop over hits
//
        for(Int_t i =0; i < gime->Hits()->GetEntries() ;i++)
        {
	    mHit = gime->Hit(i);	
                if (fEMCALType == kTimeCut && 
		    (mHit->GetTime()>fTimeCut) ) continue;
            Float_t x      =    mHit->X();         // x-pos of hit
            Float_t y      =    mHit->Y();         // y-pos
            Float_t z      =    mHit->Z();         // z-pos
            Float_t eloss  =    mHit->GetEnergy(); // deposited energy

            Float_t r      =    TMath::Sqrt(x*x+y*y);
            Float_t theta  =    TMath::ATan2(r,z);
            Float_t eta    =   -TMath::Log(TMath::Tan(theta/2.));
            Float_t phi    =    TMath::ATan2(y,x);
            etH = eloss*TMath::Sin(theta);
	    if (fDebug > 10) Info("FillHits","Values of hit energy %i",Int_t(1e7*etH));
	    if (geom->TowerIndexFromEtaPhi(eta,180.0/TMath::Pi()*phi) == -1) 
	    {
		    if (fDebug >5)  
		    {
			    Error("FillHits","Hit not inside EMCAL!");
			    mHit->Dump();
		    }
		    continue;
	    }
            fInputObject.AddEnergyToDigit(geom->TowerIndexFromEtaPhi(eta,180.0/TMath::Pi()*phi)-1,Int_t(1e7*etH));
        } // Hit Loop
//    } // Track Loop


}
void AliEMCALJetFinderInputSimPrep::FillTracks()	
{
	// Fill from particles simulating a TPC to input object from simulation

    if (fDebug > 1) Info("FillTracks","Beginning FillTracks");
	
    TParticlePDG* pdgP = 0;
    TParticle *mPart;
    Int_t npart = (gAlice->GetHeader())->GetNprimary();
    if (fDebug > 1) Info("FillTracks","Header says there are %i primaries",npart);
    //AliEMCALGetter *gime = AliEMCALGetter::Instance();
    Float_t bfield,rEMCAL;		 
/*	for (Int_t i =0; i<gime->NPrimaries(); i++)
	{
		cout<<gime->Primary(i)->GetFirstMother()<<endl;
		if (gime->Primary(i)->GetFirstMother() == -1) {
			counterforus++;
			gime->Primary(i)->Dump();
		}
	}*/
    
    if (fDebug > 1) Info("FillTracks","Defining the geometry");
    
    AliEMCAL* pEMCAL = (AliEMCAL*) gAlice->GetModule("EMCAL");
    AliEMCALGeometry* geom =  AliEMCALGeometry::GetInstance(pEMCAL->GetTitle(), "");
    fEtaMax = geom->GetArm1EtaMax();
    fEtaMin = geom->GetArm1EtaMin();
    fPhiMax = TMath::Pi()/180.0*geom->GetArm1PhiMax();
    fPhiMin = TMath::Pi()/180.0*geom->GetArm1PhiMin();

    if (fDebug > 1) Info("FillTracks","Starting particle loop");
	    
    if (fDebug > 1) Info("FillTracks","Particle loop of %i",npart);
    for (Int_t part = 0; part < npart; part++) {
	mPart = gAlice->GetMCApp()->Particle(part);
	//if (part%10) gObjectTable->Print();
	pdgP = mPart->GetPDG();

	if (fDebug > 5) Info("FillTracks","Checking if track is a primary");
	
	if (fFileType == kPythia) {
	    if (mPart->GetStatusCode() != 1) continue;
	} else if (fFileType == kHijing) {
	    if (mPart->GetFirstDaughter() >= 0 && mPart->GetFirstDaughter() < npart) continue;
	}
	
	if (fDebug > 15) Info("FillTracks","Checking if track (eta - %f, phi - %f) is in acceptance",mPart->Eta(),mPart->Phi());
	if (fDebug > 10) Info("FillTracks","Checking if EMCAL acceptance  ( %f < eta < %f, %f < phi < %f) is in acceptance",fEtaMin,fEtaMax,fPhiMin,fPhiMax);

	if ((!fPythiaComparison)&&(mPart->Eta() > fEtaMax || mPart->Eta() < fEtaMin))   continue;
	if ((!fPythiaComparison)&&(mPart->Phi() > fPhiMax || mPart->Phi() < fPhiMin))   continue;
	
/*
	{kProton, kProtonBar, kElectron, kPositron,
         kNuE, kNuEBar, kGamma, kNeutron, kNeutronBar,
         kMuonPlus, kMuonMinus, kK0Long , kPiPlus, kPiMinus,
         kKPlus, kKMinus, kLambda0, kLambda0Bar, kK0Short,
         kSigmaMinus, kSigmaPlus, kSigma0, kPi0, kK0, kK0Bar,
         0,kNuMu,kNuMuBar
*/

	if (fDebug > 15) Info("FillTracks","Checking if track is rejected");

	if ((fSmearType == kEfficiency 	||
             fSmearType == kSmearEffic)	&& 
 	     pdgP->Charge()!=0) {
	    if (AliEMCALFast::RandomReject(fEfficiency)) {
		continue;
            }
	}

   	bfield = gAlice->Field()->SolenoidField();
	rEMCAL = AliEMCALGeometry::GetInstance()->GetIPDistance();
	Float_t rB = 3335.6 * mPart->Pt() / bfield;  // [cm]  (case of |charge|=1)
	if (2.*rB < rEMCAL) continue;  // track curls away
	
	//if (part%10) gObjectTable->Print();
        switch(fTrackType)
        {

	   case kAll:  // All Stable particles to be included
		if (fDebug > 5) Info("FillTracks","Storing track");
		if (fSmearType == kSmear ||
		    fSmearType == kSmearEffic ){
			Smear(mPart);/*
			TParticle *tmp = Smear(MPart);
			fInputObject.AddTrack(Smear(MPart));
			delete tmp;*/
		}else{
			fInputObject.AddTrack(*mPart);
		}
	   break;
	   case kEM:   // All Electromagnetic particles
		if (mPart->GetPdgCode() == kElectron  ||
                    mPart->GetPdgCode() == kMuonPlus  || 
                    mPart->GetPdgCode() == kMuonMinus ||
		    mPart->GetPdgCode() == kPositron ){
		      if (fDebug > 5) Info("FillTracks","Storing electron or positron");
	 	      if (fSmearType == kSmear ||
		            fSmearType == kSmearEffic ){
			      Smear(mPart);/*
 			      TParticle *tmp = Smear(MPart); 
 			      fInputObject.AddTrack(tmp);
 			      delete tmp;*/
		      }else{
		          fInputObject.AddTrack(*mPart);
		      }
		}
		if ( mPart->GetPdgCode() == kGamma ){ 
			fInputObject.AddTrack(*mPart);
			if (fDebug > 5) Info("FillTracks","Storing gamma");
		}
			
	   break;
           case kCharged: // All Particles with non-zero charge
		if (pdgP->Charge() != 0) {
			if (fDebug > 5) Info("FillTracks","Storing charged track");
			if (fSmearType == kSmear ||
	                    fSmearType == kSmearEffic ){
				Smear(mPart);/*
				TParticle *tmp = Smear(MPart);
    				fInputObject.AddTrack(tmp);
				delete tmp;*/
	                }else{
	                 fInputObject.AddTrack(*mPart);
	                }
		}
	   break;
	   case kNeutral: // All particles with no charge
		if (pdgP->Charge() == 0){ 
			fInputObject.AddTrack(*mPart);
			if (fDebug > 5) Info("FillTracks","Storing neutral");
		}
	   break;
	   case kHadron: //All hadrons
		if (mPart->GetPdgCode() != kElectron  &&
                    mPart->GetPdgCode() != kPositron  &&
                    mPart->GetPdgCode() != kMuonPlus  &&
                    mPart->GetPdgCode() != kMuonMinus &&
                    mPart->GetPdgCode() != kGamma ) 
		{
			if (fDebug > 5) Info("FillTracks","Storing hadron");
			if (pdgP->Charge() == 0){
		    	    fInputObject.AddTrack(*mPart);
			}else{
				if (fSmearType == kSmear ||
			            fSmearType == kSmearEffic ){
					Smear(mPart);/*
					TParticle *tmp = Smear(MPart);	
    					fInputObject.AddTrack(tmp);
					delete tmp;*/
			        }else{
			            fInputObject.AddTrack(*mPart);
			        }
			}
		}
	   break;
	   case kChargedHadron:  // only charged hadrons
		if (mPart->GetPdgCode() != kElectron  &&
                    mPart->GetPdgCode() != kPositron  &&
                    mPart->GetPdgCode() != kGamma     &&
                    mPart->GetPdgCode() != kMuonPlus  &&
                    mPart->GetPdgCode() != kMuonMinus &&
		    pdgP->Charge() 	!= 0   	   ){
			if (fDebug > 5) Info("FillTracks","Storing charged hadron");
		       	if (fSmearType == kSmear ||
		            fSmearType == kSmearEffic ){
				Smear(mPart);/*
				TParticle *tmp = Smear(MPart);
 				fInputObject.AddTrack(tmp);
				delete tmp;*/
		        }else{
		               fInputObject.AddTrack(*mPart);
		        }
		}
	   break;
	   case kNoTracks:
	   break;
	   default:
	   break;
	   delete mPart;
        }	//end of switch
//	Info("FillTracks","After Particle Storage");
	//if (part%10) gObjectTable->Print();

   }	//end of particle loop
   //gObjectTable->Print();	
}

void AliEMCALJetFinderInputSimPrep::FillPartons()	
{
	// Fill partons to
	// input object from simulation
if (fDebug > 1) Info("FillPartons","Beginning FillPartons");

  AliGenEventHeader* evHeader = ((AliHeader*)(gAlice->GetHeader()))->GenEventHeader();
  Float_t triggerJetValues[4];
  AliEMCALParton tempParton;
  
  if (fFileType == kPythia)
  {
	Int_t ntriggerjets = ((AliGenPythiaEventHeader*)evHeader)->NTriggerJets();
	if (fDebug > 1) Info("FillPartons","Number of trigger jets --> %i",ntriggerjets);
       	for (Int_t jetcounter = 0 ; jetcounter < ntriggerjets; jetcounter++){
      	((AliGenPythiaEventHeader*)evHeader)->TriggerJet(jetcounter,triggerJetValues);
       	TLorentzVector tempLParton;
       	tempLParton.SetPxPyPzE(triggerJetValues[0],triggerJetValues[1],triggerJetValues[2],triggerJetValues[3]);
	tempParton.SetEnergy(tempLParton.Energy());
	tempParton.SetEta(tempLParton.Eta());
	tempParton.SetPhi(tempLParton.Phi());
	FillPartonTracks(&tempParton);
	fInputObject.AddParton(&tempParton);
  	}
 	  
  }
}

void AliEMCALJetFinderInputSimPrep::FillParticles()		
{
	// Fill particles to input object from simulation
if (fDebug > 1) Info("FillParticles","Beginning FillParticles");

    Int_t npart = (gAlice->GetHeader())->GetNprimary();
    TParticlePDG* pdgP = 0;
 
    for (Int_t part = 0; part < npart; part++) {
	TParticle *mPart = gAlice->GetMCApp()->Particle(part);
	pdgP = mPart->GetPDG();
	
	if (fDebug > 10) Info("FillParticles","Checking if particle is a primary");
	
	if (fFileType == kPythia) {
	    if (mPart->GetStatusCode() != 1) continue;
	} else if (fFileType == kHijing) {
	    if (mPart->GetFirstDaughter() >= 0 && mPart->GetFirstDaughter() < npart) continue;
	}

	if (fDebug > 10) Info("FillParticles","Checking if particle is in acceptance");
	
	if ((!fPythiaComparison)&&(mPart->Eta() > fEtaMax || mPart->Eta() < fEtaMin))   continue;
	if ((!fPythiaComparison)&&(mPart->Phi() > fPhiMax || mPart->Phi() < fPhiMin))   continue;
	

/*
	{kProton, kProtonBar, kElectron, kPositron,
         kNuE, kNuEBar, kGamma, kNeutron, kNeutronBar,
         kMuonPlus, kMuonMinus, kK0Long , kPiPlus, kPiMinus,
         kKPlus, kKMinus, kLambda0, kLambda0Bar, kK0Short,
         kSigmaMinus, kSigmaPlus, kSigma0, kPi0, kK0, kK0Bar,
         0,kNuMu,kNuMuBar
*/
        switch(fTrackType)
        {

	   case kAll:  // All Stable particles to be included
		if (fDebug > 5) Info("FillParticles","Storing particle");
		fInputObject.AddParticle(mPart);
	   break;
	   case kEM:   // All Electromagnetic particles
		if (mPart->GetPdgCode() == kElectron ||
		    mPart->GetPdgCode() == kPositron ||
		    mPart->GetPdgCode() == kGamma){
			if (fDebug > 5) Info("FillParticles","Storing electromagnetic particle");
			fInputObject.AddParticle(mPart);
		}
	   break;
           case kCharged: // All Particles with non-zero charge
		if (pdgP->Charge() != 0) {
			if (fDebug > 5) Info("FillParticles","Storing charged particle");
   			fInputObject.AddParticle(mPart);
		}
	   break;
	   case kNeutral: // All particles with no charge
		if (pdgP->Charge() == 0){
			if (fDebug > 5) Info("FillParticles","Storing neutral particle");
		       	fInputObject.AddParticle(mPart);
		}
	   break;
	   case kHadron: //All hadrons
		if (mPart->GetPdgCode() != kElectron &&
                    mPart->GetPdgCode() != kPositron &&
                    mPart->GetPdgCode() != kGamma ) 
		{

		if (fDebug > 5) Info("FillParticles","Storing hadron");
		    fInputObject.AddParticle(mPart);
		}
	   break;
	   case kChargedHadron:  // only charged hadrons
		if (mPart->GetPdgCode() != kElectron &&
                    mPart->GetPdgCode() != kPositron &&
                    mPart->GetPdgCode() != kGamma    &&
		    pdgP->Charge() 	!= 0   	   ){
		if (fDebug > 5) Info("FillParticles","Storing charged hadron");
	               fInputObject.AddParticle(mPart);
		}
	   break;
	   case kNoTracks:
	   break;
	   default:
	   break;
        }	//end of switch
    }// end of loop over particles

}
void AliEMCALJetFinderInputSimPrep::FillDigits()  
{
	// Fill digits to input object

}

void AliEMCALJetFinderInputSimPrep::Smear(TParticle *particle)
{
	// Smear particle momentum
if (fDebug > 5) Info("Smear","Beginning Smear");

 	Float_t tmp = AliEMCALFast::SmearMomentum(1,particle->P());
	Float_t tmpt = (tmp/particle->P()) * particle->Pt();
	if (fDebug > 10) Info("Smear","Smearing changed P from %f to %f",particle->Pt(),tmpt);
	TLorentzVector tmpvector;
	tmpvector.SetPtEtaPhiM(tmpt,particle->Eta(), particle->Phi(), particle->GetMass());
// create a new particle with smearing momentum - and no daughter or parent information and the same
// vertex	

	TParticle tmparticle(particle->GetPdgCode(), 1, 0, 0,0,0, 
			tmpvector.Px()	, tmpvector.Py(), tmpvector.Pz(), tmpvector.Energy(), 
			particle->Vx(), particle->Vy(), particle->Vz(), particle->T());
	fInputObject.AddTrack(tmparticle);	
	return;
}

void AliEMCALJetFinderInputSimPrep::FillPartonTracks(AliEMCALParton *parton)
{
	// Populate parton tracks for input distributions
 	if (fDebug>1) Info("FillPartonTracks","Beginning FillPartonTracks");    
	Int_t npart = (gAlice->GetHeader())->GetNprimary();
	Int_t ntracks =0;
	TParticlePDG *getpdg;
	TParticle *tempPart;
	for (Int_t part = 0; part < npart; part++)
	{
		tempPart = gAlice->GetMCApp()->Particle(part);
		if (tempPart->GetStatusCode() != 1) continue;
		if ((!fPythiaComparison)&&(tempPart->Eta() > fEtaMax || tempPart->Eta() < fEtaMin || 
		    tempPart->Phi() > fPhiMax || tempPart->Phi() < fPhiMin) ){
		 	if (fDebug>10) Info("FillPartonTracks","Excluding particle not pointing at the EMCAL");    
			continue;
		}
		getpdg = tempPart->GetPDG();
		if (getpdg->Charge() == 0.0  ) { 
			if (fDebug>10) Info("FillPartonTracks","Excluding a neutral particle");
			continue;
		}
		if ( (parton->Eta() - tempPart->Eta())*(parton->Eta() - tempPart->Eta()) +
	     	(parton->Phi() - tempPart->Phi())*(parton->Phi() - tempPart->Phi()) < 1.0 ) ntracks++;
	}
	Float_t *energy = new Float_t[ntracks];
	Float_t *eta    = new Float_t[ntracks];
	Float_t *phi    = new Float_t[ntracks];
	Int_t   *pdg    = new Int_t[ntracks];
	ntracks=0;
	for (Int_t part = 0; part < npart; part++)
	{
		tempPart = gAlice->GetMCApp()->Particle(part);
		if (tempPart->GetStatusCode() != 1) continue;
		if ((!fPythiaComparison)&&(tempPart->Eta() > fEtaMax || tempPart->Eta() < fEtaMin ||
 		    tempPart->Phi() > fPhiMax || tempPart->Phi() < fPhiMin) ){ 
			if (fDebug>10) Info("FillPartonTracks","Excluding particle not pointing at the EMCAL");       
			continue;
		}
	    	if (tempPart->GetStatusCode() != 1) continue;
  		getpdg = tempPart->GetPDG();
		if (getpdg->Charge() == 0.0  ) {
			if (fDebug>10) Info("FillPartonTracks","Excluding a neutral particle");
			continue;
		}
		if (   (parton->Eta() - tempPart->Eta())*(parton->Eta() - tempPart->Eta()) +
	       	(parton->Phi() - tempPart->Phi())*(parton->Phi() - tempPart->Phi()) < 1.0 )
	       	{
	  		energy[ntracks] = tempPart->Pt();
	      		eta[ntracks] = tempPart->Eta();
		  	phi[ntracks] = tempPart->Phi();
	       		pdg[ntracks] = tempPart->GetPdgCode();
	  		ntracks++;
		}
	}
	parton->SetTrackList(ntracks,energy,eta,phi,pdg);
	delete[] energy;
	delete[] eta;
	delete[] phi;
	delete[] pdg;
}
Commit	Line	Data
f7d5860b	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
ee6b678f	17	/* $Id$ */
f7d5860b	18
	19	//_________________________________________________________________________
	20	// Class for JetFinder Input preparation from simulated data
	21	//
	22	//*-- Author: Mark Horner (LBL/UCT)
	23	//
	24
	25
	26
	27	#include "AliEMCALJetFinderInputSimPrep.h"
	28
	29	#include <TParticle.h>
	30	#include <TParticlePDG.h>
	31	#include <TPDGCode.h>
	32	#include <TFile.h>
	33	#include <TTree.h>
	34	#include <TObjectTable.h>
	35	#include <TMath.h>
	36
	37
	38	#include "AliRun.h"
	39	#include "AliMagF.h"
	40	#include "AliEMCALFast.h"
	41	#include "AliEMCAL.h"
	42	#include "AliEMCALHit.h"
	43	#include "AliEMCALGeometry.h"
	44	#include "AliEMCALGetter.h"
b3c7d6bc	45	#include "AliEMCALLoader.h"
f7d5860b	46	#include "AliGenEventHeader.h"
	47	#include "AliGenPythiaEventHeader.h"
	48	#include "AliGenerator.h"
	49	#include "AliHeader.h"
5d12ce38	50	#include "AliMC.h"
f7d5860b	51
f7d5860b	52
b3c7d6bc	53
f7d5860b	54	ClassImp(AliEMCALJetFinderInputSimPrep)
	55
	56	AliEMCALJetFinderInputSimPrep::AliEMCALJetFinderInputSimPrep()
	57	{
44f59d68	58	// Default constructor
f7d5860b	59	if (fDebug > 0) Info("AliEMCALJetFinderInputSimPrep","Beginning Constructor");
	60
	61	fDebug = 0;
	62	fSmearType = kSmearEffic;
	63	fEMCALType = kHits;
	64	fTrackType = kCharged;
	65	fEfficiency = 0.90;
	66
	67	}
	68	AliEMCALJetFinderInputSimPrep::~AliEMCALJetFinderInputSimPrep()
	69	{
	70	if (fDebug > 0) Info("~AliEMCALJetFinderInputSimPrep","Beginning Destructor");
	71
	72	}
	73
	74	void AliEMCALJetFinderInputSimPrep::Reset(AliEMCALJetFinderResetType_t resettype)
	75	{
44f59d68	76	// Method to reset data
f7d5860b	77	if (fDebug > 1) Info("Reset","Beginning Reset");
	78	switch (resettype){
	79
	80	case kResetData:
	81	fInputObject.Reset(resettype);
	82	break;
	83	case kResetTracks:
	84	fInputObject.Reset(resettype);
	85	break;
	86	case kResetDigits:
	87	fInputObject.Reset(resettype);
	88	break;
	89	case kResetParameters:
	90	fSmearType = kSmearEffic;
	91	fEMCALType = kHits;
	92	fTrackType = kCharged;
	93	break;
	94	case kResetAll:
	95	fSmearType = kSmearEffic;
	96	fEMCALType = kHits;
	97	fTrackType = kCharged;
	98	fInputObject.Reset(resettype);
	99	break;
	100	case kResetPartons:
	101	Warning("FillFromFile", "kResetPartons not implemented") ;
	102	break;
	103	case kResetParticles:
	104	Warning("FillFromFile", "kResetParticles not implemented") ;
	105	break;
	106	case kResetJets:
	107	Warning("FillFromFile", "kResetJets not implemented") ;
	108	break;
	109	}// end switch
	110
	111	}
	112
	113	Int_t AliEMCALJetFinderInputSimPrep::FillFromFile(TString *filename, AliEMCALJetFinderFileType_t filetype,Int_t EventNumber)
	114	{
f7d5860b	115	if (fDebug > 1) Info("FillFromFile","Beginning FillFromFile");
f7d5860b	116	fFileType = filetype;
f7d5860b	117	AliEMCALGetter *gime = AliEMCALGetter::Instance(filename->Data());
b3c7d6bc	118	if (fDebug > 1) Info("FillFromFile","Instantiated Getter with %s as the file",filename->Data());
	119	gime->Event(EventNumber,"XH") ;
	120	if (fDebug > 1) Info("FillFromFile","Got event %i with option \"XH\"",EventNumber);
	121
f7d5860b	122	if ( fEMCALType == kHits \|\|
	123	fEMCALType == kTimeCut ) FillHits();
	124	if ( fTrackType != kNoTracks ) FillTracks();
	125	if ( fFileType != kData){
	126	FillPartons();
f7d5860b	127	}
b3c7d6bc	128	/* gime->EmcalLoader()->UnloadRecParticles();
	129	gime->EmcalLoader()->UnloadTracks();
	130	gime->Reset();*/
f7d5860b	131	return 0;
	132	}
	133
44f59d68	134	void AliEMCALJetFinderInputSimPrep::FillHits()
f7d5860b	135	{
44f59d68	136	// Fill from the hits to input object from simulation
f7d5860b	137	if (fDebug > 1) Info("FillHits","Beginning FillHits");
	138
	139	// Access hit information
	140	AliEMCALHit *mHit;
b3c7d6bc	141	// AliEMCAL* pEMCAL = (AliEMCAL*) gAlice->GetModule("EMCAL");
b3c7d6bc	142	// Info("AliEMCALJetFinderInputSimPrep","Title of the geometry is %s",pEMCAL->GetTitle());
f7d5860b	143	AliEMCALGeometry* geom = AliEMCALGetter::Instance()->EMCALGeometry();
b3c7d6bc	144	AliEMCALGetter *gime = AliEMCALGetter::Instance();
	145
	146	// TTree *treeH = AliEMCALGetter::Instance()->TreeH();
	147	// Int_t ntracks = (Int_t) treeH->GetEntries();
f7d5860b	148	//
	149	// Loop over tracks
	150	//
f7d5860b	151	Double_t etH = 0.0;
f7d5860b	152
b3c7d6bc	153	/* for (Int_t track=0; track<ntracks;track++) {
f7d5860b	154	gAlice->ResetHits();
b3c7d6bc	155	nbytes += treeH->GetEvent(track);*/
f7d5860b	156	//
	157	// Loop over hits
	158	//
b3c7d6bc	159	for(Int_t i =0; i < gime->Hits()->GetEntries() ;i++)
f7d5860b	160	{
b3c7d6bc	161	mHit = gime->Hit(i);
f7d5860b	162	if (fEMCALType == kTimeCut &&
	163	(mHit->GetTime()>fTimeCut) ) continue;
	164	Float_t x = mHit->X(); // x-pos of hit
	165	Float_t y = mHit->Y(); // y-pos
	166	Float_t z = mHit->Z(); // z-pos
	167	Float_t eloss = mHit->GetEnergy(); // deposited energy
	168
	169	Float_t r = TMath::Sqrt(xx+yy);
	170	Float_t theta = TMath::ATan2(r,z);
	171	Float_t eta = -TMath::Log(TMath::Tan(theta/2.));
	172	Float_t phi = TMath::ATan2(y,x);
5255a1ce	173	etH = eloss*TMath::Sin(theta);
f7d5860b	174	if (fDebug > 10) Info("FillHits","Values of hit energy %i",Int_t(1e7*etH));
	175	if (geom->TowerIndexFromEtaPhi(eta,180.0/TMath::Pi()*phi) == -1)
	176	{
	177	if (fDebug >5)
	178	{
	179	Error("FillHits","Hit not inside EMCAL!");
	180	mHit->Dump();
	181	}
	182	continue;
	183	}
	184	fInputObject.AddEnergyToDigit(geom->TowerIndexFromEtaPhi(eta,180.0/TMath::Pi()phi)-1,Int_t(1e7etH));
	185	} // Hit Loop
b3c7d6bc	186	// } // Track Loop
f7d5860b	187
	188
	189	}
44f59d68	190	void AliEMCALJetFinderInputSimPrep::FillTracks()
f7d5860b	191	{
44f59d68	192	// Fill from particles simulating a TPC to input object from simulation
f7d5860b	193
	194	if (fDebug > 1) Info("FillTracks","Beginning FillTracks");
	195
	196	TParticlePDG* pdgP = 0;
44f59d68	197	TParticle *mPart;
f7d5860b	198	Int_t npart = (gAlice->GetHeader())->GetNprimary();
b3c7d6bc	199	if (fDebug > 1) Info("FillTracks","Header says there are %i primaries",npart);
a7aa0166	200	//AliEMCALGetter *gime = AliEMCALGetter::Instance();
f7d5860b	201	Float_t bfield,rEMCAL;
b3c7d6bc	202	/* for (Int_t i =0; i<gime->NPrimaries(); i++)
	203	{
	204	cout<<gime->Primary(i)->GetFirstMother()<<endl;
	205	if (gime->Primary(i)->GetFirstMother() == -1) {
	206	counterforus++;
	207	gime->Primary(i)->Dump();
	208	}
	209	}*/
f7d5860b	210
	211	if (fDebug > 1) Info("FillTracks","Defining the geometry");
	212
	213	AliEMCAL* pEMCAL = (AliEMCAL*) gAlice->GetModule("EMCAL");
	214	AliEMCALGeometry* geom = AliEMCALGeometry::GetInstance(pEMCAL->GetTitle(), "");
	215	fEtaMax = geom->GetArm1EtaMax();
	216	fEtaMin = geom->GetArm1EtaMin();
	217	fPhiMax = TMath::Pi()/180.0*geom->GetArm1PhiMax();
	218	fPhiMin = TMath::Pi()/180.0*geom->GetArm1PhiMin();
	219
	220	if (fDebug > 1) Info("FillTracks","Starting particle loop");
	221
b3c7d6bc	222	if (fDebug > 1) Info("FillTracks","Particle loop of %i",npart);
f7d5860b	223	for (Int_t part = 0; part < npart; part++) {
44f59d68	224	mPart = gAlice->GetMCApp()->Particle(part);
f7d5860b	225	//if (part%10) gObjectTable->Print();
44f59d68	226	pdgP = mPart->GetPDG();
f7d5860b	227
	228	if (fDebug > 5) Info("FillTracks","Checking if track is a primary");
	229
	230	if (fFileType == kPythia) {
44f59d68	231	if (mPart->GetStatusCode() != 1) continue;
f7d5860b	232	} else if (fFileType == kHijing) {
44f59d68	233	if (mPart->GetFirstDaughter() >= 0 && mPart->GetFirstDaughter() < npart) continue;
f7d5860b	234	}
f7d5860b	235
44f59d68	236	if (fDebug > 15) Info("FillTracks","Checking if track (eta - %f, phi - %f) is in acceptance",mPart->Eta(),mPart->Phi());
f7d5860b	237	if (fDebug > 10) Info("FillTracks","Checking if EMCAL acceptance ( %f < eta < %f, %f < phi < %f) is in acceptance",fEtaMin,fEtaMax,fPhiMin,fPhiMax);
f7d5860b	238
b3c7d6bc	239	if ((!fPythiaComparison)&&(mPart->Eta() > fEtaMax \|\| mPart->Eta() < fEtaMin)) continue;
b3c7d6bc	240	if ((!fPythiaComparison)&&(mPart->Phi() > fPhiMax \|\| mPart->Phi() < fPhiMin)) continue;
f7d5860b	241
	242	/*
	243	{kProton, kProtonBar, kElectron, kPositron,
	244	kNuE, kNuEBar, kGamma, kNeutron, kNeutronBar,
	245	kMuonPlus, kMuonMinus, kK0Long , kPiPlus, kPiMinus,
	246	kKPlus, kKMinus, kLambda0, kLambda0Bar, kK0Short,
	247	kSigmaMinus, kSigmaPlus, kSigma0, kPi0, kK0, kK0Bar,
	248	0,kNuMu,kNuMuBar
	249	*/
	250
	251	if (fDebug > 15) Info("FillTracks","Checking if track is rejected");
	252
	253	if ((fSmearType == kEfficiency \|\|
	254	fSmearType == kSmearEffic) &&
	255	pdgP->Charge()!=0) {
	256	if (AliEMCALFast::RandomReject(fEfficiency)) {
	257	continue;
	258	}
	259	}
	260
	261	bfield = gAlice->Field()->SolenoidField();
	262	rEMCAL = AliEMCALGeometry::GetInstance()->GetIPDistance();
44f59d68	263	Float_t rB = 3335.6 * mPart->Pt() / bfield; // [cm] (case of \|charge\|=1)
f7d5860b	264	if (2.*rB < rEMCAL) continue; // track curls away
	265
	266	//if (part%10) gObjectTable->Print();
	267	switch(fTrackType)
	268	{
	269
	270	case kAll: // All Stable particles to be included
	271	if (fDebug > 5) Info("FillTracks","Storing track");
	272	if (fSmearType == kSmear \|\|
	273	fSmearType == kSmearEffic ){
44f59d68	274	Smear(mPart);/*
f7d5860b	275	TParticle *tmp = Smear(MPart);
	276	fInputObject.AddTrack(Smear(MPart));
	277	delete tmp;*/
	278	}else{
44f59d68	279	fInputObject.AddTrack(*mPart);
f7d5860b	280	}
	281	break;
	282	case kEM: // All Electromagnetic particles
44f59d68	283	if (mPart->GetPdgCode() == kElectron \|\|
	284	mPart->GetPdgCode() == kMuonPlus \|\|
	285	mPart->GetPdgCode() == kMuonMinus \|\|
	286	mPart->GetPdgCode() == kPositron ){
f7d5860b	287	if (fDebug > 5) Info("FillTracks","Storing electron or positron");
	288	if (fSmearType == kSmear \|\|
	289	fSmearType == kSmearEffic ){
44f59d68	290	Smear(mPart);/*
f7d5860b	291	TParticle *tmp = Smear(MPart);
	292	fInputObject.AddTrack(tmp);
	293	delete tmp;*/
	294	}else{
44f59d68	295	fInputObject.AddTrack(*mPart);
f7d5860b	296	}
f7d5860b	297	}
44f59d68	298	if ( mPart->GetPdgCode() == kGamma ){
44f59d68	299	fInputObject.AddTrack(*mPart);
f7d5860b	300	if (fDebug > 5) Info("FillTracks","Storing gamma");
	301	}
	302
	303	break;
	304	case kCharged: // All Particles with non-zero charge
	305	if (pdgP->Charge() != 0) {
	306	if (fDebug > 5) Info("FillTracks","Storing charged track");
	307	if (fSmearType == kSmear \|\|
	308	fSmearType == kSmearEffic ){
44f59d68	309	Smear(mPart);/*
f7d5860b	310	TParticle *tmp = Smear(MPart);
	311	fInputObject.AddTrack(tmp);
	312	delete tmp;*/
	313	}else{
44f59d68	314	fInputObject.AddTrack(*mPart);
f7d5860b	315	}
	316	}
	317	break;
	318	case kNeutral: // All particles with no charge
	319	if (pdgP->Charge() == 0){
44f59d68	320	fInputObject.AddTrack(*mPart);
f7d5860b	321	if (fDebug > 5) Info("FillTracks","Storing neutral");
	322	}
	323	break;
	324	case kHadron: //All hadrons
44f59d68	325	if (mPart->GetPdgCode() != kElectron &&
	326	mPart->GetPdgCode() != kPositron &&
	327	mPart->GetPdgCode() != kMuonPlus &&
	328	mPart->GetPdgCode() != kMuonMinus &&
	329	mPart->GetPdgCode() != kGamma )
f7d5860b	330	{
	331	if (fDebug > 5) Info("FillTracks","Storing hadron");
	332	if (pdgP->Charge() == 0){
44f59d68	333	fInputObject.AddTrack(*mPart);
f7d5860b	334	}else{
	335	if (fSmearType == kSmear \|\|
	336	fSmearType == kSmearEffic ){
44f59d68	337	Smear(mPart);/*
f7d5860b	338	TParticle *tmp = Smear(MPart);
	339	fInputObject.AddTrack(tmp);
	340	delete tmp;*/
	341	}else{
44f59d68	342	fInputObject.AddTrack(*mPart);
f7d5860b	343	}
	344	}
	345	}
	346	break;
	347	case kChargedHadron: // only charged hadrons
44f59d68	348	if (mPart->GetPdgCode() != kElectron &&
	349	mPart->GetPdgCode() != kPositron &&
	350	mPart->GetPdgCode() != kGamma &&
	351	mPart->GetPdgCode() != kMuonPlus &&
	352	mPart->GetPdgCode() != kMuonMinus &&
f7d5860b	353	pdgP->Charge() != 0 ){
	354	if (fDebug > 5) Info("FillTracks","Storing charged hadron");
	355	if (fSmearType == kSmear \|\|
	356	fSmearType == kSmearEffic ){
44f59d68	357	Smear(mPart);/*
f7d5860b	358	TParticle *tmp = Smear(MPart);
	359	fInputObject.AddTrack(tmp);
	360	delete tmp;*/
	361	}else{
44f59d68	362	fInputObject.AddTrack(*mPart);
f7d5860b	363	}
	364	}
	365	break;
	366	case kNoTracks:
	367	break;
	368	default:
	369	break;
44f59d68	370	delete mPart;
f7d5860b	371	} //end of switch
	372	// Info("FillTracks","After Particle Storage");
	373	//if (part%10) gObjectTable->Print();
	374
	375	} //end of particle loop
	376	//gObjectTable->Print();
	377	}
	378
44f59d68	379	void AliEMCALJetFinderInputSimPrep::FillPartons()
f7d5860b	380	{
44f59d68	381	// Fill partons to
44f59d68	382	// input object from simulation
f7d5860b	383	if (fDebug > 1) Info("FillPartons","Beginning FillPartons");
	384
	385	AliGenEventHeader* evHeader = ((AliHeader*)(gAlice->GetHeader()))->GenEventHeader();
	386	Float_t triggerJetValues[4];
	387	AliEMCALParton tempParton;
	388
	389	if (fFileType == kPythia)
	390	{
	391	Int_t ntriggerjets = ((AliGenPythiaEventHeader*)evHeader)->NTriggerJets();
	392	if (fDebug > 1) Info("FillPartons","Number of trigger jets --> %i",ntriggerjets);
	393	for (Int_t jetcounter = 0 ; jetcounter < ntriggerjets; jetcounter++){
	394	((AliGenPythiaEventHeader*)evHeader)->TriggerJet(jetcounter,triggerJetValues);
	395	TLorentzVector tempLParton;
	396	tempLParton.SetPxPyPzE(triggerJetValues[0],triggerJetValues[1],triggerJetValues[2],triggerJetValues[3]);
	397	tempParton.SetEnergy(tempLParton.Energy());
	398	tempParton.SetEta(tempLParton.Eta());
	399	tempParton.SetPhi(tempLParton.Phi());
	400	FillPartonTracks(&tempParton);
	401	fInputObject.AddParton(&tempParton);
	402	}
	403
	404	}
	405	}
	406
44f59d68	407	void AliEMCALJetFinderInputSimPrep::FillParticles()
f7d5860b	408	{
44f59d68	409	// Fill particles to input object from simulation
f7d5860b	410	if (fDebug > 1) Info("FillParticles","Beginning FillParticles");
	411
	412	Int_t npart = (gAlice->GetHeader())->GetNprimary();
	413	TParticlePDG* pdgP = 0;
	414
	415	for (Int_t part = 0; part < npart; part++) {
44f59d68	416	TParticle *mPart = gAlice->GetMCApp()->Particle(part);
44f59d68	417	pdgP = mPart->GetPDG();
f7d5860b	418
	419	if (fDebug > 10) Info("FillParticles","Checking if particle is a primary");
	420
	421	if (fFileType == kPythia) {
44f59d68	422	if (mPart->GetStatusCode() != 1) continue;
f7d5860b	423	} else if (fFileType == kHijing) {
44f59d68	424	if (mPart->GetFirstDaughter() >= 0 && mPart->GetFirstDaughter() < npart) continue;
f7d5860b	425	}
	426
	427	if (fDebug > 10) Info("FillParticles","Checking if particle is in acceptance");
	428
b3c7d6bc	429	if ((!fPythiaComparison)&&(mPart->Eta() > fEtaMax \|\| mPart->Eta() < fEtaMin)) continue;
b3c7d6bc	430	if ((!fPythiaComparison)&&(mPart->Phi() > fPhiMax \|\| mPart->Phi() < fPhiMin)) continue;
f7d5860b	431
	432
	433	/*
	434	{kProton, kProtonBar, kElectron, kPositron,
	435	kNuE, kNuEBar, kGamma, kNeutron, kNeutronBar,
	436	kMuonPlus, kMuonMinus, kK0Long , kPiPlus, kPiMinus,
	437	kKPlus, kKMinus, kLambda0, kLambda0Bar, kK0Short,
	438	kSigmaMinus, kSigmaPlus, kSigma0, kPi0, kK0, kK0Bar,
	439	0,kNuMu,kNuMuBar
	440	*/
	441	switch(fTrackType)
	442	{
	443
	444	case kAll: // All Stable particles to be included
	445	if (fDebug > 5) Info("FillParticles","Storing particle");
44f59d68	446	fInputObject.AddParticle(mPart);
f7d5860b	447	break;
f7d5860b	448	case kEM: // All Electromagnetic particles
44f59d68	449	if (mPart->GetPdgCode() == kElectron \|\|
	450	mPart->GetPdgCode() == kPositron \|\|
	451	mPart->GetPdgCode() == kGamma){
f7d5860b	452	if (fDebug > 5) Info("FillParticles","Storing electromagnetic particle");
44f59d68	453	fInputObject.AddParticle(mPart);
f7d5860b	454	}
	455	break;
	456	case kCharged: // All Particles with non-zero charge
	457	if (pdgP->Charge() != 0) {
	458	if (fDebug > 5) Info("FillParticles","Storing charged particle");
44f59d68	459	fInputObject.AddParticle(mPart);
f7d5860b	460	}
	461	break;
	462	case kNeutral: // All particles with no charge
	463	if (pdgP->Charge() == 0){
	464	if (fDebug > 5) Info("FillParticles","Storing neutral particle");
44f59d68	465	fInputObject.AddParticle(mPart);
f7d5860b	466	}
	467	break;
	468	case kHadron: //All hadrons
44f59d68	469	if (mPart->GetPdgCode() != kElectron &&
	470	mPart->GetPdgCode() != kPositron &&
	471	mPart->GetPdgCode() != kGamma )
f7d5860b	472	{
	473
	474	if (fDebug > 5) Info("FillParticles","Storing hadron");
44f59d68	475	fInputObject.AddParticle(mPart);
f7d5860b	476	}
	477	break;
	478	case kChargedHadron: // only charged hadrons
44f59d68	479	if (mPart->GetPdgCode() != kElectron &&
	480	mPart->GetPdgCode() != kPositron &&
	481	mPart->GetPdgCode() != kGamma &&
f7d5860b	482	pdgP->Charge() != 0 ){
f7d5860b	483	if (fDebug > 5) Info("FillParticles","Storing charged hadron");
44f59d68	484	fInputObject.AddParticle(mPart);
f7d5860b	485	}
	486	break;
	487	case kNoTracks:
	488	break;
	489	default:
	490	break;
	491	} //end of switch
	492	}// end of loop over particles
	493
	494	}
44f59d68	495	void AliEMCALJetFinderInputSimPrep::FillDigits()
f7d5860b	496	{
44f59d68	497	// Fill digits to input object
f7d5860b	498
	499	}
	500
	501	void AliEMCALJetFinderInputSimPrep::Smear(TParticle *particle)
	502	{
44f59d68	503	// Smear particle momentum
f7d5860b	504	if (fDebug > 5) Info("Smear","Beginning Smear");
	505
	506	Float_t tmp = AliEMCALFast::SmearMomentum(1,particle->P());
	507	Float_t tmpt = (tmp/particle->P()) * particle->Pt();
	508	if (fDebug > 10) Info("Smear","Smearing changed P from %f to %f",particle->Pt(),tmpt);
	509	TLorentzVector tmpvector;
	510	tmpvector.SetPtEtaPhiM(tmpt,particle->Eta(), particle->Phi(), particle->GetMass());
	511	// create a new particle with smearing momentum - and no daughter or parent information and the same
	512	// vertex
	513
	514	TParticle tmparticle(particle->GetPdgCode(), 1, 0, 0,0,0,
	515	tmpvector.Px() , tmpvector.Py(), tmpvector.Pz(), tmpvector.Energy(),
	516	particle->Vx(), particle->Vy(), particle->Vz(), particle->T());
	517	fInputObject.AddTrack(tmparticle);
	518	return;
	519	}
	520
	521	void AliEMCALJetFinderInputSimPrep::FillPartonTracks(AliEMCALParton *parton)
	522	{
44f59d68	523	// Populate parton tracks for input distributions
f7d5860b	524	if (fDebug>1) Info("FillPartonTracks","Beginning FillPartonTracks");
	525	Int_t npart = (gAlice->GetHeader())->GetNprimary();
	526	Int_t ntracks =0;
	527	TParticlePDG *getpdg;
	528	TParticle *tempPart;
	529	for (Int_t part = 0; part < npart; part++)
	530	{
5d12ce38	531	tempPart = gAlice->GetMCApp()->Particle(part);
f7d5860b	532	if (tempPart->GetStatusCode() != 1) continue;
b3c7d6bc	533	if ((!fPythiaComparison)&&(tempPart->Eta() > fEtaMax \|\| tempPart->Eta() < fEtaMin \|\|
b3c7d6bc	534	tempPart->Phi() > fPhiMax \|\| tempPart->Phi() < fPhiMin) ){
f7d5860b	535	if (fDebug>10) Info("FillPartonTracks","Excluding particle not pointing at the EMCAL");
	536	continue;
	537	}
	538	getpdg = tempPart->GetPDG();
	539	if (getpdg->Charge() == 0.0 ) {
	540	if (fDebug>10) Info("FillPartonTracks","Excluding a neutral particle");
	541	continue;
	542	}
	543	if ( (parton->Eta() - tempPart->Eta())*(parton->Eta() - tempPart->Eta()) +
	544	(parton->Phi() - tempPart->Phi())*(parton->Phi() - tempPart->Phi()) < 1.0 ) ntracks++;
	545	}
44f59d68	546	Float_t *energy = new Float_t[ntracks];
	547	Float_t *eta = new Float_t[ntracks];
	548	Float_t *phi = new Float_t[ntracks];
	549	Int_t *pdg = new Int_t[ntracks];
f7d5860b	550	ntracks=0;
	551	for (Int_t part = 0; part < npart; part++)
	552	{
5d12ce38	553	tempPart = gAlice->GetMCApp()->Particle(part);
f7d5860b	554	if (tempPart->GetStatusCode() != 1) continue;
b3c7d6bc	555	if ((!fPythiaComparison)&&(tempPart->Eta() > fEtaMax \|\| tempPart->Eta() < fEtaMin \|\|
b3c7d6bc	556	tempPart->Phi() > fPhiMax \|\| tempPart->Phi() < fPhiMin) ){
f7d5860b	557	if (fDebug>10) Info("FillPartonTracks","Excluding particle not pointing at the EMCAL");
	558	continue;
	559	}
	560	if (tempPart->GetStatusCode() != 1) continue;
	561	getpdg = tempPart->GetPDG();
	562	if (getpdg->Charge() == 0.0 ) {
	563	if (fDebug>10) Info("FillPartonTracks","Excluding a neutral particle");
	564	continue;
	565	}
	566	if ( (parton->Eta() - tempPart->Eta())*(parton->Eta() - tempPart->Eta()) +
	567	(parton->Phi() - tempPart->Phi())*(parton->Phi() - tempPart->Phi()) < 1.0 )
	568	{
44f59d68	569	energy[ntracks] = tempPart->Pt();
	570	eta[ntracks] = tempPart->Eta();
	571	phi[ntracks] = tempPart->Phi();
	572	pdg[ntracks] = tempPart->GetPdgCode();
f7d5860b	573	ntracks++;
	574	}
	575	}
44f59d68	576	parton->SetTrackList(ntracks,energy,eta,phi,pdg);
b3c7d6bc	577	delete[] energy;
	578	delete[] eta;
	579	delete[] phi;
	580	delete[] pdg;
f7d5860b	581	}
f7d5860b	582