#include <G4LowPAIH2O.hh>

Inheritance diagram for G4LowPAIH2O:

Public Member Functions
	G4LowPAIH2O (const G4ParticleDefinition *p=nullptr, const G4String &nam="lowpaih2o")
	~G4LowPAIH2O () override
G4LowPAIH2O &	operator= (const G4LowPAIH2O &right)=delete
	G4LowPAIH2O (const G4LowPAIH2O &)=delete
void	Initialise (const G4ParticleDefinition *, const G4DataVector &) override
void	InitialiseLocal (const G4ParticleDefinition , G4VEmModel masterModel) override
G4double	CrossSectionPerVolume (const G4Material , const G4ParticleDefinition , G4double kineticEnergy, G4double cutEnergy, G4double maxEnergy) override
G4double	CrossSectionPerAtom (const G4ParticleDefinition *, G4double kineticEnergy, G4double Z, G4double A, G4double cutEnergy, G4double maxEnergy)
virtual G4double	ComputeCrossSectionPerElectron (const G4ParticleDefinition *, G4double kineticEnergy, G4double cutEnergy, G4double maxEnergy)
void	SampleSecondaries (std::vector< G4DynamicParticle * > , const G4MaterialCutsCouple , const G4DynamicParticle *, G4double tmin, G4double maxEnergy) override
G4double	SampleFluctuations (const G4MaterialCutsCouple , const G4DynamicParticle , const G4double tcut, const G4double tmax, const G4double length, const G4double meanLoss) override
void	CorrectionsAlongStep (const G4Material , const G4ParticleDefinition , const G4double kinEnergy, const G4double cutEnergy, const G4double &length, G4double &eloss) override
G4double	Dispersion (const G4Material , const G4DynamicParticle , const G4double, const G4double, const G4double) override
G4double	ComputeMeanFreePath (const G4ParticleDefinition , G4double kineticEnergy, const G4Material , G4double cutEnergy=0.0, G4double maxEnergy=DBL_MAX)
void	Initialize ()
void	InitRuthELF ()
void	BuildPhysicsTable (const G4ParticleDefinition *pd)
void	BuildPrEnergyTable ()
void	BuildElEnergyTable ()
G4double	GetPrTransfer (G4double Tkin)
G4double	CorrectPrTransfer (G4double Tkin)
G4double	CorrectElTransfer (G4double Tkin)
G4double	GetElTransfer (G4double Tkin)
G4double	GetPrMFP (G4double Tkin)
G4double	GetPrdNdx (G4double Tkin)
G4double	GetElMFP (G4double Tkin)
G4double	GetEldNdx (G4double Tkin)
G4double	PrPAId2Ndxdw (G4double omega)
G4double	ElPAId2Ndxdw (G4double omega)
void	SetBe2 (G4double be2)
G4double	GetBe2 ()
void	SetOmega (G4double ww)
G4double	GetOmega ()
void	SetBias (G4double bb)
G4double	GetBias ()
G4double	GetElectronTmax (G4double Tkin)
G4double	GetProtonTmax (G4double Tkin)
G4double	GetSumELF (G4double energy)
G4double	GetSumRuth (G4double energy)
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	GetPartialCrossSection (const G4Material , G4int level, const G4ParticleDefinition , G4double kineticEnergy)
virtual G4double	ComputeCrossSectionPerAtom (const G4ParticleDefinition *, G4double kinEnergy, G4double Z, G4double A=0., G4double cutEnergy=0.0, G4double maxEnergy=DBL_MAX)
virtual G4double	ComputeCrossSectionPerShell (const G4ParticleDefinition *, G4int Z, G4int shellIdx, G4double kinEnergy, 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 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 *)
virtual void	FillNumberOfSecondaries (G4int &numberOfTriplets, G4int &numberOfRecoil)
virtual void	ModelDescription (std::ostream &outFile) const
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)
const G4Element *	SelectRandomAtom (const G4MaterialCutsCouple , const G4ParticleDefinition , G4double kineticEnergy, G4double cutEnergy=0.0, G4double maxEnergy=DBL_MAX)
const G4Element *	SelectTargetAtom (const G4MaterialCutsCouple , const G4ParticleDefinition , G4double kineticEnergy, G4double logKineticEnergy, 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)
const G4Element *	GetCurrentElement (const G4Material *mat=nullptr) const
G4int	SelectRandomAtomNumber (const G4Material *) const
const G4Isotope *	GetCurrentIsotope (const G4Element *elm=nullptr) const
G4int	SelectIsotopeNumber (const G4Element *) const
void	SetParticleChange (G4VParticleChange , G4VEmFluctuationModel f=nullptr)
void	SetCrossSectionTable (G4PhysicsTable *, G4bool isLocal)
G4ElementData *	GetElementData ()
G4PhysicsTable *	GetCrossSectionTable ()
G4VEmFluctuationModel *	GetModelOfFluctuations ()
G4VEmAngularDistribution *	GetAngularDistribution ()
G4VEmModel *	GetTripletModel ()
void	SetTripletModel (G4VEmModel *)
void	SetAngularDistribution (G4VEmAngularDistribution *)
G4double	HighEnergyLimit () const
G4double	LowEnergyLimit () const
G4double	HighEnergyActivationLimit () const
G4double	LowEnergyActivationLimit () const
G4double	PolarAngleLimit () const
G4double	SecondaryThreshold () 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) const
void	SetPolarAngleLimit (G4double)
void	SetSecondaryThreshold (G4double)
void	SetDeexcitationFlag (G4bool val)
void	SetForceBuildTable (G4bool val)
void	SetFluctuationFlag (G4bool val)
G4bool	IsMaster () const
void	SetUseBaseMaterials (G4bool val)
G4bool	UseBaseMaterials () const
G4double	MaxSecondaryKinEnergy (const G4DynamicParticle *dynParticle)
const G4String &	GetName () const
void	SetCurrentCouple (const G4MaterialCutsCouple *)
G4bool	IsLocked () const
void	SetLocked (G4bool)
void	SetLPMFlag (G4bool)
void	SetMasterThread (G4bool)
G4VEmModel &	operator= (const G4VEmModel &right)=delete
	G4VEmModel (const G4VEmModel &)=delete
Public Member Functions inherited from G4VEmFluctuationModel
	G4VEmFluctuationModel (const G4String &nam)
virtual	~G4VEmFluctuationModel ()
virtual void	InitialiseMe (const G4ParticleDefinition *)
virtual void	SetParticleAndCharge (const G4ParticleDefinition *, G4double q2)
const G4String &	GetName () const
G4VEmFluctuationModel &	operator= (const G4VEmFluctuationModel &right)=delete
	G4VEmFluctuationModel (const G4VEmFluctuationModel &)=delete

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 *)
Protected Attributes inherited from G4VEmModel
G4ElementData *	fElementData = nullptr
G4VParticleChange *	pParticleChange = nullptr
G4PhysicsTable *	xSectionTable = nullptr
const G4Material *	pBaseMaterial = nullptr
const std::vector< G4double > *	theDensityFactor = nullptr
const std::vector< G4int > *	theDensityIdx = nullptr
G4double	inveplus
G4double	pFactor = 1.0
std::size_t	currentCoupleIndex = 0
std::size_t	basedCoupleIndex = 0
G4bool	lossFlucFlag = true

Detailed Description

Definition at line 65 of file G4LowPAIH2O.hh.

Constructor & Destructor Documentation

◆ G4LowPAIH2O() [1/2]

G4LowPAIH2O::G4LowPAIH2O	(	const G4ParticleDefinition *	p = nullptr,
		const G4String &	nam = "lowpaih2o" )

explicit

Definition at line 73 of file G4LowPAIH2O.cc.

    : G4VEmModel(nam) , G4VEmFluctuationModel(nam)
{
  fCof  = fine_structure_const/hbarc/pi;
  fBeta = 0.5;
  fBe2  = fBeta*fBeta;
  fTkin = eV * 1.;
  fBias = 1.; // 
  G4NistManager* man = G4NistManager::Instance();
  fMat = man->FindOrBuildMaterial("G4_WATER");
  // (?)
  fElectronDensity   = fMat->GetElectronDensity();
  fNat = fMat->GetTotNbOfAtomsPerVolume();
  // G4cout<<"fNat = "<<fNat*cm3<<" 1/cm3"<<G4endl;
  fNel = fMat->GetTotNbOfElectPerVolume();
  // G4cout<<"fNel = "<<fNel*cm3<<" 1/cm3"<<G4endl;
  theElectron = G4Electron::Electron();
  theProton   = G4Proton::Proton();
  fParticleChange = nullptr;
  const G4DataVector cuts;
  
  if( IsMaster() )
  {
    InitialiseElementSelectors(p, cuts);
  }
  if(nullptr == fParticleChange)
  {
    fParticleChange = GetParticleChangeForLoss();
  }
  fTotBin = 200; //
  fBinTr  = 100;
  fBmin   = 1.e-3;
  fBmax   = 0.98; // gamma ~ 4 min of dE/dx
  
  fBetaVector = new G4PhysicsLogVector( fBmin, fBmax, fTotBin );
 
  fWmin = eV  * 0.1; //
  InitRuthELF();
  // BuildPhysicsTable(theProton);
  // BuildPhysicsTable(theElectron);
}

Referenced by BuildElEnergyTable(), BuildPrEnergyTable(), G4LowPAIH2O(), and operator=().

◆ ~G4LowPAIH2O()

G4LowPAIH2O::~G4LowPAIH2O ( )

override

Definition at line 120 of file G4LowPAIH2O.cc.

{
  if(fBetaVector) delete fBetaVector;
  if(fTransferVector) delete fTransferVector;
  if(fPrEnergyTable)
  {
    fPrEnergyTable->clearAndDestroy();
    delete fPrEnergyTable;
  }
  if(fElEnergyTable)
  {
    fElEnergyTable->clearAndDestroy();
    delete fElEnergyTable;
  }
}

◆ G4LowPAIH2O() [2/2]

G4LowPAIH2O::G4LowPAIH2O ( const G4LowPAIH2O & )

delete

Member Function Documentation

◆ BuildElEnergyTable()

void G4LowPAIH2O::BuildElEnergyTable ( )

Definition at line 504 of file G4LowPAIH2O.cc.

{
  // G4cout<<"G4LowPAIH2O::BuildElEnergyTable is called"<<G4endl<<G4endl;
  G4int iBeta(0), iTransfer(0);
  G4double be(0.), be2(0.), gg(1.);
  G4double tp(0.), sum(0.), tmp(0.), me = electron_mass_c2;
 
  G4Integrator<G4LowPAIH2O, G4double (G4LowPAIH2O::*)(G4double)> integral;
  fElEnergyTable = new G4PhysicsTable();
 
  for( iBeta = 0; iBeta < fTotBin; ++iBeta )  
  {
    be = fBetaVector->GetLowEdgeEnergy(iBeta);
    be2 = be*be;
    SetBe2(be2);
    gg = sqrt( 1./( 1. - be2 ) );
    tp = ( gg - 1.)*me;
    fWmax = GetElectronTmax(tp);
    if( fWmax <= fWmin ) fWmax = fWmin*1.01;
    fTransferVector = new G4PhysicsLogVector( fWmin, fWmax, fBinTr );
 
    sum = 0.;
    fTransferVector->PutValue( fBinTr-1, sum );
    
    for( iTransfer = fBinTr-2; iTransfer >= 0; --iTransfer)
    {
      tmp = integral.Legendre10( this, &G4LowPAIH2O::ElPAId2Ndxdw,
                 fTransferVector->GetLowEdgeEnergy(iTransfer),
                 fTransferVector->GetLowEdgeEnergy(iTransfer+1)
                   );
      
      sum += tmp; // *fCof/be2;
      
      fTransferVector->PutValue( iTransfer, sum );
    }
    fElEnergyTable->insertAt( iBeta, fTransferVector );
  }
  return;
}

Referenced by BuildPhysicsTable().

◆ BuildPhysicsTable()

void G4LowPAIH2O::BuildPhysicsTable ( const G4ParticleDefinition * pd )

Definition at line 200 of file G4LowPAIH2O.cc.

{
  if( pd == theProton )        BuildPrEnergyTable();
  else if( pd == theElectron ) BuildElEnergyTable();
  else G4cout<<" G4LowPAIH2O::BuildPhysicsTable is not applicable for "
         <<pd->GetParticleName()<<G4endl;
  return;
}

Referenced by Initialise(), and InitialiseLocal().

◆ BuildPrEnergyTable()

void G4LowPAIH2O::BuildPrEnergyTable ( )

Definition at line 255 of file G4LowPAIH2O.cc.

{
  // G4cout<<"G4LowPAIH2O::BuildPrEnergyTable is called"<<G4endl<<G4endl;
  G4int iBeta(0), iTransfer(0);
  G4double be(0.), be2(0.), gg(1.);
  G4double tp(0.), sum(0.), tmp(0.), mp = proton_mass_c2;
 
  G4Integrator<G4LowPAIH2O, G4double (G4LowPAIH2O::*)(G4double)> integral;
  fPrEnergyTable = new G4PhysicsTable();
 
  for( iBeta = 0; iBeta < fTotBin; ++iBeta )  
  {
    be = fBetaVector->GetLowEdgeEnergy(iBeta);
    be2 = be*be;
    SetBe2(be2);
    gg = sqrt( 1./( 1. - be2 ) );
    tp = ( gg - 1.)*mp;
    fWmax = GetProtonTmax(tp);
    if( fWmax <= fWmin ) fWmax = fWmin*1.01;
    fTransferVector = new G4PhysicsLogVector( fWmin, fWmax, fBinTr );
    fPrWmaxVector.push_back(fWmax);
    sum = 0.;
    fTransferVector->PutValue(fBinTr-1,sum);
    
    for( iTransfer = fBinTr-2; iTransfer >= 0; --iTransfer)
    {
      tmp = integral.Legendre10( this, &G4LowPAIH2O::PrPAId2Ndxdw,
                 fTransferVector->GetLowEdgeEnergy(iTransfer),
                 fTransferVector->GetLowEdgeEnergy(iTransfer+1)
                   );
      sum += tmp*fCof/be2;
      // G4cout<<sum*micrometer<<", ";
      fTransferVector->PutValue(iTransfer,sum);
    }
    fPrEnergyTable->insertAt(iBeta, fTransferVector);
  }
  return;
}

Referenced by BuildPhysicsTable().

◆ ComputeCrossSectionPerElectron()

G4double G4LowPAIH2O::ComputeCrossSectionPerElectron	(	const G4ParticleDefinition *	pd,
		G4double	kineticEnergy,
		G4double	cutEnergy,
		G4double	maxEnergy )

virtual

Definition at line 244 of file G4LowPAIH2O.cc.

{
  return CrossSectionPerVolume(nullptr, pd, Tkin, cutEnergy, maxEnergy)/fNel;
}

◆ ComputeMeanFreePath()

G4double G4LowPAIH2O::ComputeMeanFreePath	(	const G4ParticleDefinition *	pd,
		G4double	kineticEnergy,
		const G4Material *	,
		G4double	cutEnergy = 0.0,
		G4double	maxEnergy = DBL_MAX )

inline

Definition at line 247 of file G4LowPAIH2O.hh.

{
  G4double dndx(0.), mfp(DBL_MAX);
  
  if     ( pd == theProton )    dndx = GetPrdNdx(Tkin);
  else if( pd == theElectron )  dndx = GetEldNdx(Tkin);
  else                          return DBL_MAX;
 
  if( dndx > 0.) mfp = 1./dndx;
  else           mfp = DBL_MAX;
 
  mfp *= fBias; 
  return mfp;  
}

◆ CorrectElTransfer()

G4double G4LowPAIH2O::CorrectElTransfer ( G4double Tkin )

Definition at line 397 of file G4LowPAIH2O.cc.

{
  // tuning
  G4double Tref = eV * 70.; // 100.; //
  G4double T2   = Tref *  1.; //1.1; //
  G4double T1   = Tref * 1.; // 0.9; // 0.8; //
  G4double rat2 = Tkin/T2;
  G4double rat1 = T1/Tkin; // Tkin/T1; //
  G4double yy(0.);
  G4double kk = 0.6; // 0.55; //  0.22; // 
  if( Tkin >= T2 )     yy = kk/pow( rat2, 0.2); // 0.4); //
  else if( Tkin <= T1) yy = kk*pow( rat1, 0.9); // 0.75); //
  else                 yy = kk * 1.; //  1.2; //  1.1; // 
 
  return yy;
}

Referenced by GetElTransfer().

◆ CorrectionsAlongStep()

void G4LowPAIH2O::CorrectionsAlongStep	(	const G4Material *	,
		const G4ParticleDefinition *	pd,
		const G4double	kinEnergy,
		const G4double	cutEnergy,
		const G4double &	length,
		G4double &	eloss )

overridevirtual

Reimplemented from G4VEmModel.

Definition at line 787 of file G4LowPAIH2O.cc.

{
  G4double mfp(0.), sumW(0.);
  
  if     ( pd == theProton )    mfp = GetPrMFP(Tkin);
  else if( pd == theElectron )  mfp = GetElMFP(Tkin);
  else
  {
    eloss = 0.;
    return;
  }
  G4int NN = static_cast<G4int>(RandPoisson::shoot(length/mfp)); 
  
  if( pd == theProton )
  {
    for (G4int nn = 0; nn < NN; ++nn )
    {
      sumW += GetPrTransfer( Tkin );
    }
  }
  else // e-
  {
    for (G4int nn = 0; nn < NN; ++nn )
    {
      sumW += GetElTransfer( Tkin );
    }
  }
  if( sumW < Tkin ) eloss = sumW;
  else              eloss = Tkin;
  // G4cout<<eloss/eV<<".. ";
  fParticleChange->ProposeLocalEnergyDeposit(eloss);
  fParticleChange->SetProposedKineticEnergy(Tkin);
  return;
}

◆ CorrectPrTransfer()

G4double G4LowPAIH2O::CorrectPrTransfer ( G4double Tkin )

Definition at line 376 of file G4LowPAIH2O.cc.

{
  // tuning
  G4double Tref = keV * 100.; // 100.; //
  G4double T2   = Tref *  1.; //1.1; //
  G4double T1   = Tref * 1.; // 0.9; // 0.8; //
  G4double rat2 = Tkin/T2;
  G4double rat1 = Tkin/T1;
  G4double yy(0.);
  G4double kk = 0.22; // 0.24; //  
  if( Tkin >= T2 )     yy = kk/pow( rat2, 0.15); //
  else if( Tkin <= T1) yy = kk/pow( rat1, 0.75); //
  else                 yy = kk * 1.; //  1.2; //  1.1; // 
 
  return yy;
}

Referenced by GetPrTransfer().

◆ CrossSectionPerAtom()

G4double G4LowPAIH2O::CrossSectionPerAtom	(	const G4ParticleDefinition *	pd,
		G4double	kineticEnergy,
		G4double	Z,
		G4double	A,
		G4double	cutEnergy,
		G4double	maxEnergy )

Definition at line 232 of file G4LowPAIH2O.cc.

{
  return CrossSectionPerVolume(nullptr, pd, Tkin, cutEnergy, maxEnergy)/fNat;
}

◆ CrossSectionPerVolume()

G4double G4LowPAIH2O::CrossSectionPerVolume	(	const G4Material *	,
		const G4ParticleDefinition *	pd,
		G4double	kineticEnergy,
		G4double	cutEnergy,
		G4double	maxEnergy )

overridevirtual

Reimplemented from G4VEmModel.

Definition at line 213 of file G4LowPAIH2O.cc.

{
  G4double dNdx(0.);
  
  if( pd == theProton )        dNdx = GetPrdNdx( Tkin );
  else if( pd == theElectron ) dNdx = GetEldNdx( Tkin );
  else G4cout<<" G4LowPAIH2O::CrossSectionPerVolume is not applicable for "
         <<pd->GetParticleName()<<G4endl;
  dNdx /= fBias; //
 
  return dNdx;
}

Referenced by ComputeCrossSectionPerElectron(), and CrossSectionPerAtom().

◆ Dispersion()

G4double G4LowPAIH2O::Dispersion	(	const G4Material *	,
		const G4DynamicParticle *	,
		const G4double	,
		const G4double	,
		const G4double	)

inlineoverridevirtual

Implements G4VEmFluctuationModel.

Definition at line 124 of file G4LowPAIH2O.hh.

125 {return 0.;};

◆ ElPAId2Ndxdw()

G4double G4LowPAIH2O::ElPAId2Ndxdw ( G4double omega )

Definition at line 548 of file G4LowPAIH2O.cc.

{
  G4double be2  = GetBe2();
  omega *= 1.7; // tune from p to e-
  
  G4double elf  = GetSumELF(omega);
  G4double ruth = GetSumRuth(omega);
  G4double me   = electron_mass_c2;
  
  G4double d2Ndxdw = elf; // 0.; //
 
  d2Ndxdw *= log( 2*me*be2/omega );
  
  d2Ndxdw += ruth;
  
  d2Ndxdw *= fCof/be2;
 
  d2Ndxdw *= 1.3; // norm  to max exp
  
  return d2Ndxdw;
}

Referenced by BuildElEnergyTable().

◆ GetBe2()

G4double G4LowPAIH2O::GetBe2 ( )

inline

Definition at line 151 of file G4LowPAIH2O.hh.

151{ return fBe2; };

Referenced by ElPAId2Ndxdw(), and PrPAId2Ndxdw().

◆ GetBias()

G4double G4LowPAIH2O::GetBias ( )

inline

Definition at line 155 of file G4LowPAIH2O.hh.

155{ return fBias;};

◆ GetEldNdx()

G4double G4LowPAIH2O::GetEldNdx ( G4double Tkin )

Definition at line 460 of file G4LowPAIH2O.cc.

{
  // std::size_t
    G4int iBeta(0);
  G4double be(0.), be2(0.), gg(1.), me = electron_mass_c2;
  G4double rr1(0.), rr2(0.),  dndx(0.);
  gg  = 1. + Tkin/me;
  be2 = 1. - 1./gg/gg;
  if(be2 < 0.) be2 = 0.;
  be = sqrt(be2);
  for( iBeta = 0; iBeta < fTotBin; ++iBeta )  
  {
    if( be <= fBetaVector->GetLowEdgeEnergy(iBeta) ) break;
  }
  if (iBeta <= 0 )
  {
    dndx = (*(*fElEnergyTable)(0))(0);
  }
  else if (iBeta >= fTotBin-1)
  {
    dndx = (*(*fElEnergyTable)(fTotBin-1))(0);
  }
  else
  {
    rr1  = (*(*fElEnergyTable)(iBeta-1))(0); 
    rr2  = (*(*fElEnergyTable)(iBeta))(0);
    dndx = rr1 + ( rr2 - rr1 )*G4UniformRand();
  }
  return dndx;
}

Referenced by ComputeMeanFreePath(), CrossSectionPerVolume(), and GetElMFP().

◆ GetElectronTmax()

G4double G4LowPAIH2O::GetElectronTmax ( G4double Tkin )

Definition at line 831 of file G4LowPAIH2O.cc.

{
  fTkin = tt;
  return tt*0.5;
 
  // algorithm below is doing the same 
  /*  
  G4double tmax(0.), cof(1.);
  G4double mt = eV * 18.; // 32.; // 30.; // 50.; //
  G4double dt = eV * 10.; // 5.; // 20.; // 25.; //
 
  G4double lim1 = 0.5; // 0.6; //
  G4double lim2 = 1.; // 0.8; //
  G4double dlim = (lim2-lim1)*0.5;
 
  G4double xx = ( tt - mt )/dt;
 
  if( xx > 0.) tmax = tt*( lim1 + dlim*exp(-xx) );
  else         tmax = tt*( lim2 - dlim*exp(+xx) );
 
  dt = mt *0.5; // eV * 38.; // 27.; //
  
  if(tt > mt+dt) tmax = tt*0.5;
  else if (tt < mt-dt) tmax = tt;
  else
  {
    cof = 1. - (tt-mt+dt)*0.25/dt;
    tmax = tt*cof;
  }
  tmax = tt * 0.5; //
 
  if( tmax > tt ) tmax = tt;
  
  return tmax;
  */
}

Referenced by BuildElEnergyTable().

◆ GetElMFP()

G4double G4LowPAIH2O::GetElMFP ( G4double Tkin )

Definition at line 493 of file G4LowPAIH2O.cc.

{
  G4double dndx = GetEldNdx(Tkin);
  G4double mfp(0.);
  if( dndx > 0.) mfp = 1./dndx;
  else           mfp = DBL_MAX;  
  return mfp;
}

Referenced by CorrectionsAlongStep(), and SampleFluctuations().

◆ GetElTransfer()

G4double G4LowPAIH2O::GetElTransfer ( G4double Tkin )

Definition at line 572 of file G4LowPAIH2O.cc.

{
  // std::size_t
  G4int iBeta, iTransfer;
  G4double be(0.), be2(0.), gg(1.), me = electron_mass_c2;
  G4double rr1(0.), rr2(0.), tr1(0.), tr2(0.), transfer(0.);
  G4double mean1(0.), mean2(0.);
  gg  = 1. + Tkin/me;
  be2 = 1. - 1./gg/gg;
  if( be2 < 0.) be2 = 0.;
  be = sqrt(be2);
  
  for( iBeta = 0; iBeta < fTotBin; ++iBeta )  
  {
    if( be <= fBetaVector->GetLowEdgeEnergy(iBeta) ) break;
  }
  if (iBeta == 0 || iBeta == fTotBin-1)
  {
    rr1 = G4UniformRand()*(*(*fElEnergyTable)(iBeta))(0);
 
    for( iTransfer = fBinTr-2; iTransfer >= 0; --iTransfer)
    {
      if( (*(*fElEnergyTable)(iBeta))(iTransfer) >= rr1 ) break;
    }
    if( iTransfer == 0 || iTransfer == fBinTr-2 )
    {
      transfer = (*fElEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer);
    }
    else
    {
      tr1 = (*fElEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer-1); 
      tr2 = (*fElEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer);
      transfer = tr1 + (tr2-tr1)*G4UniformRand();
    }
  }
  else
  {
    rr1 = G4UniformRand()*(*(*fElEnergyTable)(iBeta-1))(0);
 
    for( iTransfer = fBinTr-2; iTransfer >= 0; --iTransfer)
    {
      if( (*(*fElEnergyTable)(iBeta-1))(iTransfer) >= rr1 ) break;
    }
    if( iTransfer == 0 || iTransfer == fBinTr-2 )
    {
      transfer = (*fElEnergyTable)(iBeta-1)->GetLowEdgeEnergy(iTransfer);
    }
    else
    {
      tr1 = (*fElEnergyTable)(iBeta-1)->GetLowEdgeEnergy(iTransfer-1); 
      tr2 = (*fElEnergyTable)(iBeta-1)->GetLowEdgeEnergy(iTransfer);
      mean1 = tr1 + (tr2-tr1)*G4UniformRand();
    }    
    rr2 = G4UniformRand()*(*(*fElEnergyTable)(iBeta))(0);
 
    for( iTransfer = fBinTr-2; iTransfer >= 0; --iTransfer)
    {
      if( (*(*fElEnergyTable)(iBeta))(iTransfer) >= rr2 ) break;
    }
    if( iTransfer == 0 || iTransfer == fBinTr-2 )
    {
      transfer = (*fElEnergyTable)(iBeta-1)->GetLowEdgeEnergy(iTransfer);
    }
    else
    {
      tr1 = (*fElEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer-1); 
      tr2 = (*fElEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer);
      mean2 = tr1 + (tr2-tr1)*G4UniformRand();
    }
    transfer = mean1 +(mean2-mean1)*G4UniformRand();
  }
  transfer *= CorrectElTransfer( Tkin );
  if( transfer < 0. ) return 0.;
  // G4cout<<transfer/eV<<" ";    
  return transfer;
}

Referenced by CorrectionsAlongStep(), SampleFluctuations(), and SampleSecondaries().

◆ GetOmega()

G4double G4LowPAIH2O::GetOmega ( )

inline

Definition at line 153 of file G4LowPAIH2O.hh.

153{ return fOmega;};

◆ GetPrdNdx()

G4double G4LowPAIH2O::GetPrdNdx ( G4double Tkin )

Definition at line 416 of file G4LowPAIH2O.cc.

{
  // std::size_t
    G4int iBeta(0);
  G4double be(0.), be2(0.), gg(1.), mp = proton_mass_c2;
  G4double rr1(0.), rr2(0.),  dndx(0.);
  gg  = 1. + Tkin/mp;
  be2 = 1. - 1./gg/gg;
  if(be2 < 0.) be2 = 0.;
  be = sqrt(be2);
  for( iBeta = 0; iBeta < fTotBin; ++iBeta )  
  {
    if( be <= fBetaVector->GetLowEdgeEnergy(iBeta) ) break;
  }
  if (iBeta <= 0 )
  {
    dndx = (*(*fPrEnergyTable)(0))(0);
  }
  else if (iBeta >= fTotBin-1)
  {
    dndx = (*(*fPrEnergyTable)(fTotBin-1))(0);
  }
  else
  {
    rr1 = (*(*fPrEnergyTable)(iBeta-1))(0); 
    rr2 = (*(*fPrEnergyTable)(iBeta))(0);
    dndx = rr1 +(rr2-rr1)*G4UniformRand();
  }
  return dndx;
}

Referenced by ComputeMeanFreePath(), CrossSectionPerVolume(), and GetPrMFP().

◆ GetPrMFP()

G4double G4LowPAIH2O::GetPrMFP ( G4double Tkin )

Definition at line 449 of file G4LowPAIH2O.cc.

{
  G4double dndx = GetPrdNdx(Tkin);
  G4double mfp(0.);
  if( dndx > 0.) mfp = 1./dndx;
  else           mfp = DBL_MAX;
  return mfp;
}

Referenced by CorrectionsAlongStep(), and SampleFluctuations().

◆ GetProtonTmax()

G4double G4LowPAIH2O::GetProtonTmax ( G4double Tkin )

Definition at line 870 of file G4LowPAIH2O.cc.

{
  G4double mp = proton_mass_c2;
  G4double Et = eV * 13.6; // 
  G4double tau      = Tkin/mp;
  G4double gamma    = tau + 1.0;
  G4double bg2      = tau*( tau + 2.0 );
  // G4double beta2    = bg2/(gamma*gamma);
  G4double me = electron_mass_c2;
  G4double rateMass = me/mp;
 
  if( Tkin < Et ) rateMass = 1.;
 
  G4double Tmax     = 2.0*me*bg2
                   /( 1. + 2.*gamma*rateMass + rateMass*rateMass );
 
  return Tmax;
}

Referenced by BuildPrEnergyTable().

◆ GetPrTransfer()

G4double G4LowPAIH2O::GetPrTransfer ( G4double Tkin )

Definition at line 296 of file G4LowPAIH2O.cc.

{
  // std::size_t
    G4int iBeta(0), iTransfer(0);
  G4double be(0.), be2(0.), gg(1.), mp = proton_mass_c2;
  G4double rr1(0.), rr2(0.), tr1(0.), tr2(0.), transfer(0.);
  G4double mean1(0.), mean2(0.);
  gg  = 1. + Tkin/mp;
  be2 = 1. - 1./gg/gg;
  if( be2 < 0. ) be2 = 0.;
  be = sqrt(be2);
  
  for( iBeta = 0; iBeta < fTotBin; ++iBeta )  
  {
    if( be <= fBetaVector->GetLowEdgeEnergy(iBeta) ) break;
  }
  if (iBeta == 0 || iBeta == fTotBin-1)
  {
    rr1 = G4UniformRand()*(*(*fPrEnergyTable)(iBeta))(0);
 
    for( iTransfer = fBinTr-2; iTransfer >= 0; --iTransfer)
    {
      if( (*(*fPrEnergyTable)(iBeta))(iTransfer) >= rr1 ) break;
    }
    if( iTransfer == 0 || iTransfer == fBinTr-2 )
    {
      transfer = (*fPrEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer);
    }
    else
    {
      tr1 = (*fPrEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer-1); 
      tr2 = (*fPrEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer);
      transfer = tr1 + (tr2-tr1)*G4UniformRand();
    }
  }
  else
  {
    rr1 = G4UniformRand()*(*(*fPrEnergyTable)(iBeta-1))(0);
 
    for( iTransfer = fBinTr-2; iTransfer >= 0; --iTransfer)
    {
      if( (*(*fPrEnergyTable)(iBeta-1))(iTransfer) >= rr1 ) break;
    }
    if( iTransfer == 0 || iTransfer == fBinTr-2 )
    {
      transfer = (*fPrEnergyTable)(iBeta-1)->GetLowEdgeEnergy(iTransfer);
    }
    else
    {
      tr1 = (*fPrEnergyTable)(iBeta-1)->GetLowEdgeEnergy(iTransfer-1); 
      tr2 = (*fPrEnergyTable)(iBeta-1)->GetLowEdgeEnergy(iTransfer);
      mean1 = tr1 + (tr2-tr1)*G4UniformRand();
    }    
    rr2 = G4UniformRand()*(*(*fPrEnergyTable)(iBeta))(0);
 
    for( iTransfer = fBinTr-2; iTransfer >= 0; --iTransfer)
    {
      if( (*(*fPrEnergyTable)(iBeta))(iTransfer) >= rr2 ) break;
    }
    if( iTransfer == 0 || iTransfer == fBinTr-2 )
    {
      transfer = (*fPrEnergyTable)(iBeta-1)->GetLowEdgeEnergy(iTransfer);
    }
    else
    {
      tr1 = (*fPrEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer-1); 
      tr2 = (*fPrEnergyTable)(iBeta)->GetLowEdgeEnergy(iTransfer);
      mean2 = tr1 + (tr2-tr1)*G4UniformRand();
    }
    transfer = mean1 + ( mean2 - mean1 )*G4UniformRand();
  }  
  transfer *= CorrectPrTransfer( Tkin );
  // G4cout<<transfer/eV<<" ";  
  return transfer;
}

Referenced by CorrectionsAlongStep(), SampleFluctuations(), and SampleSecondaries().

◆ GetSumELF()

G4double G4LowPAIH2O::GetSumELF ( G4double energy )

inline

Definition at line 210 of file G4LowPAIH2O.hh.

{
  G4double ee =  energy; // /CLHEP::eV;
  G4double elf(0.), y1(0.), y2(0.), x1(0.), x2(0.), aa(0.);
 
  std::size_t nlow = std::lower_bound( fEsum.begin(), fEsum.end(), ee ) - fEsum.begin();
 
  x1 = fEsum[nlow-1];
  x2 = fEsum[nlow];
  y1 = fELFsum[nlow-1];
  y2 = fELFsum[nlow];
  aa = (y2-y1)/(x2-x1);
  elf = y1 + aa*(ee-x1);  
  return elf;
}

Referenced by ElPAId2Ndxdw(), and PrPAId2Ndxdw().

◆ GetSumRuth()

G4double G4LowPAIH2O::GetSumRuth ( G4double energy )

inline

Definition at line 228 of file G4LowPAIH2O.hh.

{
  G4double ee =  energy; // /CLHEP::eV;
  G4double ruth(0.), y1(0.), y2(0.), x1(0.), x2(0.), aa(0.);
 
  std::size_t nlow = std::lower_bound( fEsum.begin(), fEsum.end(), ee ) - fEsum.begin();
 
  x1 = fEsum[nlow-1];
  x2 = fEsum[nlow];
  y1 = fRuthSum[nlow-1];
  y2 = fRuthSum[nlow];
  aa = (y2-y1)/(x2-x1);
  ruth = y1 + aa*(ee-x1);
  
  return ruth;
}

Referenced by ElPAId2Ndxdw(), and PrPAId2Ndxdw().

◆ Initialise()

void G4LowPAIH2O::Initialise	(	const G4ParticleDefinition *	pd,
		const G4DataVector &	)

overridevirtual

Implements G4VEmModel.

Definition at line 138 of file G4LowPAIH2O.cc.

{
  if(nullptr == fParticleChange)
  {
    fParticleChange = GetParticleChangeForLoss();
  }
  // InitRuthELF();
  BuildPhysicsTable( pd ); 
  return;
}

◆ InitialiseLocal()

void G4LowPAIH2O::InitialiseLocal	(	const G4ParticleDefinition *	pd,
		G4VEmModel *	masterModel )

overridevirtual

Reimplemented from G4VEmModel.

Definition at line 152 of file G4LowPAIH2O.cc.

{
  if(nullptr == fParticleChange)
  {
    fParticleChange = GetParticleChangeForLoss();
  }
  SetElementSelectors(masterModel->GetElementSelectors());
  BuildPhysicsTable( pd ); 
  return;
}

◆ Initialize()

void G4LowPAIH2O::Initialize ( )

Definition at line 166 of file G4LowPAIH2O.cc.

{ 
  if( nullptr == fParticleChange )
  {
    fParticleChange = GetParticleChangeForLoss();
  }
  return;
}

◆ InitRuthELF()

void G4LowPAIH2O::InitRuthELF ( )

Definition at line 179 of file G4LowPAIH2O.cc.

{
  G4int i(0), nn(0);
  G4double ee(0.), elf(0.), ruth(0.);
 
  nn = theBin;
 
  for( i = 0; i < nn; ++i )
  {
    ee   = theEsum[i];   
    elf  = theELFsum[i];
    ruth = theRuthSum[i];
    fEsum.push_back(ee);
    fELFsum.push_back(elf);
    fRuthSum.push_back(ruth);
  }
  G4cout<<G4endl;
}

Referenced by G4LowPAIH2O().

◆ operator=()

G4LowPAIH2O & G4LowPAIH2O::operator= ( const G4LowPAIH2O & right )

delete

◆ PrPAId2Ndxdw()

G4double G4LowPAIH2O::PrPAId2Ndxdw ( G4double omega )

Definition at line 651 of file G4LowPAIH2O.cc.

{
  G4double be2  = GetBe2();
  G4double elf  = GetSumELF(omega);
  G4double ruth = GetSumRuth(omega);
  G4double me   = electron_mass_c2;  
  G4double d2Ndxdw = elf;
 
  d2Ndxdw *= log( 2*me*be2/omega );
  
  d2Ndxdw += ruth;
  
  return d2Ndxdw;
}

Referenced by BuildPrEnergyTable().

◆ SampleFluctuations()

G4double G4LowPAIH2O::SampleFluctuations	(	const G4MaterialCutsCouple *	,
		const G4DynamicParticle *	dp,
		const G4double	tcut,
		const G4double	tmax,
		const G4double	length,
		const G4double	meanLoss )

overridevirtual

Implements G4VEmFluctuationModel.

Definition at line 729 of file G4LowPAIH2O.cc.

{
  G4double eloss(0.), mfp(0.), sumW(0.), sumL(0.), transfer(0.);
  G4double Tkin = dp->GetKineticEnergy();
  const G4ParticleDefinition* pd = dp->GetDefinition();
  
  if( pd != theProton &&  pd != theElectron)   
  {
    eloss = 0.;
    return eloss;
  }
  
  if( pd == theProton )
  {
    do
    {
      mfp      = GetPrMFP(Tkin);
      sumL    += RandExponential::shoot(mfp);
      transfer = GetPrTransfer(Tkin);
      sumW    += transfer;
      // nn++;
      if( Tkin >= transfer ) Tkin    -= transfer;
      else
      {
    transfer = Tkin;
    Tkin     = 0.;
      }
    }
    while( sumL <= length && Tkin >= keV * 0.01 ); //
  }
  else if( pd == theElectron ) // e-
  {
    do
    {
      mfp = GetElMFP(Tkin);
      sumL += RandExponential::shoot(mfp);
      transfer = GetElTransfer(Tkin);
      sumW += transfer;
      Tkin -= transfer;
    }
    while( sumL <= length && Tkin >= 0. );
  }
  eloss = sumW;
  if(eloss < 0.) { eloss = 0.; }
  fParticleChange->SetProposedKineticEnergy( Tkin ); 
  fParticleChange->ProposeLocalEnergyDeposit( eloss );
  // G4cout<<Tkin/MeV<<"/"<<eloss/eV<<"/"<<nn<<", ";
  
  return eloss;
}

◆ SampleSecondaries()

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

overridevirtual

Implements G4VEmModel.

Definition at line 668 of file G4LowPAIH2O.cc.

{
  G4double kineticEnergy = dp->GetKineticEnergy();
  const G4ParticleDefinition* pd = dp->GetDefinition();
 
  G4double deltaTkin(0.);
  if( pd == theProton )        deltaTkin = GetPrTransfer(kineticEnergy); 
  else if( pd == theElectron ) deltaTkin = GetElTransfer(kineticEnergy);
  else
  {
    G4cout<<" G4LowPAIH2O::SampleSecondaries is not applicable for "
         <<pd->GetParticleName()<<G4endl;
    return;
  }
  G4ThreeVector direction= dp->GetMomentumDirection();
  fMass = pd->GetPDGMass();
  G4double totalMomentum = sqrt( kineticEnergy*( kineticEnergy + 2.*fMass ) );
 
  if( !(deltaTkin <= 0.) && !(deltaTkin > 0))
  {
    G4cout<<"G4LowPAIH2O::SampleSecondaries; deltaTkin = "<<deltaTkin/keV
          <<" keV "<< " for Tkin(MeV)= " << kineticEnergy << G4endl;
    return;
  }
  if( deltaTkin < 0.)
  {
    G4cout<<deltaTkin/eV<<"-"<<kineticEnergy/MeV<<", ";
    return;
  }  
  if( kineticEnergy > deltaTkin) kineticEnergy -= deltaTkin;
  else
  {
    deltaTkin = kineticEnergy;
    kineticEnergy = 0.;
  }
  G4double momD = sqrt( deltaTkin*( deltaTkin + 2.*electron_mass_c2 ) );
  G4ThreeVector dirD = G4RandomDirection(); // low e- cloud
  
  G4ThreeVector dir = totalMomentum*direction - dirD*momD;
  direction = dir.unit();
  fParticleChange->SetProposedKineticEnergy(kineticEnergy);
  fParticleChange->SetProposedMomentumDirection(direction);
 
  if( deltaTkin < eV * 1.) // 10.) //
  {
    fParticleChange->ProposeLocalEnergyDeposit(deltaTkin);
  }
  else
  {
    auto deltaRay = new G4DynamicParticle( theElectron, dirD, deltaTkin ); 
    vdp->push_back( deltaRay );
  }
  return;
}

◆ SetBe2()

void G4LowPAIH2O::SetBe2 ( G4double be2 )

inline

Definition at line 150 of file G4LowPAIH2O.hh.

150{ fBe2 = be2; };

Referenced by BuildElEnergyTable(), and BuildPrEnergyTable().

◆ SetBias()

void G4LowPAIH2O::SetBias ( G4double bb )

inline

Definition at line 154 of file G4LowPAIH2O.hh.

154{ fBias = bb; };

◆ SetOmega()

void G4LowPAIH2O::SetOmega ( G4double ww )

inline

Definition at line 152 of file G4LowPAIH2O.hh.

152{ fOmega = ww; };

The documentation for this class was generated from the following files:

Public Member Functions

Additional Inherited Members

Detailed Description

Constructor & Destructor Documentation

◆ G4LowPAIH2O() [1/2]

◆ ~G4LowPAIH2O()

◆ G4LowPAIH2O() [2/2]

Member Function Documentation

◆ BuildElEnergyTable()

◆ BuildPhysicsTable()

◆ BuildPrEnergyTable()

◆ ComputeCrossSectionPerElectron()

◆ ComputeMeanFreePath()

◆ CorrectElTransfer()

◆ CorrectionsAlongStep()

◆ CorrectPrTransfer()

◆ CrossSectionPerAtom()

◆ CrossSectionPerVolume()

◆ Dispersion()

◆ ElPAId2Ndxdw()

◆ GetBe2()

◆ GetBias()

◆ GetEldNdx()

◆ GetElectronTmax()

◆ GetElMFP()

◆ GetElTransfer()

◆ GetOmega()

◆ GetPrdNdx()

◆ GetPrMFP()

◆ GetProtonTmax()

◆ GetPrTransfer()

◆ GetSumELF()

◆ GetSumRuth()

◆ Initialise()

◆ InitialiseLocal()

◆ Initialize()

◆ InitRuthELF()

◆ operator=()

◆ PrPAId2Ndxdw()

◆ SampleFluctuations()

◆ SampleSecondaries()

◆ SetBe2()

◆ SetBias()

◆ SetOmega()