Import Geant4 8.2.0 source tree
This commit is contained in:
@@ -24,14 +24,15 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
//
|
||||
// $Id: G4ChargeExchange.hh,v 1.2 2006/06/29 20:08:55 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-01 $
|
||||
// $Id: G4ChargeExchange.hh,v 1.3 2006/08/02 10:55:54 vnivanch Exp $
|
||||
// GEANT4 tag $Name: geant4-08-02 $
|
||||
//
|
||||
//
|
||||
// G4 Model: Charge and strangness exchange based on G4LightMedia model
|
||||
// 28 May 2006 V.Ivanchenko
|
||||
//
|
||||
// Modified:
|
||||
// 25-Jul-06 V.Ivanchenko add 19 MeV low energy, below which S-wave is sampled
|
||||
//
|
||||
//
|
||||
|
||||
@@ -58,7 +59,6 @@ public:
|
||||
|
||||
G4ChargeExchange(G4HadronElastic* hel = 0,
|
||||
G4double elim = 100.*keV,
|
||||
G4double plow = 200.*MeV,
|
||||
G4double ehigh= GeV);
|
||||
|
||||
virtual ~G4ChargeExchange();
|
||||
@@ -67,7 +67,7 @@ public:
|
||||
const G4HadProjectile & aTrack,
|
||||
G4Nucleus & targetNucleus);
|
||||
|
||||
void SetMomentumLow(G4double value);
|
||||
void SetKinEnergyLow(G4double value);
|
||||
|
||||
void SetKinEnergyHigh(G4double value);
|
||||
|
||||
@@ -108,14 +108,14 @@ private:
|
||||
G4ParticleDefinition* theA;
|
||||
G4ParticleDefinition* theHe3;
|
||||
|
||||
G4double ekinlim; // in MeV
|
||||
G4double plablow; // in MeV/c
|
||||
G4double ekinhigh; // in MeV/c
|
||||
G4double ekinlim;
|
||||
G4double ekinlow;
|
||||
G4double ekinhigh;
|
||||
};
|
||||
|
||||
inline void G4ChargeExchange::SetMomentumLow(G4double value)
|
||||
inline void G4ChargeExchange::SetKinEnergyLow(G4double value)
|
||||
{
|
||||
plablow = value;
|
||||
ekinlow = value;
|
||||
}
|
||||
|
||||
inline void G4ChargeExchange::SetKinEnergyHigh(G4double value)
|
||||
|
||||
+1
-1
@@ -25,7 +25,7 @@
|
||||
//
|
||||
//
|
||||
// $Id: G4ChargeExchangeProcess.hh,v 1.2 2006/06/29 20:08:57 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-01 $
|
||||
// GEANT4 tag $Name: geant4-08-02 $
|
||||
//
|
||||
//
|
||||
// Geant4 Hadron Elastic Charge Exchange Process -- header file
|
||||
|
||||
-298
@@ -1,298 +0,0 @@
|
||||
//
|
||||
// ********************************************************************
|
||||
// * License and Disclaimer *
|
||||
// * *
|
||||
// * The Geant4 software is copyright of the Copyright Holders of *
|
||||
// * the Geant4 Collaboration. It is provided under the terms and *
|
||||
// * conditions of the Geant4 Software License, included in the file *
|
||||
// * LICENSE and available at http://cern.ch/geant4/license . These *
|
||||
// * include a list of copyright holders. *
|
||||
// * *
|
||||
// * Neither the authors of this software system, nor their employing *
|
||||
// * institutes,nor the agencies providing financial support for this *
|
||||
// * work make any representation or warranty, express or implied, *
|
||||
// * regarding this software system or assume any liability for its *
|
||||
// * use. Please see the license in the file LICENSE and URL above *
|
||||
// * for the full disclaimer and the limitation of liability. *
|
||||
// * *
|
||||
// * This code implementation is the result of the scientific and *
|
||||
// * technical work of the GEANT4 collaboration. *
|
||||
// * By using, copying, modifying or distributing the software (or *
|
||||
// * any work based on the software) you agree to acknowledge its *
|
||||
// * use in resulting scientific publications, and indicate your *
|
||||
// * acceptance of all terms of the Geant4 Software license. *
|
||||
// ********************************************************************
|
||||
//
|
||||
//
|
||||
// $Id: G4DiffElasticHadrNucleus.hh,v 1.15 2006/06/29 20:08:59 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-01 $
|
||||
//
|
||||
|
||||
// High energy hadron-nucleus elastic scattering
|
||||
// Kinetic energy T > 1 GeV
|
||||
// N. Starkov 2003.
|
||||
//
|
||||
// Modifications:
|
||||
// 14.11.05 The HE elastic scattering on proton is added (N.Starkov)
|
||||
// 30.05.06 New version, which not uses elastic data (N.Starkov)
|
||||
// 30.05.06 cleanup (V.Ivanchenko)
|
||||
//
|
||||
|
||||
#ifndef G4DiffElasticHadrNucleus_h
|
||||
#define G4DiffElasticHadrNucleus_h 1
|
||||
|
||||
#include "G4Nucleus.hh"
|
||||
#include "G4DynamicParticle.hh"
|
||||
#include "G4HadronValues.hh"
|
||||
#include "G4IntegrHadrNucleus.hh"
|
||||
|
||||
// ###############################################
|
||||
class NucleusParameters
|
||||
{
|
||||
|
||||
public:
|
||||
|
||||
NucleusParameters() {;}
|
||||
virtual ~NucleusParameters(){;}
|
||||
|
||||
NucleusParameters & operator= (const NucleusParameters &t)
|
||||
{
|
||||
if(this!=&t)
|
||||
{
|
||||
R1 = t.R1;
|
||||
R2 = t.R2;
|
||||
Aeff = t.Aeff;
|
||||
Pnucl = t.Pnucl;
|
||||
}
|
||||
return *this;
|
||||
}
|
||||
|
||||
void GetNucleusParameters(G4int AtWeight);
|
||||
|
||||
G4double R1, R2, Aeff, Pnucl;
|
||||
};
|
||||
|
||||
// ################################################
|
||||
class G4DiffElasticHadrNucleus: public //G4HadronValues
|
||||
G4IntegrHadrNucleus
|
||||
{
|
||||
|
||||
public:
|
||||
G4DiffElasticHadrNucleus() : // G4HadronValues(),
|
||||
G4IntegrHadrNucleus()
|
||||
{
|
||||
Factors();
|
||||
Binom();
|
||||
r0 = 1.1; // The WS's parameters
|
||||
r01 = 1.16;
|
||||
rAmax = 2.5;
|
||||
NpointsB = 500;
|
||||
FmToGeV = 5.068;
|
||||
Fm2ToGeV2= FmToGeV*FmToGeV;
|
||||
}
|
||||
|
||||
virtual ~G4DiffElasticHadrNucleus() {;}
|
||||
|
||||
G4double HadrNuclDifferCrSec(
|
||||
const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus,
|
||||
G4double Q2);
|
||||
|
||||
G4double HadrNuclDifferCrSecT(
|
||||
const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus,
|
||||
G4double Q2,
|
||||
G4int Kind);
|
||||
|
||||
G4double Thickness(G4int A, G4double b);
|
||||
|
||||
void GetIntegrandB(G4int Anucleus);
|
||||
|
||||
G4double GetIntegrandS(G4int Anucleus, G4double b, G4int Kind);
|
||||
|
||||
void GetNucleusParameters(G4Nucleus * aNucleus);
|
||||
|
||||
G4double HadronProtonDiffCrSec(G4double Q2);
|
||||
|
||||
void GetKinematics(const G4DynamicParticle * aHadron);
|
||||
|
||||
void GetParametersHP(const G4DynamicParticle * aHadron);
|
||||
|
||||
G4double LineInterpol(G4double p0, G4double p1,
|
||||
G4double c0, G4double c1,
|
||||
G4double p);
|
||||
// ====================================================
|
||||
G4double MyJ0(G4double x)
|
||||
{
|
||||
G4double x1, x2, x3, x4, x5, x6, x7, f0, th0, res;
|
||||
|
||||
x2 = x*x/9.0;
|
||||
|
||||
if(std::fabs(x)<=3.0)
|
||||
{
|
||||
x3 = x2*x2;
|
||||
x4 = x3*x2;
|
||||
x5 = x4*x2;
|
||||
x6 = x5*x2;
|
||||
x7 = x6*x2;
|
||||
res = 1.0-2.2499997*x2+1.2656208*x3-
|
||||
0.3163866*x4+0.0444479*x5-
|
||||
0.0039444*x6+0.0002100*x7;
|
||||
}
|
||||
else
|
||||
{
|
||||
x1 = x/3.0;
|
||||
x3 = x2*x1;
|
||||
x4 = x3*x1;
|
||||
x5 = x4*x1;
|
||||
x6 = x5*x1;
|
||||
f0 = 0.7978456 -0.00000077/x-
|
||||
0.00552740/x2-0.00009512/x3+
|
||||
0.00137237/x4-0.00072805/x5+
|
||||
0.00014476/x6;
|
||||
th0 = x-0.78539816 -0.04166397/x1-
|
||||
0.00003954/x2+0.00262573/x3-
|
||||
0.00054125/x4-0.00029333/x5+
|
||||
0.00013558/x6;
|
||||
res = f0*std::cos(th0)/std::sqrt(x);
|
||||
}
|
||||
return res;
|
||||
}
|
||||
// +++++++++++++++++++++++++++++++++++++++++++++
|
||||
G4double MyI0(G4double x)
|
||||
{
|
||||
G4double p1=1.0, p2=3.5156229, p3=3.0899424,
|
||||
p4=1.2067492, p5=0.2659732, p6=3.360768e-2,
|
||||
p7=4.5813e-3;
|
||||
G4double q1=0.39894228, q2=1.328592e-2, q3=2.25319e-3,
|
||||
q4=-1.57565e-3, q5=9.16281e-3, q6=-2.057706e-2,
|
||||
q7=2.635537e-2, q8=-1.647633e-2, q9=3.922377e-3;
|
||||
|
||||
G4double k1=3.75, ax=std::fabs(x), y=0.0, result=0.0;
|
||||
|
||||
if(ax<k1)
|
||||
{
|
||||
G4double xx = x/k1;
|
||||
y = xx*xx;
|
||||
result = p1+y*(p2+y*(p3+y*(p4+y*(p5+y*(p6+y*p7)))));
|
||||
}
|
||||
else
|
||||
{
|
||||
y = k1/ax;
|
||||
result = std::exp(ax)/std::sqrt(ax)*(q1+y*(q2+y*(q3+y*(q4+
|
||||
y*(q5+y*(q6+y*(q7+y*(q8+y*q9))))))));
|
||||
}
|
||||
return result;
|
||||
}
|
||||
|
||||
// private:
|
||||
|
||||
// ++++++++++++++++++++++++++++++++++++++++++++++++++
|
||||
void Binom()
|
||||
{
|
||||
G4int N, M;
|
||||
G4double Fact1, J;
|
||||
|
||||
for(N=0; N<240; N++)
|
||||
{
|
||||
J = 1;
|
||||
for(M=0; M<=N; M++)
|
||||
{
|
||||
Fact1 = 1;
|
||||
if ((N>0) && (N>M) && M>0)
|
||||
{
|
||||
J = J*(N-M+1)/M;
|
||||
Fact1 = J;
|
||||
}
|
||||
SetBinom[N][M] = Fact1;
|
||||
// G4cout<<" N M "<<N<<" "<<M<<" F "<<Fact1<<G4endl;
|
||||
}
|
||||
}
|
||||
return;
|
||||
}
|
||||
// +++++++++++++++++++++++++++++++++++++++++++++++++++
|
||||
G4double binom(G4int N, G4int M)
|
||||
{
|
||||
G4double Fact1 = 1;
|
||||
|
||||
if((N>1) & (N>=M))
|
||||
Fact1 = Factorials[N]/Factorials[M]/Factorials[N-M];
|
||||
return Fact1;
|
||||
}
|
||||
// +++++++++++++++++++++++++++++++++++++++++++++++++++
|
||||
G4double Factorial(G4int N)
|
||||
{
|
||||
G4double Res=1;
|
||||
|
||||
if(N == 0) return Res;
|
||||
|
||||
if(N < 100) for(G4int M = 1; M<=N; M++) Res = Res*M;
|
||||
|
||||
if(N >= 100) Res = 2.50662827*
|
||||
std::exp(static_cast<double>(-N-1))*
|
||||
std::pow(static_cast<double>(N+1),N+0.5)*
|
||||
(1.+1./12./(N+1)+1./288./(N+1)/(N+1)-
|
||||
139./51840./(N+1)/(N+1)/(N+1)-
|
||||
571./2488320./(N+1)/(N+1)/(N+1)/(N+1));
|
||||
return Res;
|
||||
}
|
||||
// +++++++++++++++++++++++++++++++++++++++++++++++++++
|
||||
void Factors()
|
||||
{
|
||||
G4int ii, ll, mm;
|
||||
G4double Sum1, Fac1, Fac3, Sum3;
|
||||
|
||||
Factorials[0] = 1;
|
||||
|
||||
for( ii = 1; ii<140; ii++)
|
||||
{
|
||||
Factorials[ii] = Factorial(ii);
|
||||
if(ii >= 100) Mnoj[ii] = 3.03; // there is the saturation
|
||||
else
|
||||
{
|
||||
Sum1 = 0;
|
||||
Fac1 = 1;
|
||||
for( ll = 0; ll<=ii; ll++)
|
||||
{
|
||||
Fac1 = binom(ii,ll);
|
||||
Fac3 = 1;
|
||||
Sum3 = 1;
|
||||
for( mm = 1; mm<=ii-ll; mm++)
|
||||
{
|
||||
Fac3 = binom(ii-ll,mm);
|
||||
Sum3 = Sum3 + 1/Fac3;
|
||||
} // mm
|
||||
Sum1 = Sum1 + Sum3/Fac1;
|
||||
} // ll
|
||||
Mnoj[ii] = Sum1;
|
||||
} // else
|
||||
} // ii
|
||||
Mnoj[0] = 1;
|
||||
} // Factors
|
||||
// --------------------------------------------------------
|
||||
|
||||
public:
|
||||
|
||||
G4double Fm2ToGeV2, FmToGeV;
|
||||
|
||||
G4double SigTot, Slope, ReOnIm, HdrE, ConstU, Q2;
|
||||
G4double ProtonM, HadronM, HadronE, Sh, PM2, HM2;
|
||||
|
||||
G4double EcmP, EcmH, Kcm, CosCM, SqrtS, MaxT, FmaxT, DsigDt;
|
||||
G4double Slope1, Slope2, Coeff1, Coeff2, IntConst, MaxTR;
|
||||
G4double Slope0, Coeff0;
|
||||
G4int NumbPointsB, NumbPointsT, HadrCode;
|
||||
G4String HadronName;
|
||||
|
||||
G4double Mnoj[250], Factorials[250];
|
||||
G4double ReIntegrand[1000], ImIntegrand[1000], Thick[1000];
|
||||
G4double rAfm, rAGeV, stepB, MomentumCMN, MomentumH;
|
||||
|
||||
G4double R1, R2, Pnucl, Aeff, AIm, ARe, Dem, DIm, InCoh, InCohI;
|
||||
G4double r0, r01, rAmax;
|
||||
G4double BoundaryP[7], BoundaryTL[7], BoundaryTG[7];
|
||||
G4int NpointsB, HadrCodes[7], Intern;
|
||||
G4double SetBinom[240][240];
|
||||
};
|
||||
|
||||
#endif
|
||||
+110
-176
@@ -24,8 +24,8 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
//
|
||||
// $Id: G4ElasticHadrNucleusHE.hh,v 1.25 2006/06/29 20:09:01 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-01 $
|
||||
// $Id: G4ElasticHadrNucleusHE.hh,v 1.33 2006/12/13 15:45:22 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-02 $
|
||||
//
|
||||
// G4ElasticHadrNucleusHe.hh
|
||||
|
||||
@@ -33,10 +33,10 @@
|
||||
// The hadron kinetic energy T > 1 GeV
|
||||
// N. Starkov 2003.
|
||||
//
|
||||
// Modifications:
|
||||
// 19.05.04 Variant for G4 6.1: The 'ApplyYourself' was changed
|
||||
// 14.11.05 The HE elastic scattering on proton is added (N.Starkov)
|
||||
// 30.05.06 Version without use of elastic data (N.Starkov)
|
||||
// 19.11.05 The HE elastic scattering on proton is added (N.Starkov)
|
||||
// 16.11.06 General redesign (N.Starkov)
|
||||
// 23.11.06 General cleanup, ONQ0=3 (V.Ivanchenko)
|
||||
//
|
||||
|
||||
#ifndef G4ElasticHadrNucleusHE_h
|
||||
@@ -46,182 +46,72 @@
|
||||
|
||||
#include "globals.hh"
|
||||
#include "G4ParticleDefinition.hh"
|
||||
#include "G4Ions.hh"
|
||||
#include "G4ParticleTable.hh"
|
||||
#include "G4NucleiProperties.hh"
|
||||
#include "G4ParticleChange.hh"
|
||||
#include "G4Track.hh"
|
||||
#include "Randomize.hh"
|
||||
#include "G4Nucleus.hh"
|
||||
#include "G4IonTable.hh"
|
||||
|
||||
#include "G4DiffElasticHadrNucleus.hh"
|
||||
#include "G4IntegrHadrNucleus.hh"
|
||||
#include "G4HadronicInteraction.hh"
|
||||
|
||||
#define ONQ2 150 // The number of steps on Q2
|
||||
#define ONE 5 // The number of steps on E
|
||||
#define AreaNumb 6 // The number of order steps on E
|
||||
#define ONQ2XE ONQ2*ONE // The dimension of a distr. func. array
|
||||
#define MaxN 10 // The atomic number where the calculation
|
||||
// on the formula is changed on the integral
|
||||
// one
|
||||
static const G4int ONQ0 = 3; // The initial number of steps on Q2
|
||||
static const G4int ONQ2 = 150; // The total number of steps on Q2
|
||||
static const G4int NENERGY = 30;
|
||||
static const G4int NQTABLE = NENERGY*ONQ2;
|
||||
|
||||
class ElasticData
|
||||
{
|
||||
public:
|
||||
|
||||
G4String hadrName;
|
||||
G4int nuclAtomicNumber;
|
||||
G4double TableE[ONE*AreaNumb];
|
||||
ElasticData(const G4ParticleDefinition* h,
|
||||
G4int AtomWeight);
|
||||
|
||||
~ElasticData(){;}
|
||||
|
||||
void GetNucleusParameters(G4int Nucleus);
|
||||
const G4ParticleDefinition* Hadron() {return hadr;}
|
||||
|
||||
// ============================================
|
||||
void fillQ2limit();
|
||||
|
||||
const G4ParticleDefinition* hadr;
|
||||
G4int AtomicWeight;
|
||||
G4int dnkE[NENERGY];
|
||||
G4double TableQ2[ONQ2];
|
||||
G4double TableFQ2[ONQ2];
|
||||
G4double TableCrossSec[ONQ2XE*AreaNumb];
|
||||
G4double CurrentT;
|
||||
G4int CurrentN, Nstep;
|
||||
G4double RandMax, theMaxQ2;
|
||||
G4double Weight, dQ2;
|
||||
G4double theR1, R2, Pnucl, Aeff;
|
||||
NucleusParameters NucPar;
|
||||
|
||||
ElasticData() {;}
|
||||
|
||||
ElasticData(G4String HadrName, G4int AtomWeight);
|
||||
|
||||
virtual ~ElasticData(){;}
|
||||
|
||||
ElasticData (const ElasticData &t)
|
||||
{
|
||||
G4int k;
|
||||
|
||||
hadrName = t.hadrName;
|
||||
nuclAtomicNumber = t.nuclAtomicNumber;
|
||||
|
||||
for(k = 0; k<ONE*AreaNumb; k++) TableE[k] = t.TableE[k];
|
||||
|
||||
for(k = 0; k<ONQ2; k++) TableQ2[k] = t.TableQ2[k];
|
||||
|
||||
for(k = 0; k< ONQ2XE*AreaNumb; k++)
|
||||
TableCrossSec[k] = t.TableCrossSec[k];
|
||||
|
||||
theR1 = t.theR1;
|
||||
R2 = t.R2;
|
||||
Aeff = t.Aeff;
|
||||
Pnucl = t.Pnucl;
|
||||
theMaxQ2 = t.theMaxQ2;
|
||||
dQ2 = t.dQ2;
|
||||
NucPar = t.NucPar;
|
||||
|
||||
}
|
||||
|
||||
ElasticData & operator=(const ElasticData &t)
|
||||
{
|
||||
G4int k;
|
||||
if(this!=&t)
|
||||
{
|
||||
hadrName = t.hadrName;
|
||||
nuclAtomicNumber = t.nuclAtomicNumber;
|
||||
for(k = 0; k<ONE*AreaNumb; k++)
|
||||
TableE[k] = t.TableE[k];
|
||||
|
||||
for(k = 0; k<ONQ2; k++) TableQ2[k] = t.TableQ2[k];
|
||||
|
||||
for(k = 0; k< ONQ2XE*AreaNumb; k++)
|
||||
TableCrossSec[k] = t.TableCrossSec[k];
|
||||
|
||||
theR1 = t.theR1;
|
||||
R2 = t.R2;
|
||||
Aeff = t.Aeff;
|
||||
Pnucl = t.Pnucl;
|
||||
theMaxQ2 = t.theMaxQ2;
|
||||
NucPar = t.NucPar;
|
||||
dQ2 = t.dQ2;
|
||||
|
||||
}
|
||||
return *this;
|
||||
}
|
||||
|
||||
void Clean()
|
||||
{
|
||||
G4int k;
|
||||
|
||||
hadrName = "Nothing";
|
||||
nuclAtomicNumber = 0;
|
||||
for(k = 0; k<ONE*AreaNumb; k++) TableE[k] = 0;
|
||||
|
||||
for(k = 0; k<ONQ2; k++) TableQ2[k] = 0;
|
||||
|
||||
for(k = 0; k< ONQ2XE*AreaNumb; k++) TableCrossSec[k] = 0;
|
||||
|
||||
theR1 = 0;
|
||||
R2 = 0;
|
||||
Aeff = 0;
|
||||
Pnucl = 0;
|
||||
theMaxQ2 = 0;
|
||||
}
|
||||
|
||||
G4double GetQ2limit(G4double aR1);
|
||||
G4int GetNumberE(G4double E);
|
||||
G4double TableCrossSec[NQTABLE];
|
||||
G4double maxQ2, dQ2;
|
||||
G4double R1, R2, Pnucl, Aeff;
|
||||
G4double massGeV;
|
||||
};
|
||||
|
||||
// ############################################################
|
||||
class G4ElasticHadrNucleusHE : public G4DiffElasticHadrNucleus,
|
||||
public G4HadronicInteraction
|
||||
class G4ElasticHadrNucleusHE : public G4HadronicInteraction
|
||||
{
|
||||
public:
|
||||
G4ElasticHadrNucleusHE(const G4ParticleDefinition * aHadron,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
G4ElasticHadrNucleusHE();
|
||||
|
||||
virtual ~G4ElasticHadrNucleusHE() {;}
|
||||
virtual ~G4ElasticHadrNucleusHE();
|
||||
|
||||
G4HadFinalState * ApplyYourself( const G4HadProjectile &aTrack,
|
||||
G4Nucleus &aNucleus);
|
||||
|
||||
G4double RandomElastic0();
|
||||
|
||||
G4double RandomElastic1( const G4DynamicParticle * aHadron,
|
||||
const ElasticData * aData);
|
||||
G4HadFinalState * ApplyYourself(const G4HadProjectile &aTrack,
|
||||
G4Nucleus &G4Nucleus);
|
||||
|
||||
G4double SampleT(const G4ParticleDefinition* p,
|
||||
G4double pTotLabMomentum, G4int Z, G4int N);
|
||||
G4double SampleT1(const G4ParticleDefinition* p,
|
||||
G4double pTotLabMomentum, G4int Z, G4int N);
|
||||
|
||||
G4bool GetHadronNucleusData(G4DynamicParticle * aParticle,
|
||||
G4Nucleus * aNucleus,
|
||||
ElasticData & ElD );
|
||||
private:
|
||||
public:
|
||||
G4int ReadOfData(G4ParticleDefinition * aParticle,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
G4double GetQ2limit(G4double aR1);
|
||||
|
||||
void CreationArray(const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
void ArrayForHeavy(const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
void ArrayForLight(const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
G4double InterPol(G4double X1, G4double X2, G4double X3,
|
||||
G4double Y1, G4double Y2, G4double Y3,
|
||||
G4double X);
|
||||
G4double HadronNucleusQ2(G4DynamicParticle * aHadron,
|
||||
G4Nucleus & aNucleus);
|
||||
G4double HadronNucleusQ2_2(G4DynamicParticle * aHadron,
|
||||
G4int A, G4int kk,
|
||||
ElasticData * pElD);
|
||||
G4double GetLightFq2(G4int N, G4double Q, G4int Step,
|
||||
NucleusParameters * NP);
|
||||
|
||||
G4double HadronNucleusQ2_2(const G4ParticleDefinition * aHadron,
|
||||
G4int AWeight,
|
||||
G4double q, G4double aLabMom,
|
||||
G4int kk, ElasticData * pElD);
|
||||
G4double GetLightFq2(G4int N, G4double Q, G4int Step);
|
||||
|
||||
G4int GetBinom(G4int m, G4int n);
|
||||
|
||||
|
||||
// ======================================================
|
||||
|
||||
G4DynamicParticle aHad;
|
||||
|
||||
G4float GetFt(G4double T);
|
||||
@@ -229,21 +119,42 @@ public:
|
||||
G4double GetQ2(G4double Ran);
|
||||
G4double GetQ2_2(G4int N, G4double * Q,
|
||||
G4double * F, G4double R);
|
||||
G4double HadronProtonQ2(G4DynamicParticle * aHadron);
|
||||
|
||||
G4double Weight;
|
||||
G4double HadronProtonQ2(const G4ParticleDefinition * aHadron,
|
||||
G4double TotMom);
|
||||
|
||||
void GetKinematics(const G4ParticleDefinition * aHadron,
|
||||
G4double TotMom);
|
||||
|
||||
void GetParametersHP(const G4ParticleDefinition * aHadron,
|
||||
G4double TotMom);
|
||||
|
||||
G4double LineInterpol(G4double p0, G4double p2,
|
||||
G4double c1, G4double c2,
|
||||
G4double p);
|
||||
|
||||
G4double SigTot, Slope, ReOnIm, HdrE, ConstU, Q2;
|
||||
G4double ProtonM, HadronM, HadronE, Sh, PM2, HM2;
|
||||
|
||||
G4double EcmP, EcmH, Kcm, CosCM, SqrtS, MaxT, FmaxT, DsigDt;
|
||||
G4double Slope1, Slope2, Coeff1, Coeff2, IntConst, MaxTR;
|
||||
G4double Slope0, Coeff0;
|
||||
G4double BoundaryP[7], BoundaryTL[7], BoundaryTG[7];
|
||||
G4double MomentumH;
|
||||
G4int HadrCodes[7];
|
||||
G4int verboselevel;
|
||||
// ======================================================
|
||||
G4double MbToGeV2;
|
||||
G4double sqMbToGeV;
|
||||
G4double Fm2ToGeV2;
|
||||
G4double GeV2;
|
||||
G4double emin, emax, deltae;
|
||||
|
||||
G4int HadrCode;
|
||||
G4String HadronName;
|
||||
// G4double RR1, R2, Pnucl, Aeff;
|
||||
|
||||
std::vector<ElasticData> SetOfElasticData;
|
||||
ElasticData ElD;
|
||||
NucleusParameters NucPar;
|
||||
|
||||
G4IonTable * MyIonTable;
|
||||
G4DiffElasticHadrNucleus aDiffElHadNcls;
|
||||
|
||||
// G4HadFinalState FinState;
|
||||
// G4String HadronName;
|
||||
G4double R1, R2, Pnucl, Aeff;
|
||||
G4double Energy[NENERGY];
|
||||
// +++++++++++++++++++++++++++++++++++++++++++++++++++
|
||||
std::vector<ElasticData*> SetOfElasticData;
|
||||
|
||||
G4int Nstep, // The number of steps on Q2
|
||||
iKindWork, //
|
||||
@@ -251,17 +162,40 @@ public:
|
||||
iPoE; // The number of steps on E
|
||||
G4int iTypeWork, CurrentN;
|
||||
G4double aNucleon;
|
||||
// ,* pTableCrSec, // The array of distr. func.
|
||||
// // at all energies
|
||||
// * pTableE; // The array of E values
|
||||
G4double iQ2[ONQ2], // The array of Q2 values
|
||||
pTableCrSec[ONQ2XE*AreaNumb],
|
||||
pTableE[ONE*AreaNumb],
|
||||
iIntgr[ONQ2], // The array of distr. func.
|
||||
// at one energy
|
||||
Factorials1[250]; // The array for factorials
|
||||
G4double dEbeg1, dEend1, dQ2, maxQ2, RandMax;
|
||||
}; // The end of the class description
|
||||
// ######################################################
|
||||
#endif
|
||||
|
||||
G4double dEbeg1, dEend1, dQ2, maxQ2;
|
||||
G4double SetBinom[240][240];
|
||||
|
||||
// ++++++++++++++++++++++++++++++++++++++++++++++++++++++
|
||||
void Binom()
|
||||
{
|
||||
G4int N, M;
|
||||
G4double Fact1, J;
|
||||
|
||||
for(N=0; N<240; N++)
|
||||
{
|
||||
J = 1;
|
||||
for(M=0; M<=N; M++)
|
||||
{
|
||||
Fact1 = 1;
|
||||
if ((N>0) && (N>M) && M>0)
|
||||
{
|
||||
J = J*(N-M+1)/M;
|
||||
Fact1 = J;
|
||||
}
|
||||
SetBinom[N][M] = Fact1;
|
||||
}
|
||||
}
|
||||
return;
|
||||
}
|
||||
|
||||
void GetHadronValues(const G4ParticleDefinition * aHadron,
|
||||
G4double TotMom);
|
||||
|
||||
G4double HadrTot, HadrSlope, HadrReIm, DDSect2, DDSect3, MomentumCM;
|
||||
|
||||
G4double Q2res;
|
||||
|
||||
}; // The end of the class description
|
||||
|
||||
#endif
|
||||
|
||||
@@ -24,8 +24,8 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
//
|
||||
// $Id: G4HadronElastic.hh,v 1.11 2006/06/29 20:09:03 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-01 $
|
||||
// $Id: G4HadronElastic.hh,v 1.21 2006/11/21 19:38:53 vnivanch Exp $
|
||||
// GEANT4 tag $Name: geant4-08-02 $
|
||||
//
|
||||
//
|
||||
// G4 Model: Low energy elastic scattering with 4-momentum balance
|
||||
@@ -35,6 +35,11 @@
|
||||
// Modified:
|
||||
// 14-Dec-05 V.Ivanchenko rename the class
|
||||
// 13-Apr-06 V.Ivanchenko move to coherent_elastic
|
||||
// 25-Jul-06 V.Ivanchenko add 19 MeV low energy, below which S-wave is sampled
|
||||
// 20-Oct-06 V.Ivanchenko default ekinhigh = GeV (use HE model)
|
||||
// 16-Nov-06 V.Ivanchenko remove definition
|
||||
// 16-Nov-06 V.Ivanchenko default ekinhigh = 0.4*GeV
|
||||
// 16-Nov-06 V.Ivanchenko cleanup and rename Set methods and variables
|
||||
//
|
||||
//
|
||||
// Class Description
|
||||
@@ -66,9 +71,7 @@ class G4HadronElastic : public G4HadronicInteraction
|
||||
{
|
||||
public:
|
||||
|
||||
G4HadronElastic(G4double elim = 100.*keV,
|
||||
G4double plow = 20.*MeV,
|
||||
G4double ehigh= DBL_MAX);
|
||||
G4HadronElastic(G4double e1=0.0,G4double e2=0.0, G4double e3=0.0);
|
||||
|
||||
virtual ~G4HadronElastic();
|
||||
|
||||
@@ -79,9 +82,15 @@ public:
|
||||
|
||||
G4ElasticHadrNucleusHE* GetHElastic();
|
||||
|
||||
void SetMomentumLow(G4double value);
|
||||
void SetPlabLowLimit(G4double value);
|
||||
|
||||
void SetKinEnergyHigh(G4double value);
|
||||
void SetHEModelLowLimit(G4double value);
|
||||
|
||||
void SetQModelLowLimit(G4double value);
|
||||
|
||||
void SetLowestEnergyLimit(G4double value);
|
||||
|
||||
void SetRecoilKinEnergyLimit(G4double value);
|
||||
|
||||
G4double SampleT(G4double p, G4double m1, G4double m2, G4double A);
|
||||
|
||||
@@ -103,24 +112,43 @@ private:
|
||||
G4VQCrossSection* qCManager;
|
||||
G4ElasticHadrNucleusHE* hElastic;
|
||||
|
||||
const G4ParticleDefinition* theProton;
|
||||
const G4ParticleDefinition* theNeutron;
|
||||
const G4ParticleDefinition* theDeuteron;
|
||||
const G4ParticleDefinition* theAlpha;
|
||||
G4ParticleDefinition* theProton;
|
||||
G4ParticleDefinition* theNeutron;
|
||||
G4ParticleDefinition* theDeuteron;
|
||||
G4ParticleDefinition* theAlpha;
|
||||
const G4ParticleDefinition* thePionPlus;
|
||||
const G4ParticleDefinition* thePionMinus;
|
||||
|
||||
G4double ekinlim; // in MeV
|
||||
G4double plablow; // in MeV/c
|
||||
G4double ekinhigh; // in MeV/c
|
||||
G4double lowEnergyRecoilLimit;
|
||||
G4double lowEnergyLimitHE;
|
||||
G4double lowEnergyLimitQ;
|
||||
G4double lowestEnergyLimit;
|
||||
G4double plabLowLimit;
|
||||
};
|
||||
|
||||
inline void G4HadronElastic::SetMomentumLow(G4double value)
|
||||
inline void G4HadronElastic::SetRecoilKinEnergyLimit(G4double value)
|
||||
{
|
||||
plablow = value;
|
||||
lowEnergyRecoilLimit = value;
|
||||
}
|
||||
|
||||
inline void G4HadronElastic::SetKinEnergyHigh(G4double value)
|
||||
inline void G4HadronElastic::SetPlabLowLimit(G4double value)
|
||||
{
|
||||
ekinhigh = value;
|
||||
plabLowLimit = value;
|
||||
}
|
||||
|
||||
inline void G4HadronElastic::SetHEModelLowLimit(G4double value)
|
||||
{
|
||||
lowEnergyLimitHE = value;
|
||||
}
|
||||
|
||||
inline void G4HadronElastic::SetQModelLowLimit(G4double value)
|
||||
{
|
||||
lowEnergyLimitQ = value;
|
||||
}
|
||||
|
||||
inline void G4HadronElastic::SetLowestEnergyLimit(G4double value)
|
||||
{
|
||||
lowestEnergyLimit = value;
|
||||
}
|
||||
|
||||
#endif
|
||||
|
||||
@@ -1,69 +0,0 @@
|
||||
//
|
||||
// ********************************************************************
|
||||
// * License and Disclaimer *
|
||||
// * *
|
||||
// * The Geant4 software is copyright of the Copyright Holders of *
|
||||
// * the Geant4 Collaboration. It is provided under the terms and *
|
||||
// * conditions of the Geant4 Software License, included in the file *
|
||||
// * LICENSE and available at http://cern.ch/geant4/license . These *
|
||||
// * include a list of copyright holders. *
|
||||
// * *
|
||||
// * Neither the authors of this software system, nor their employing *
|
||||
// * institutes,nor the agencies providing financial support for this *
|
||||
// * work make any representation or warranty, express or implied, *
|
||||
// * regarding this software system or assume any liability for its *
|
||||
// * use. Please see the license in the file LICENSE and URL above *
|
||||
// * for the full disclaimer and the limitation of liability. *
|
||||
// * *
|
||||
// * This code implementation is the result of the scientific and *
|
||||
// * technical work of the GEANT4 collaboration. *
|
||||
// * By using, copying, modifying or distributing the software (or *
|
||||
// * any work based on the software) you agree to acknowledge its *
|
||||
// * use in resulting scientific publications, and indicate your *
|
||||
// * acceptance of all terms of the Geant4 Software license. *
|
||||
// ********************************************************************
|
||||
//
|
||||
// $Id: G4HadronValues.hh,v 1.10 2006/06/29 20:09:05 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-01 $
|
||||
//
|
||||
|
||||
//
|
||||
// G4HadronValues header file
|
||||
//
|
||||
//
|
||||
// Kinematic and dynamic values
|
||||
// N. Starkov 2003.
|
||||
//
|
||||
// Modifications:
|
||||
// 14.11.05 Use PDG code instead of static particle pointers (N.Starkov)
|
||||
// 23.11.05 cleanup (V.Ivanchenko)
|
||||
//
|
||||
|
||||
#ifndef G4HadronValues_h
|
||||
#define G4HadronValues_h 1
|
||||
|
||||
#include "globals.hh"
|
||||
#include "G4DynamicParticle.hh"
|
||||
|
||||
#define MyPi 3.141593
|
||||
#define MbToGeV2 2.568
|
||||
#define GeV2ToMb 0.38939
|
||||
#define MbToFm2 25.68
|
||||
|
||||
class G4HadronValues
|
||||
{
|
||||
public:
|
||||
|
||||
G4HadronValues();
|
||||
~G4HadronValues();
|
||||
|
||||
void GetHadronValues(const G4DynamicParticle * aHadron);
|
||||
|
||||
G4double HadrTot, HadrSlope, HadrReIm, DDSect2, DDSect3,
|
||||
MomentumCM;
|
||||
|
||||
};
|
||||
|
||||
#endif
|
||||
|
||||
|
||||
@@ -1,81 +0,0 @@
|
||||
//
|
||||
// ********************************************************************
|
||||
// * License and Disclaimer *
|
||||
// * *
|
||||
// * The Geant4 software is copyright of the Copyright Holders of *
|
||||
// * the Geant4 Collaboration. It is provided under the terms and *
|
||||
// * conditions of the Geant4 Software License, included in the file *
|
||||
// * LICENSE and available at http://cern.ch/geant4/license . These *
|
||||
// * include a list of copyright holders. *
|
||||
// * *
|
||||
// * Neither the authors of this software system, nor their employing *
|
||||
// * institutes,nor the agencies providing financial support for this *
|
||||
// * work make any representation or warranty, express or implied, *
|
||||
// * regarding this software system or assume any liability for its *
|
||||
// * use. Please see the license in the file LICENSE and URL above *
|
||||
// * for the full disclaimer and the limitation of liability. *
|
||||
// * *
|
||||
// * This code implementation is the result of the scientific and *
|
||||
// * technical work of the GEANT4 collaboration. *
|
||||
// * By using, copying, modifying or distributing the software (or *
|
||||
// * any work based on the software) you agree to acknowledge its *
|
||||
// * use in resulting scientific publications, and indicate your *
|
||||
// * acceptance of all terms of the Geant4 Software license. *
|
||||
// ********************************************************************
|
||||
//
|
||||
// G4IntegrHadrNucleus.hh
|
||||
|
||||
#ifndef G4IntegrHadrNucleus_h
|
||||
#define G4IntegrHadrNucleus_h 1
|
||||
|
||||
#include "globals.hh"
|
||||
#include "G4DynamicParticle.hh"
|
||||
#include "G4Nucleus.hh"
|
||||
#include "G4HadronValues.hh"
|
||||
|
||||
class G4IntegrHadrNucleus : public G4HadronValues
|
||||
{
|
||||
|
||||
public:
|
||||
|
||||
G4IntegrHadrNucleus() : G4HadronValues() {;}
|
||||
~G4IntegrHadrNucleus() {;}
|
||||
|
||||
G4double GetElasticCrossSection(
|
||||
const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
G4double GetTotalCrossSection(
|
||||
const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
G4double GetProductionCrossSection(
|
||||
const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
|
||||
G4double GetInelasticCrossSection(
|
||||
const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
|
||||
G4double GetQuasyElasticCrossSection(
|
||||
const G4DynamicParticle * aHadron,
|
||||
G4Nucleus * aNucleus);
|
||||
|
||||
private:
|
||||
|
||||
void GetIntegralCrSec(G4Nucleus * aNucleus);
|
||||
|
||||
G4double TotalCrSec, InelCrSec, ProdCrSec, ElasticCrSec,
|
||||
QuasyElasticCrSec, HadrEnergy;
|
||||
|
||||
// protected:
|
||||
public:
|
||||
G4double Tot00, DTot00;
|
||||
|
||||
};
|
||||
|
||||
#endif
|
||||
|
||||
|
||||
+11
-8
@@ -24,14 +24,15 @@
|
||||
// ********************************************************************
|
||||
//
|
||||
//
|
||||
// $Id: G4UHadronElasticProcess.hh,v 1.5 2006/06/29 20:09:17 gunter Exp $
|
||||
// GEANT4 tag $Name: geant4-08-01 $
|
||||
// $Id: G4UHadronElasticProcess.hh,v 1.10 2006/11/16 20:09:13 vnivanch Exp $
|
||||
// GEANT4 tag $Name: geant4-08-02 $
|
||||
//
|
||||
// Geant4 Hadron Elastic Scattering Process -- header file
|
||||
//
|
||||
// Created 21 April 2006 V.Ivanchenko
|
||||
//
|
||||
// Modified:
|
||||
// 26.09.06 V.Ivanchenko add lowestEnergy
|
||||
//
|
||||
|
||||
// Class Description
|
||||
@@ -54,7 +55,8 @@ class G4UHadronElasticProcess : public G4HadronicProcess
|
||||
{
|
||||
public:
|
||||
|
||||
G4UHadronElasticProcess(const G4String& procName = "hElastic", G4bool fl = true);
|
||||
G4UHadronElasticProcess(const G4String& procName = "hElastic",
|
||||
G4double elow = 19.*MeV);
|
||||
|
||||
virtual ~G4UHadronElasticProcess();
|
||||
|
||||
@@ -67,10 +69,11 @@ public:
|
||||
|
||||
virtual void DumpPhysicsTable(const G4ParticleDefinition& aParticleType);
|
||||
|
||||
virtual G4double GetMeanFreePath(const G4Track&, G4double, G4ForceCondition*);
|
||||
virtual G4double GetMeanFreePath(const G4Track&, G4double,
|
||||
G4ForceCondition*);
|
||||
|
||||
virtual G4double GetMicroscopicCrossSection(const G4DynamicParticle* aParticle,
|
||||
const G4Element* anElement,
|
||||
virtual G4double GetMicroscopicCrossSection(const G4DynamicParticle*,
|
||||
const G4Element*,
|
||||
G4double aTemp);
|
||||
|
||||
void SetQElasticCrossSection(G4VQCrossSection*);
|
||||
@@ -86,12 +89,12 @@ private:
|
||||
G4Nucleus targetNucleus;
|
||||
|
||||
G4double xsec[40];
|
||||
G4double xsecH[2];
|
||||
G4double xsecH[4];
|
||||
G4double cross;
|
||||
G4double thEnergy;
|
||||
G4double lowestEnergy;
|
||||
|
||||
G4int pPDG;
|
||||
G4bool flagHP;
|
||||
G4bool first;
|
||||
};
|
||||
|
||||
|
||||
Reference in New Issue
Block a user