lars/geant4
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Import Geant4 4.0.0 source tree

Browse Source
This commit is contained in:
Gabriele Cosmo
2016-06-08 16:18:25 +02:00
parent 36c080dca6
commit 921d3b1cda
3990 changed files with 185376 additions and 82884 deletions
Download Patch File Download Diff File Expand all files Collapse all files
source/processes/electromagnetic/standard/src/G4PolarizedComptonScattering.cc
+98 -114
View File
@@ -21,151 +21,133 @@
// ********************************************************************
//
//
// $Id: G4PolarizedComptonScattering.cc,v 1.4.4.1 2001/06/28 19:12:37 gunter Exp $
// GEANT4 tag $Name: $
// $Id: G4PolarizedComptonScattering.cc,v 1.8 2001/09/21 09:50:54 maire Exp $
// GEANT4 tag $Name: geant4-04-00 $
//
//
//---------- G4PolarizedComptonScattering physics process -------
//---------- G4PolarizedComptonScattering physics process ----------------------
// by Vicente Lara, March 1998
//
// --------------------------------------------------------------
// -----------------------------------------------------------------------------
// Corrections by Rui Curado da Silva (Nov. 2000)
// - Sampling of Phi
// - Depolarization probability
// - Depolarization probability
//
// 13-07-01, DoIt: suppression of production cut for the electron (mma)
// 20-09-01, DoIt: fminimalEnergy = 1*eV (mma)
//
// --------------------------------------------------------------
// -----------------------------------------------------------------------------
#include "G4PolarizedComptonScattering.hh"
#include "G4EnergyLossTables.hh"
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
// constructor
G4PolarizedComptonScattering::G4PolarizedComptonScattering(const G4String& processName)
: G4ComptonScattering (processName)
G4PolarizedComptonScattering::G4PolarizedComptonScattering(
const G4String& processName)
: G4ComptonScattering (processName)
{ }
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
G4VParticleChange* G4PolarizedComptonScattering::PostStepDoIt(const G4Track& aTrack,
const G4Step& aStep)
G4VParticleChange* G4PolarizedComptonScattering::PostStepDoIt(
const G4Track& aTrack,
const G4Step& aStep)
//
// The scattered gamma energy is sampled according to Klein - Nishina formula.
// The random number techniques of Butcher & Messel are used (Nuc Phys 20(1960),15).
// The random number techniques of Butcher & Messel are used
// (Nuc Phys 20(1960),15).
// GEANT4 internal units
//
// Note : Effects due to binding of atomic electrons are negliged.
{
aParticleChange.Initialize(aTrack);
G4Material* aMaterial = aTrack.GetMaterial();
const G4DynamicParticle* aDynamicGamma = aTrack.GetDynamicParticle();
G4ThreeVector GammaPolarization0 = aDynamicGamma->GetPolarization();
if (abs(GammaPolarization0.mag() - 1.e0) > 1.e-14)
G4ComptonScattering::PostStepDoIt(aTrack,aStep);
G4ComptonScattering::PostStepDoIt(aTrack,aStep);
G4double GammaEnergy0 = aDynamicGamma->GetKineticEnergy();
G4double E0_m = GammaEnergy0 / electron_mass_c2 ;
G4double E0_m = GammaEnergy0 / electron_mass_c2;
G4ParticleMomentum GammaDirection0 = aDynamicGamma->GetMomentumDirection();
//
// sample the energy rate of the scattered gamma
//
G4double epsilon, epsilonsq, onecost, sint2, greject ;
G4double epsilon, epsilonsq, onecost, sint2, greject;
G4double epsilon0 = 1./(1. + 2*E0_m) , epsilon0sq = epsilon0*epsilon0;
G4double alpha1 = - log(epsilon0) , alpha2 = 0.5*(1.- epsilon0sq);
do {
if ( alpha1/(alpha1+alpha2) > G4UniformRand() )
{ epsilon = exp(-alpha1*G4UniformRand()); // pow(epsilon0,G4UniformRand())
epsilonsq = epsilon*epsilon; }
if (alpha1/(alpha1+alpha2) > G4UniformRand())
{ epsilon = exp(-alpha1*G4UniformRand()); // epsilon0**r
epsilonsq = epsilon*epsilon; }
else {
epsilonsq = epsilon0sq + (1.- epsilon0sq)*G4UniformRand();
epsilon = sqrt(epsilonsq);
};
};
onecost = (1.- epsilon)/(epsilon*E0_m);
sint2 = onecost*(2.-onecost);
greject = 1. - epsilon*sint2/(1.+ epsilonsq);
} while (greject < G4UniformRand());
//
// Phi determination
//
G4double minimum=0., maximum=twopi, middle=0., resolution=0.001;
G4double Rand = G4UniformRand();
// ****************************************************
// Phi determination
// ****************************************************
G4double middle;
G4double maximum, minimum;
G4double resolution;
G4double Rand = G4UniformRand();
minimum = 0.;
middle = 0.;
maximum = twopi;
resolution = 0.001;
int j = 0;
while ((j < 100) && (abs(SetPhi(epsilon,sint2,middle,Rand)) > resolution))
int j = 0;
while ((j < 100) && (abs(SetPhi(epsilon,sint2,middle,Rand)) > resolution))
{
middle = (maximum + minimum)/2;
if (SetPhi(epsilon,sint2,middle,Rand)*SetPhi(epsilon,sint2,minimum,Rand)<0) {
maximum = middle;
} else {
minimum = middle;
middle = (maximum + minimum)/2;
if (SetPhi(epsilon,sint2,middle,Rand)*
SetPhi(epsilon,sint2,minimum,Rand)<0) maximum = middle;
else minimum = middle;
j++;
}
j++;
}
//
// scattered gamma angles. ( Z - axis along the parent gamma)
//
G4double cosTeta = 1. - onecost , sinTeta = sqrt (sint2);
G4double Phi = middle;
G4double dirx = sinTeta*cos(Phi) , diry = sinTeta*sin(Phi) , dirz = cosTeta ;
G4double dirx = sinTeta*cos(Phi), diry = sinTeta*sin(Phi), dirz = cosTeta;
//
// update G4VParticleChange for the scattered gamma
//
G4double GammaEnergy1 = epsilon*GammaEnergy0;
// New polarization
//
G4ThreeVector GammaPolarization1 = SetNewPolarization(epsilon,sint2,Phi,
cosTeta,
GammaPolarization0);
// Set new direction
G4ThreeVector GammaDirection1 ( dirx,diry,dirz );
// Change reference frame.
SystemOfRefChange(GammaDirection0,GammaDirection1,
GammaPolarization0,GammaPolarization1);
if (GammaEnergy1 > 0.)
G4double localEnergyDeposit = 0.;
if (GammaEnergy1 > fminimalEnergy)
{
aParticleChange.SetEnergyChange( GammaEnergy1 ) ;
aParticleChange.SetEnergyChange(GammaEnergy1);
}
else
{
{
localEnergyDeposit += GammaEnergy1;
aParticleChange.SetEnergyChange(0.) ;
aParticleChange.SetStatusChange(fStopAndKill);
}
@@ -173,63 +155,64 @@ while ((j < 100) && (abs(SetPhi(epsilon,sint2,middle,Rand)) > resolution))
//
// kinematic of the scattered electron
//
G4double ElecKineEnergy = GammaEnergy0 - GammaEnergy1 ;
G4double ElecKineEnergy = GammaEnergy0 - GammaEnergy1;
if((G4EnergyLossTables::GetRange(G4Electron::Electron(),
ElecKineEnergy,aMaterial)>aStep.GetPostStepPoint()->GetSafety())
||
(ElecKineEnergy >
(G4Electron::Electron()->GetCutsInEnergy())[aMaterial->GetIndex()]))
{
G4double ElecMomentum = sqrt(ElecKineEnergy*(ElecKineEnergy+2.*electron_mass_c2));
G4ThreeVector ElecDirection (
(GammaEnergy0*GammaDirection0 - GammaEnergy1*GammaDirection1)*(1./ElecMomentum) );
if (ElecKineEnergy > fminimalEnergy)
{
G4double ElecMomentum = sqrt(ElecKineEnergy*
(ElecKineEnergy+2.*electron_mass_c2));
G4ThreeVector ElecDirection (
(GammaEnergy0*GammaDirection0 - GammaEnergy1*GammaDirection1)
*(1./ElecMomentum));
// create G4DynamicParticle object for the electron.
G4DynamicParticle* aElectron= new G4DynamicParticle (G4Electron::Electron(),
ElecDirection, ElecKineEnergy) ;
aParticleChange.SetNumberOfSecondaries(1) ;
aParticleChange.AddSecondary( aElectron ) ;
aParticleChange.SetLocalEnergyDeposit (0.) ;
}
// create G4DynamicParticle object for the electron.
G4DynamicParticle* aElectron= new G4DynamicParticle (
G4Electron::Electron(),ElecDirection,ElecKineEnergy);
aParticleChange.SetNumberOfSecondaries(1);
aParticleChange.AddSecondary( aElectron );
}
else
{
aParticleChange.SetNumberOfSecondaries(0) ;
aParticleChange.SetLocalEnergyDeposit (ElecKineEnergy) ;
}
{
aParticleChange.SetNumberOfSecondaries(0);
localEnergyDeposit += ElecKineEnergy;
}
aParticleChange.SetLocalEnergyDeposit (localEnergyDeposit);
// Reset NbOfInteractionLengthLeft and return aParticleChange
return G4VDiscreteProcess::PostStepDoIt( aTrack, aStep);
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
G4double G4PolarizedComptonScattering::SetPhi(G4double EnergyRate,
G4double sinsqrth,
G4double phi,
G4double rand)
{
G4double cosphi = cos(phi), sinphi = sin(phi);
G4double PhiDetermination = ((twopi*rand - phi)*(EnergyRate + 1./EnergyRate - sinsqrth)) + (sinsqrth*sinphi*cosphi);
return PhiDetermination;
G4double cosphi = cos(phi), sinphi = sin(phi);
G4double PhiDetermination = ((twopi*rand - phi)
*(EnergyRate + 1./EnergyRate - sinsqrth))
+ (sinsqrth*sinphi*cosphi);
return PhiDetermination;
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
G4ThreeVector G4PolarizedComptonScattering::SetNewPolarization(G4double EnergyRate,
G4double sinsqrth,
G4double phi,
G4double costheta,
G4ThreeVector& GammaPolarization0)
G4ThreeVector G4PolarizedComptonScattering::SetNewPolarization(
G4double EnergyRate,
G4double sinsqrth,
G4double phi,
G4double costheta,
G4ThreeVector& GammaPolarization0)
{
G4double cosphi = cos(phi), sinphi = sin(phi);
// G4double ParallelIntensityPolar = EnergyRate + 1./EnergyRate + 2. - 4.*sinsqrth*cosphi*cosphi;
G4double ParallelIntensityPolar = EnergyRate + 1./EnergyRate - 2.*sinsqrth*cosphi*cosphi;
//// G4double ParallelIntensityPolar = EnergyRate + 1./EnergyRate
//// + 2. - 4.*sinsqrth*cosphi*cosphi;
G4double ParallelIntensityPolar = EnergyRate + 1./EnergyRate
- 2.*sinsqrth*cosphi*cosphi;
G4double PerpendiIntensityPolar = EnergyRate + 1./EnergyRate - 2.;
G4double PolarizationDegree = sqrt(sinsqrth*sinphi*sinphi + costheta*costheta);
G4double PolarizationDegree = sqrt(sinsqrth*sinphi*sinphi+costheta*costheta);
G4double sintheta = sqrt(sinsqrth);
G4ThreeVector GammaPolarization1;
@@ -254,7 +237,7 @@ G4ThreeVector G4PolarizedComptonScattering::SetNewPolarization(G4double EnergyRa
return GammaPolarization1;
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
void G4PolarizedComptonScattering::SystemOfRefChange(G4ThreeVector& Direction0,
G4ThreeVector& Direction1,
@@ -269,31 +252,32 @@ void G4PolarizedComptonScattering::SystemOfRefChange(G4ThreeVector& Direction0,
G4double cosPsi, sinPsi;
if (sinTeta0 != 0. ) {
if (sinTeta0 != 0. )
{
cosPsi = -Polarization0.z()/sinTeta0;
if (cosPhi0 != 0. ) {
sinPsi = (Polarization0.y() - cosTeta0*sinPhi0*cosPsi)/cosPhi0;
} else {
sinPsi = -Polarization0.x()/sinPhi0;
}
} else {
if (cosPhi0 != 0.)
sinPsi = (Polarization0.y() - cosTeta0*sinPhi0*cosPsi)/cosPhi0;
else sinPsi = -Polarization0.x()/sinPhi0;
}
else
{
cosPsi = Polarization0.x()/cosTeta0;
sinPsi = Polarization0.y();
}
}
G4double Psi = atan(sinPsi/cosPsi);
// Rotation along Z axe
Direction1.rotateZ(Psi);
//
Direction1.rotateUz(Direction0);
aParticleChange.SetMomentumChange( Direction1 ) ;
aParticleChange.SetMomentumChange(Direction1);
// 3 Euler angles rotation for scattered photon polarization
Polarization1.rotateZ(Psi);
Polarization1.rotateUz(Direction0);
aParticleChange.SetPolarizationChange( Polarization1 );
aParticleChange.SetPolarizationChange(Polarization1);
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......