#include <G4PenelopeGammaConversionModel.hh>

Inheritance diagram for G4PenelopeGammaConversionModel:

Public Member Functions
	G4PenelopeGammaConversionModel (const G4ParticleDefinition *p=0, const G4String &processName="PenConversion")

virtual	~G4PenelopeGammaConversionModel ()

virtual void	Initialise (const G4ParticleDefinition *, const G4DataVector &)

virtual void	InitialiseLocal (const G4ParticleDefinition , G4VEmModel )

virtual G4double	ComputeCrossSectionPerAtom (const G4ParticleDefinition *, G4double kinEnergy, G4double Z, G4double A=0, G4double cut=0, G4double emax=DBL_MAX)

virtual void	SampleSecondaries (std::vector< G4DynamicParticle * > , const G4MaterialCutsCouple , const G4DynamicParticle *, G4double tmin, G4double maxEnergy)

void	SetVerbosityLevel (G4int lev)

G4int	GetVerbosityLevel ()

Public Member Functions inherited from G4VEmModel
	G4VEmModel (const G4String &nam)

virtual	~G4VEmModel ()

virtual void	InitialiseForMaterial (const G4ParticleDefinition , const G4Material )

virtual void	InitialiseForElement (const G4ParticleDefinition *, G4int Z)

virtual G4double	ComputeDEDXPerVolume (const G4Material , const G4ParticleDefinition , G4double kineticEnergy, G4double cutEnergy=DBL_MAX)

virtual G4double	CrossSectionPerVolume (const G4Material , const G4ParticleDefinition , G4double kineticEnergy, G4double cutEnergy=0.0, G4double maxEnergy=DBL_MAX)

virtual G4double	ChargeSquareRatio (const G4Track &)

virtual G4double	GetChargeSquareRatio (const G4ParticleDefinition , const G4Material , G4double kineticEnergy)

virtual G4double	GetParticleCharge (const G4ParticleDefinition , const G4Material , G4double kineticEnergy)

virtual void	StartTracking (G4Track *)

virtual void	CorrectionsAlongStep (const G4MaterialCutsCouple , const G4DynamicParticle , G4double &eloss, G4double &niel, G4double length)

virtual G4double	Value (const G4MaterialCutsCouple , const G4ParticleDefinition , G4double kineticEnergy)

virtual G4double	MinPrimaryEnergy (const G4Material , const G4ParticleDefinition , G4double cut=0.0)

virtual G4double	MinEnergyCut (const G4ParticleDefinition , const G4MaterialCutsCouple )

virtual void	SetupForMaterial (const G4ParticleDefinition , const G4Material , G4double kineticEnergy)

virtual void	DefineForRegion (const G4Region *)

void	InitialiseElementSelectors (const G4ParticleDefinition *, const G4DataVector &)

std::vector < G4EmElementSelector * > *	GetElementSelectors ()

void	SetElementSelectors (std::vector< G4EmElementSelector * > *)

G4double	ComputeDEDX (const G4MaterialCutsCouple , const G4ParticleDefinition , G4double kineticEnergy, G4double cutEnergy=DBL_MAX)

G4double	CrossSection (const G4MaterialCutsCouple , const G4ParticleDefinition , G4double kineticEnergy, G4double cutEnergy=0.0, G4double maxEnergy=DBL_MAX)

G4double	ComputeMeanFreePath (const G4ParticleDefinition , G4double kineticEnergy, const G4Material , G4double cutEnergy=0.0, G4double maxEnergy=DBL_MAX)

G4double	ComputeCrossSectionPerAtom (const G4ParticleDefinition , const G4Element , G4double kinEnergy, G4double cutEnergy=0.0, G4double maxEnergy=DBL_MAX)

G4int	SelectIsotopeNumber (const G4Element *)

const G4Element *	SelectRandomAtom (const G4MaterialCutsCouple , const G4ParticleDefinition , G4double kineticEnergy, G4double cutEnergy=0.0, G4double maxEnergy=DBL_MAX)

const G4Element *	SelectRandomAtom (const G4Material , const G4ParticleDefinition , G4double kineticEnergy, G4double cutEnergy=0.0, G4double maxEnergy=DBL_MAX)

G4int	SelectRandomAtomNumber (const G4Material *)

void	SetParticleChange (G4VParticleChange , G4VEmFluctuationModel f=0)

void	SetCrossSectionTable (G4PhysicsTable *, G4bool isLocal)

G4ElementData *	GetElementData ()

G4PhysicsTable *	GetCrossSectionTable ()

G4VEmFluctuationModel *	GetModelOfFluctuations ()

G4VEmAngularDistribution *	GetAngularDistribution ()

void	SetAngularDistribution (G4VEmAngularDistribution *)

G4double	HighEnergyLimit () const

G4double	LowEnergyLimit () const

G4double	HighEnergyActivationLimit () const

G4double	LowEnergyActivationLimit () const

G4double	PolarAngleLimit () const

G4double	SecondaryThreshold () const

G4bool	LPMFlag () const

G4bool	DeexcitationFlag () const

G4bool	ForceBuildTableFlag () const

G4bool	UseAngularGeneratorFlag () const

void	SetAngularGeneratorFlag (G4bool)

void	SetHighEnergyLimit (G4double)

void	SetLowEnergyLimit (G4double)

void	SetActivationHighEnergyLimit (G4double)

void	SetActivationLowEnergyLimit (G4double)

G4bool	IsActive (G4double kinEnergy)

void	SetPolarAngleLimit (G4double)

void	SetSecondaryThreshold (G4double)

void	SetLPMFlag (G4bool val)

void	SetDeexcitationFlag (G4bool val)

void	SetForceBuildTable (G4bool val)

void	SetMasterThread (G4bool val)

G4bool	IsMaster () const

G4double	MaxSecondaryKinEnergy (const G4DynamicParticle *dynParticle)

const G4String &	GetName () const

void	SetCurrentCouple (const G4MaterialCutsCouple *)

const G4Element *	GetCurrentElement () const

Protected Attributes
G4ParticleChangeForGamma *	fParticleChange

const G4ParticleDefinition *	fParticle

Protected Attributes inherited from G4VEmModel
G4ElementData *	fElementData

G4VParticleChange *	pParticleChange

G4PhysicsTable *	xSectionTable

const std::vector< G4double > *	theDensityFactor

const std::vector< G4int > *	theDensityIdx

size_t	idxTable

Additional Inherited Members
Protected Member Functions inherited from G4VEmModel
G4ParticleChangeForLoss *	GetParticleChangeForLoss ()

G4ParticleChangeForGamma *	GetParticleChangeForGamma ()

virtual G4double	MaxSecondaryEnergy (const G4ParticleDefinition *, G4double kineticEnergy)

const G4MaterialCutsCouple *	CurrentCouple () const

void	SetCurrentElement (const G4Element *)

Detailed Description

Definition at line 57 of file G4PenelopeGammaConversionModel.hh.

Constructor & Destructor Documentation

G4PenelopeGammaConversionModel::G4PenelopeGammaConversionModel	(	const G4ParticleDefinition *	p = `0`,
		const G4String &	processName = `"PenConversion"`
	)

Definition at line 55 of file G4PenelopeGammaConversionModel.cc.

References python.hepunit::electron_mass_c2, python.hepunit::GeV, python.hepunit::MeV, and G4VEmModel::SetHighEnergyLimit().

   :G4VEmModel(nam),fParticleChange(0),fParticle(0),
    logAtomicCrossSection(0),
    fEffectiveCharge(0),fMaterialInvScreeningRadius(0),
    fScreeningFunction(0),isInitialised(false),fLocalTable(false)
 
 {  
   fIntrinsicLowEnergyLimit = 2.0*electron_mass_c2;
   fIntrinsicHighEnergyLimit = 100.0*GeV;
   fSmallEnergy = 1.1*MeV;
   
   InitializeScreeningRadii();
 
   if (part)
     SetParticle(part);
 
   //  SetLowEnergyLimit(fIntrinsicLowEnergyLimit);
   SetHighEnergyLimit(fIntrinsicHighEnergyLimit);
   //
   verboseLevel= 0;
   // Verbosity scale:
   // 0 = nothing 
   // 1 = warning for energy non-conservation 
   // 2 = details of energy budget
   // 3 = calculation of cross sections, file openings, sampling of atoms
   // 4 = entering in methods
 }

G4PenelopeGammaConversionModel::~G4PenelopeGammaConversionModel ( )

virtual

Definition at line 86 of file G4PenelopeGammaConversionModel.cc.

References G4VEmModel::IsMaster().

 {
   //Delete shared tables, they exist only in the master model
   if (IsMaster() || fLocalTable)
     {      
       if (logAtomicCrossSection)
     {
       /*
         std::map <G4int,G4PhysicsFreeVector*>::iterator i;
         for (i=logAtomicCrossSection->begin();i != logAtomicCrossSection->end();i++)
         if (i->second) delete i->second;
       */
       delete logAtomicCrossSection;
     }
       if (fEffectiveCharge)
     delete fEffectiveCharge;
       if (fMaterialInvScreeningRadius)
     delete fMaterialInvScreeningRadius;
       if (fScreeningFunction)
     delete fScreeningFunction;
     }
 }

Member Function Documentation

G4double G4PenelopeGammaConversionModel::ComputeCrossSectionPerAtom	(	const G4ParticleDefinition *	,
		G4double	kinEnergy,
		G4double	Z,
		G4double	A = `0`,
		G4double	cut = `0`,
		G4double	emax = `DBL_MAX`
	)

virtual

Reimplemented from G4VEmModel.

Definition at line 221 of file G4PenelopeGammaConversionModel.cc.

References python.hepunit::barn, G4cout, G4endl, G4Exception(), JustWarning, python.hepunit::MeV, G4TemplateAutoLock< M, L, U >::unlock(), and G4PhysicsVector::Value().

 {
   //
   // Penelope model v2008.
   // Cross section (including triplet production) read from database and managed 
   // through the G4CrossSectionHandler utility. Cross section data are from
   // M.J. Berger and J.H. Hubbel (XCOM), Report NBSIR 887-3598
   //
   
   if (energy < fIntrinsicLowEnergyLimit)
     return 0;
 
   G4int iZ = (G4int) Z;
  
   //Either Initialize() was not called, or we are in a slave and InitializeLocal() was 
   //not invoked
   if (!logAtomicCrossSection)
     {
       //create a **thread-local** version of the table. Used only for G4EmCalculator and 
       //Unit Tests
       fLocalTable = true;
       logAtomicCrossSection = new std::map<G4int,G4PhysicsFreeVector*>;
     }
   //now it should be ok
   if (!logAtomicCrossSection->count(iZ))
      {
        //If we are here, it means that Initialize() was inkoved, but the MaterialTable was 
        //not filled up. This can happen in a UnitTest or via G4EmCalculator
        if (verboseLevel > 0)
      {
        //Issue a G4Exception (warning) only in verbose mode
        G4ExceptionDescription ed;
        ed << "Unable to retrieve the cross section table for Z=" << iZ << G4endl;
        ed << "This can happen only in Unit Tests or via G4EmCalculator" << G4endl;   
        G4Exception("G4PenelopeGammaConversionModel::ComputeCrossSectionPerAtom()",
                "em2018",JustWarning,ed);
      }
        //protect file reading via autolock
        G4AutoLock lock(&PenelopeGammaConversionModelMutex);
        ReadDataFile(iZ);            
        lock.unlock();
      }
 
   G4double cs = 0;
   G4double logene = std::log(energy);
 
   G4PhysicsFreeVector* theVec = logAtomicCrossSection->find(iZ)->second;
 
   G4double logXS = theVec->Value(logene);
   cs = std::exp(logXS);
 
   if (verboseLevel > 2)
     G4cout << "Gamma conversion cross section at " << energy/MeV << " MeV for Z=" << Z << 
       " = " << cs/barn << " barn" << G4endl;
   return cs;
 }

G4int G4PenelopeGammaConversionModel::GetVerbosityLevel ( )

inline

Definition at line 84 of file G4PenelopeGammaConversionModel.hh.

84 {return verboseLevel;};

void G4PenelopeGammaConversionModel::Initialise	(	const G4ParticleDefinition *	part,
		const G4DataVector &
	)

virtual

Implements G4VEmModel.

Definition at line 112 of file G4PenelopeGammaConversionModel.cc.

References fParticle, fParticleChange, G4cout, G4endl, G4Material::GetElementVector(), G4MaterialCutsCouple::GetMaterial(), G4ProductionCutsTable::GetMaterialCutsCouple(), G4Material::GetNumberOfElements(), G4VEmModel::GetParticleChangeForGamma(), G4ProductionCutsTable::GetProductionCutsTable(), G4ProductionCutsTable::GetTableSize(), python.hepunit::GeV, G4VEmModel::HighEnergyLimit(), G4VEmModel::IsMaster(), G4VEmModel::LowEnergyLimit(), eplot::material, and python.hepunit::MeV.

 {
   if (verboseLevel > 3)
     G4cout << "Calling  G4PenelopeGammaConversionModel::Initialise()" << G4endl;
 
   SetParticle(part);
 
   //Only the master model creates/fills/destroys the tables
   if (IsMaster() && part == fParticle)
     {
       // logAtomicCrossSection is created only once, since it is never cleared
       if (!logAtomicCrossSection)
     logAtomicCrossSection =  new std::map<G4int,G4PhysicsFreeVector*>;
 
       //delete old material data...
       if (fEffectiveCharge)
     {
       delete fEffectiveCharge;
       fEffectiveCharge = 0;
     }
       if (fMaterialInvScreeningRadius)
     {
       delete fMaterialInvScreeningRadius;
       fMaterialInvScreeningRadius = 0;
     }
       if (fScreeningFunction)
     {
       delete fScreeningFunction;
       fScreeningFunction = 0;
     }      
       //and create new ones
       fEffectiveCharge = new std::map<const G4Material*,G4double>;
       fMaterialInvScreeningRadius = new std::map<const G4Material*,G4double>;
       fScreeningFunction = new std::map<const G4Material*,std::pair<G4double,G4double> >;
       
       G4ProductionCutsTable* theCoupleTable = 
     G4ProductionCutsTable::GetProductionCutsTable();
 
       for (size_t i=0;i<theCoupleTable->GetTableSize();i++)
     {
       const G4Material* material = 
         theCoupleTable->GetMaterialCutsCouple(i)->GetMaterial();
       const G4ElementVector* theElementVector = material->GetElementVector();
       
       for (size_t j=0;j<material->GetNumberOfElements();j++)
         {
           G4int iZ = (G4int) theElementVector->at(j)->GetZ();
           //read data files only in the master
           if (!logAtomicCrossSection->count(iZ))
         ReadDataFile(iZ);
         }
 
       //check if material data are available
       if (!fEffectiveCharge->count(material))
         InitializeScreeningFunctions(material); 
     }
 
 
       if (verboseLevel > 0) { 
     G4cout << "Penelope Gamma Conversion model v2008 is initialized " << G4endl
            << "Energy range: "
            << LowEnergyLimit() / MeV << " MeV - "
            << HighEnergyLimit() / GeV << " GeV"
            << G4endl;
       }
 
     }
 
 
   if(isInitialised) return;
   fParticleChange = GetParticleChangeForGamma();
   isInitialised = true;
 }

void G4PenelopeGammaConversionModel::InitialiseLocal	(	const G4ParticleDefinition *	part,
		G4VEmModel *	masterModel
	)

virtual

Reimplemented from G4VEmModel.

Definition at line 189 of file G4PenelopeGammaConversionModel.cc.

References fParticle, G4cout, and G4endl.

 {
   if (verboseLevel > 3)
     G4cout << "Calling  G4PenelopeGammaConversionModel::InitialiseLocal()" << G4endl;
 
   //
   //Check that particle matches: one might have multiple master models (e.g. 
   //for e+ and e-).
   //
   if (part == fParticle)
     {
       //Get the const table pointers from the master to the workers
       const G4PenelopeGammaConversionModel* theModel = 
     static_cast<G4PenelopeGammaConversionModel*> (masterModel);
       
       //Copy pointers to the data tables
       fEffectiveCharge = theModel->fEffectiveCharge;
       fMaterialInvScreeningRadius = theModel->fMaterialInvScreeningRadius;
       fScreeningFunction = theModel->fScreeningFunction;
       logAtomicCrossSection = theModel->logAtomicCrossSection;
       
       //Same verbosity for all workers, as the master
       verboseLevel = theModel->verboseLevel;
     }      
 
   return;
 }

void G4PenelopeGammaConversionModel::SampleSecondaries	(	std::vector< G4DynamicParticle * > *	fvect,
		const G4MaterialCutsCouple *	couple,
		const G4DynamicParticle *	aDynamicGamma,
		G4double	tmin,
		G4double	maxEnergy
	)

virtual

Implements G4VEmModel.

Definition at line 285 of file G4PenelopeGammaConversionModel.cc.

References G4InuclParticleNames::electron, G4Electron::Electron(), python.hepunit::electron_mass_c2, F00, python.hepunit::fine_structure_const, fParticleChange, fStopAndKill, G4cout, G4endl, G4Exception(), G4UniformRand, G4DynamicParticle::GetKineticEnergy(), G4MaterialCutsCouple::GetMaterial(), G4DynamicParticle::GetMomentumDirection(), G4Material::GetName(), JustWarning, python.hepunit::keV, G4INCL::Math::max(), G4InuclParticleNames::positron, G4Positron::Positron(), G4VParticleChange::ProposeLocalEnergyDeposit(), G4VParticleChange::ProposeTrackStatus(), CLHEP::Hep3Vector::rotateUz(), G4ParticleChangeForGamma::SetProposedKineticEnergy(), python.hepunit::twopi, and G4TemplateAutoLock< M, L, U >::unlock().

 {
   //
   // Penelope model v2008.
   // Final state is sampled according to the Bethe-Heitler model with Coulomb
   // corrections, according to the semi-empirical model of
   //  J. Baro' et al., Radiat. Phys. Chem. 44 (1994) 531.
   //
   // The model uses the high energy Coulomb correction from 
   //  H. Davies et al., Phys. Rev. 93 (1954) 788
   // and atomic screening radii tabulated from 
   //  J.H. Hubbel et al., J. Phys. Chem. Ref. Data 9 (1980) 1023
   // for Z= 1 to 92. 
   //
   if (verboseLevel > 3)
     G4cout << "Calling SamplingSecondaries() of G4PenelopeGammaConversionModel" << G4endl;
 
   G4double photonEnergy = aDynamicGamma->GetKineticEnergy();
 
   // Always kill primary
   fParticleChange->ProposeTrackStatus(fStopAndKill);
   fParticleChange->SetProposedKineticEnergy(0.);
 
   if (photonEnergy <= fIntrinsicLowEnergyLimit)
     {
       fParticleChange->ProposeLocalEnergyDeposit(photonEnergy);
       return ;
     }
 
   G4ParticleMomentum photonDirection = aDynamicGamma->GetMomentumDirection();
   const G4Material* mat = couple->GetMaterial();
 
   //Either Initialize() was not called, or we are in a slave and InitializeLocal() was 
   //not invoked
   if (!fEffectiveCharge)
     {
       //create a **thread-local** version of the table. Used only for G4EmCalculator and 
       //Unit Tests
       fLocalTable = true;    
       fEffectiveCharge = new std::map<const G4Material*,G4double>;
       fMaterialInvScreeningRadius = new std::map<const G4Material*,G4double>;
       fScreeningFunction = new std::map<const G4Material*,std::pair<G4double,G4double> >;
     }
 
   if (!fEffectiveCharge->count(mat))
     {
       //If we are here, it means that Initialize() was inkoved, but the MaterialTable was 
       //not filled up. This can happen in a UnitTest or via G4EmCalculator
       if (verboseLevel > 0)
     {
       //Issue a G4Exception (warning) only in verbose mode
       G4ExceptionDescription ed;
       ed << "Unable to allocate the EffectiveCharge data for " << 
         mat->GetName() << G4endl;
       ed << "This can happen only in Unit Tests" << G4endl;   
       G4Exception("G4PenelopeGammaConversionModel::SampleSecondaries()",
               "em2019",JustWarning,ed);
     }
       //protect file reading via autolock
       G4AutoLock lock(&PenelopeGammaConversionModelMutex);
       InitializeScreeningFunctions(mat);
       lock.unlock();
     }
 
   // eps is the fraction of the photon energy assigned to e- (including rest mass)
   G4double eps = 0;
   G4double eki = electron_mass_c2/photonEnergy;
 
   //Do it fast for photon energy < 1.1 MeV (close to threshold)
   if (photonEnergy < fSmallEnergy)
     eps = eki + (1.0-2.0*eki)*G4UniformRand();
   else
     {
       //Complete calculation
       G4double effC = fEffectiveCharge->find(mat)->second;
       G4double alz = effC*fine_structure_const;
       G4double T = std::sqrt(2.0*eki);
       G4double F00=(-1.774-1.210e1*alz+1.118e1*alz*alz)*T
          +(8.523+7.326e1*alz-4.441e1*alz*alz)*T*T
          -(1.352e1+1.211e2*alz-9.641e1*alz*alz)*T*T*T
     +(8.946+6.205e1*alz-6.341e1*alz*alz)*T*T*T*T;
      
       G4double F0b = fScreeningFunction->find(mat)->second.second;
       G4double g0 = F0b + F00;
       G4double invRad = fMaterialInvScreeningRadius->find(mat)->second;
       G4double bmin = 4.0*eki/invRad;
       std::pair<G4double,G4double> scree =  GetScreeningFunctions(bmin);
       G4double g1 = scree.first;
       G4double g2 = scree.second;
       G4double g1min = g1+g0;
       G4double g2min = g2+g0;
       G4double xr = 0.5-eki;
       G4double a1 = 2.*g1min*xr*xr/3.;      
       G4double p1 = a1/(a1+g2min);
 
       G4bool loopAgain = false;
       //Random sampling of eps
       do{
     loopAgain = false;
     if (G4UniformRand() <= p1)
       {
         G4double  ru2m1 = 2.0*G4UniformRand()-1.0;
         if (ru2m1 < 0)
           eps = 0.5-xr*std::pow(std::abs(ru2m1),1./3.);
         else
           eps = 0.5+xr*std::pow(ru2m1,1./3.);
         G4double B = eki/(invRad*eps*(1.0-eps));
         scree =  GetScreeningFunctions(B);
         g1 = scree.first;
         g1 = std::max(g1+g0,0.);
         if (G4UniformRand()*g1min > g1) 
           loopAgain = true;
       }
     else
       {
         eps = eki+2.0*xr*G4UniformRand();
         G4double B = eki/(invRad*eps*(1.0-eps));
         scree =  GetScreeningFunctions(B);
         g2 = scree.second;
         g2 = std::max(g2+g0,0.);
         if (G4UniformRand()*g2min > g2)
           loopAgain = true;
       }      
       }while(loopAgain);
       
     }
   if (verboseLevel > 4)
     G4cout << "Sampled eps = " << eps << G4endl;
 
   G4double electronTotEnergy = eps*photonEnergy;
   G4double positronTotEnergy = (1.0-eps)*photonEnergy;
   
   // Scattered electron (positron) angles. ( Z - axis along the parent photon)
 
   //electron kinematics
   G4double electronKineEnergy = std::max(0.,electronTotEnergy - electron_mass_c2) ; 
   G4double costheta_el = G4UniformRand()*2.0-1.0;
   G4double kk = std::sqrt(electronKineEnergy*(electronKineEnergy+2.*electron_mass_c2));
   costheta_el = (costheta_el*electronTotEnergy+kk)/(electronTotEnergy+costheta_el*kk);
   G4double phi_el  = twopi * G4UniformRand() ;
   G4double dirX_el = std::sqrt(1.-costheta_el*costheta_el) * std::cos(phi_el);
   G4double dirY_el = std::sqrt(1.-costheta_el*costheta_el) * std::sin(phi_el);
   G4double dirZ_el = costheta_el;
 
   //positron kinematics
   G4double positronKineEnergy = std::max(0.,positronTotEnergy - electron_mass_c2) ;
   G4double costheta_po = G4UniformRand()*2.0-1.0;
   kk = std::sqrt(positronKineEnergy*(positronKineEnergy+2.*electron_mass_c2));
   costheta_po = (costheta_po*positronTotEnergy+kk)/(positronTotEnergy+costheta_po*kk);
   G4double phi_po  = twopi * G4UniformRand() ;
   G4double dirX_po = std::sqrt(1.-costheta_po*costheta_po) * std::cos(phi_po);
   G4double dirY_po = std::sqrt(1.-costheta_po*costheta_po) * std::sin(phi_po);
   G4double dirZ_po = costheta_po;
 
   // Kinematics of the created pair:
   // the electron and positron are assumed to have a symetric angular
   // distribution with respect to the Z axis along the parent photon
   G4double localEnergyDeposit = 0. ;
  
   if (electronKineEnergy > 0.0)
     {
       G4ThreeVector electronDirection ( dirX_el, dirY_el, dirZ_el);
       electronDirection.rotateUz(photonDirection);
       G4DynamicParticle* electron = new G4DynamicParticle (G4Electron::Electron(),
                                electronDirection,
                                electronKineEnergy);
       fvect->push_back(electron);
     }
   else
     {
       localEnergyDeposit += electronKineEnergy;
       electronKineEnergy = 0;
     }
 
   //Generate the positron. Real particle in any case, because it will annihilate. If below
   //threshold, produce it at rest
   if (positronKineEnergy < 0.0)
     {
       localEnergyDeposit += positronKineEnergy;
       positronKineEnergy = 0; //produce it at rest
     }
   G4ThreeVector positronDirection(dirX_po,dirY_po,dirZ_po);
   positronDirection.rotateUz(photonDirection);
   G4DynamicParticle* positron = new G4DynamicParticle(G4Positron::Positron(),
                               positronDirection, positronKineEnergy);
   fvect->push_back(positron);
 
   //Add rest of energy to the local energy deposit
   fParticleChange->ProposeLocalEnergyDeposit(localEnergyDeposit);
   
   if (verboseLevel > 1)
     {
       G4cout << "-----------------------------------------------------------" << G4endl;
       G4cout << "Energy balance from G4PenelopeGammaConversion" << G4endl;
       G4cout << "Incoming photon energy: " << photonEnergy/keV << " keV" << G4endl;
       G4cout << "-----------------------------------------------------------" << G4endl;
       if (electronKineEnergy)
     G4cout << "Electron (explicitely produced) " << electronKineEnergy/keV << " keV" 
            << G4endl;
       if (positronKineEnergy)
     G4cout << "Positron (not at rest) " << positronKineEnergy/keV << " keV" << G4endl;
       G4cout << "Rest masses of e+/- " << 2.0*electron_mass_c2/keV << " keV" << G4endl;
       if (localEnergyDeposit)
     G4cout << "Local energy deposit " << localEnergyDeposit/keV << " keV" << G4endl;
       G4cout << "Total final state: " << (electronKineEnergy+positronKineEnergy+
                       localEnergyDeposit+2.0*electron_mass_c2)/keV <<
         " keV" << G4endl;
       G4cout << "-----------------------------------------------------------" << G4endl;
     }
  if (verboseLevel > 0)
     {
       G4double energyDiff = std::fabs(electronKineEnergy+positronKineEnergy+
                       localEnergyDeposit+2.0*electron_mass_c2-photonEnergy);
       if (energyDiff > 0.05*keV)
     G4cout << "Warning from G4PenelopeGammaConversion: problem with energy conservation: " 
            << (electronKineEnergy+positronKineEnergy+
            localEnergyDeposit+2.0*electron_mass_c2)/keV 
            << " keV (final) vs. " << photonEnergy/keV << " keV (initial)" << G4endl;
     } 
 }