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

Import Geant4 4.1.0 source tree

Browse Source
This commit is contained in:
Gabriele Cosmo
2016-06-08 16:39:52 +02:00
parent 921d3b1cda
commit 330b82b769
4524 changed files with 178689 additions and 43575 deletions
Download Patch File Download Diff File Expand all files Collapse all files
source/processes/decay/History
+8 -1
View File
@@ -1,4 +1,4 @@
$Id: History,v 1.8 2001/08/22 08:12:34 kurasige Exp $
$Id: History,v 1.10 2002/02/12 02:14:03 kurasige Exp $
-------------------------------------------------------------------
=========================================================
@@ -16,6 +16,13 @@ committal in the CVS repository !
----------------------------------------------------------
* Reverse chronological order (last date on top), please *
----------------------------------------------------------
- Feb 12, 02 H.Kurashige(decay-V04-00-01)
- Remove physics table
- Feb 9, 02 H.Kurashige(decay-V04-00-00)
- Modify Lowest/HighestBinEnergy for physics table
to calculate beta for slow particle
- Aug 22, 01 H.Kurashige(decay-V03-02-01)
- Clean up codes
source/processes/decay/include/G4Decay.hh
+5 -13
View File
@@ -21,8 +21,8 @@
// ********************************************************************
//
//
// $Id: G4Decay.hh,v 1.7 2001/07/11 10:02:27 gunter Exp $
// GEANT4 tag $Name: geant4-04-00 $
// $Id: G4Decay.hh,v 1.8 2002/02/12 02:14:03 kurasige Exp $
// GEANT4 tag $Name: geant4-04-01 $
//
//
// ------------------------------------------------------------
@@ -40,6 +40,7 @@
// added aPhysicsTable 2 Aug. 1998 H.Kurashige
// PreAssignedDecayTime 18 Jan. 2001 H.Kurashige
// Add External Decayer 23 Feb. 2001 H.Kurashige
// Remove PhysicsTable 12 Feb. 2002 H.Kurashige
//
#ifndef G4Decay_h
#define G4Decay_h 1
@@ -146,17 +147,8 @@ class G4Decay : public G4VRestDiscreteProcess
// 2: More
private:
// In G4Decay, thePhysicsTable stores values of
// beta * sqrt( 1 - beta*beta)
// as a function of normalized kinetic enregy (=Ekin/mass)
// TotBin = number of bins in thePhysicsTable
// The PhysicsTable is created for the range of
// from LowestBinValue to HighestBinValue.
const G4double LowestBinValue;
const G4double HighestBinValue;
const G4int TotBin;
G4PhysicsTable* aPhysicsTable;
// HighestValue.
const G4double HighestValue;
// Remainder of life time at rest
G4double fRemainderLifeTime;
source/processes/decay/include/G4VExtDecayer.hh
+1 -1
View File
@@ -22,7 +22,7 @@
//
//
// $Id: G4VExtDecayer.hh,v 1.3 2001/07/11 10:02:27 gunter Exp $
// GEANT4 tag $Name: geant4-04-00 $
// GEANT4 tag $Name: geant4-04-01 $
//
//
// ------------------------------------------------------------
source/processes/decay/src/G4Decay.cc
+12 -74
View File
@@ -21,8 +21,8 @@
// ********************************************************************
//
//
// $Id: G4Decay.cc,v 1.11 2001/08/22 08:12:39 kurasige Exp $
// GEANT4 tag $Name: geant4-04-00 $
// $Id: G4Decay.cc,v 1.15 2002/02/12 08:57:20 kurasige Exp $
// GEANT4 tag $Name: geant4-04-01 $
//
//
// --------------------------------------------------------------
@@ -42,6 +42,7 @@
// remove G4ParticleMomentum 6 Feb. 99 H.Kurashige
// modified IsApplicable to activate G4Decay for resonances 1 Mar. 00 H.Kurashige
// Add External Decayer 23 Feb. 2001 H.Kurashige
// change LowestBinValue,HighestBinValue and TotBin(200) 9 Feb. 2002
//
#include "G4Decay.hh"
@@ -56,10 +57,7 @@
G4Decay::G4Decay(const G4String& processName)
:G4VRestDiscreteProcess(processName, fDecay),
verboseLevel(1),
LowestBinValue(1.0e-3),
HighestBinValue(10.0),
TotBin(200),
aPhysicsTable(0),
HighestValue(20.0),
pExtDecayer(0)
{
#ifdef G4VERBOSE
@@ -72,10 +70,6 @@ G4Decay::G4Decay(const G4String& processName)
G4Decay::~G4Decay()
{
if (aPhysicsTable != 0) {
aPhysicsTable->clearAndDestroy();
delete aPhysicsTable;
}
if (pExtDecayer) {
delete pExtDecayer;
}
@@ -104,15 +98,6 @@ G4double G4Decay::GetMeanLifeTime(const G4Track& aTrack,
G4ParticleDefinition* aParticleDef = aParticle->GetDefinition();
G4double aLife = aParticleDef->GetPDGLifeTime();
#ifdef G4VERBOSE
if (GetVerboseLevel()>1) {
G4cerr << "G4Decay::GetMeanLifeTime() "<< G4endl;
G4cerr << "KineticEnergy:" << aParticle->GetKineticEnergy()/GeV <<"[GeV]";
G4cerr << "Mass:" << aParticle->GetMass()/GeV <<"[GeV]";
G4cerr << "Life time: "<< aLife/ns << "[ns]" << G4endl;
}
#endif
// check if the particle is stable?
if (aParticleDef->GetPDGStable()) {
meanlife = DBL_MAX;
@@ -126,7 +111,7 @@ G4double G4Decay::GetMeanLifeTime(const G4Track& aTrack,
#ifdef G4VERBOSE
if (GetVerboseLevel()>1) {
G4cerr << "mean life time: "<< meanlife/ns << "[ns]" << G4endl;
G4cout << "mean life time: "<< meanlife/ns << "[ns]" << G4endl;
}
#endif
@@ -135,9 +120,6 @@ G4double G4Decay::GetMeanLifeTime(const G4Track& aTrack,
G4double G4Decay::GetMeanFreePath(const G4Track& aTrack,G4double, G4ForceCondition*)
{
// constants
G4bool isOutRange ;
// get particle
const G4DynamicParticle* aParticle = aTrack.GetDynamicParticle();
@@ -147,15 +129,6 @@ G4double G4Decay::GetMeanFreePath(const G4Track& aTrack,G4double, G4ForceConditi
G4double aCtau = c_light * aParticleDef->GetPDGLifeTime();
G4double aMass = aParticle->GetMass();
#ifdef G4VERBOSE
if (GetVerboseLevel()>1) {
G4cerr << "G4Decay::GetMeanFreePath() "<< G4endl;
G4cerr << "KineticEnergy:" << aParticle->GetKineticEnergy()/GeV <<"[GeV]";
G4cerr << "Mass:" << aMass/GeV <<"[GeV]";
G4cerr << "c*Tau:" << aCtau/m <<"[m]" <<G4endl;
}
#endif
// check if the particle is stable?
if (aParticleDef->GetPDGStable()) {
pathlength = DBL_MAX;
@@ -170,24 +143,14 @@ G4double G4Decay::GetMeanFreePath(const G4Track& aTrack,G4double, G4ForceConditi
//check if zero mass
} else if (aMass < DBL_MIN) {
pathlength = DBL_MAX;
#ifdef G4VERBOSE
if (GetVerboseLevel()>1) {
G4cerr << " Zero Mass particle " << G4endl;
}
#endif
} else {
//calculate the mean free path
// by using normalized kinetic energy (= Ekin/mass)
G4double rKineticEnergy = aParticle->GetKineticEnergy()/aMass;
if ( rKineticEnergy > HighestBinValue) {
// beta >> 1
if ( rKineticEnergy > HighestValue) {
// gamma >> 1
pathlength = ( rKineticEnergy + 1.0)* aCtau;
} else if ( rKineticEnergy > LowestBinValue) {
// check if aPhysicsTable exists
if (aPhysicsTable == NULL) BuildPhysicsTable(*aParticleDef);
// beta is in the range valid for PhysicsTable
pathlength = aCtau *
((*aPhysicsTable)(0))-> GetValue(rKineticEnergy,isOutRange);
} else if ( rKineticEnergy < DBL_MIN ) {
// too slow particle
#ifdef G4VERBOSE
@@ -199,42 +162,16 @@ G4double G4Decay::GetMeanFreePath(const G4Track& aTrack,G4double, G4ForceConditi
#endif
pathlength = DBL_MIN;
} else {
// beta << 1
// beta <1
pathlength = (aParticle->GetTotalMomentum())/aMass*aCtau ;
}
}
#ifdef G4VERBOSE
if (GetVerboseLevel()>1) {
G4cerr << "mean free path: "<< pathlength/m << "[m]" << G4endl;
}
#endif
return pathlength;
return pathlength;
}
void G4Decay::BuildPhysicsTable(const G4ParticleDefinition&)
{
// if aPhysicsTableis has already been created, do nothing
if (aPhysicsTable != NULL) return;
// create aPhysicsTable
if (GetVerboseLevel()>1) G4cerr <<" G4Decay::BuildPhysicsTable() "<< G4endl;
aPhysicsTable = new G4PhysicsTable(1);
//create physics vector
G4PhysicsLogVector* aVector = new G4PhysicsLogVector(
LowestBinValue,
HighestBinValue,
TotBin);
G4double beta, gammainv;
// fill physics Vector
G4int i;
for ( i = 0 ; i < TotBin ; i++ ) {
gammainv = 1.0/(aVector->GetLowEdgeEnergy(i) + 1.0);
beta = sqrt((1.0 - gammainv)*(1.0 +gammainv));
aVector->PutValue(i, beta/gammainv);
}
aPhysicsTable->insert(aVector);
return;
}
G4VParticleChange* G4Decay::DecayIt(const G4Track& aTrack, const G4Step& )
@@ -381,3 +318,4 @@ G4VParticleChange* G4Decay::DecayIt(const G4Track& aTrack, const G4Step& )