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

Import Geant4 11.2.0.beta source tree

Browse Source
This commit is contained in:
Gabriele Cosmo
2023-06-30 09:09:57 +02:00
parent aef78ca386
commit dd1f179cda
3780 changed files with 212808 additions and 142780 deletions
Download Patch File Download Diff File Expand all files Collapse all files
source/physics_lists/lists/src/G4PhysListFactory.cc
+26 -3
View File
@@ -32,6 +32,7 @@
//
// Modified:
//
// 2023.04.12 A.Ribon added _HPT variants (i.e. HP + thermal scattering)
// 2014.08.05 K.L.Genser used provision for Hadronic Physics Variant M in
// Shielding for ShieldingM
//
@@ -53,6 +54,7 @@
#include "QGSP_BERT_HP.hh"
#include "QGSP_BIC.hh"
#include "QGSP_BIC_HP.hh"
#include "QGSP_BIC_HPT.hh"
#include "QGSP_BIC_AllHP.hh"
#include "QGSP_FTFP_BERT.hh"
#include "QGS_BIC.hh"
@@ -61,6 +63,7 @@
#include "Shielding.hh"
#include "ShieldingLEND.hh"
#include "NuBeam.hh"
#include "G4ThermalNeutrons.hh"
#include "G4EmStandardPhysics.hh"
#include "G4EmStandardPhysics_option1.hh"
@@ -79,13 +82,16 @@
G4PhysListFactory::G4PhysListFactory(G4int ver)
: defName("FTFP_BERT"),verbose(ver),theMessenger(nullptr)
{
nlists_hadr = 23;
G4String ss[23] = {
nlists_hadr = 33;
G4String ss[33] = {
"FTFP_BERT","FTFP_BERT_TRV","FTFP_BERT_ATL","FTFP_BERT_HP","FTFQGSP_BERT",
"FTFP_INCLXX","FTFP_INCLXX_HP","FTF_BIC", "LBE","QBBC",
"QGSP_BERT","QGSP_BERT_HP","QGSP_BIC","QGSP_BIC_HP","QGSP_BIC_AllHP",
"QGSP_FTFP_BERT","QGSP_INCLXX","QGSP_INCLXX_HP","QGS_BIC",
"Shielding","ShieldingLEND","ShieldingM","NuBeam"};
"Shielding","ShieldingLEND","ShieldingM","NuBeam",
"Shielding_HP","ShieldingM_HP",
"FTFP_BERT_HPT", "FTFP_INCLXX_HPT", "QGSP_BERT_HPT", "QGSP_BIC_HPT",
"QGSP_BIC_AllHPT", "QGSP_INCLXX_HPT", "Shielding_HPT", "ShieldingM_HPT" };
for(size_t i=0; i<nlists_hadr; ++i) {
listnames_hadr.push_back(ss[i]);
}
@@ -177,6 +183,23 @@ G4PhysListFactory::GetReferencePhysList(const G4String& name)
else if(had_name == "ShieldingLEND") {p = new ShieldingLEND(verbose);}
else if(had_name == "ShieldingM") {p = new Shielding(verbose,"HP","M");}
else if(had_name == "NuBeam") {p = new NuBeam(verbose);}
else if(had_name == "Shielding_HP") {p = new Shielding(verbose);}
else if(had_name == "ShieldingM_HP") {p = new Shielding(verbose,"HP","M");}
else if(had_name == "FTFP_BERT_HPT") {p = new FTFP_BERT_HP(verbose);
p->RegisterPhysics(new G4ThermalNeutrons);}
else if(had_name == "FTFP_INCLXX_HPT"){p = new FTFP_INCLXX_HP(verbose);
p->RegisterPhysics(new G4ThermalNeutrons);}
else if(had_name == "QGSP_BERT_HPT") {p = new QGSP_BERT_HP(verbose);
p->RegisterPhysics(new G4ThermalNeutrons);}
else if(had_name == "QGSP_BIC_HPT") {p = new QGSP_BIC_HPT(verbose);}
else if(had_name == "QGSP_BIC_AllHPT"){p = new QGSP_BIC_AllHP(verbose);
p->RegisterPhysics(new G4ThermalNeutrons);}
else if(had_name == "QGSP_INCLXX_HPT"){p = new QGSP_INCLXX_HP(verbose);
p->RegisterPhysics(new G4ThermalNeutrons);}
else if(had_name == "Shielding_HPT") {p = new Shielding(verbose);
p->RegisterPhysics(new G4ThermalNeutrons);}
else if(had_name == "ShieldingM_HPT") {p = new Shielding(verbose,"HP","M");
p->RegisterPhysics(new G4ThermalNeutrons);}
else {
p = new FTFP_BERT(verbose);
G4ExceptionDescription ed;
source/physics_lists/lists/src/G4PhysListFactoryMessenger.cc
+10
View File
@@ -37,6 +37,8 @@
#include "G4VModularPhysicsList.hh"
#include "G4RadioactiveDecayPhysics.hh"
#include "G4OpticalPhysics.hh"
#include "G4ThermalNeutrons.hh"
G4PhysListFactoryMessenger::G4PhysListFactoryMessenger(G4VModularPhysicsList* pl)
{
@@ -53,10 +55,16 @@ G4PhysListFactoryMessenger::G4PhysListFactoryMessenger(G4VModularPhysicsList* pl
theOptical = new G4UIcommand("/physics_lists/factory/addOptical",this);
theOptical->SetGuidance("Enable optical physics.");
theOptical->AvailableForStates(G4State_PreInit);
theThermal = new G4UIcommand("/physics_lists/factory/addThermal",this);
theThermal->SetGuidance("Enable special elastic scattering of thermal neutrons (Ekin < 4 eV).");
theThermal->SetGuidance("Important note: to be used only with HP-based physics lists!");
theThermal->AvailableForStates(G4State_PreInit);
}
G4PhysListFactoryMessenger::~G4PhysListFactoryMessenger()
{
delete theThermal;
delete theOptical;
delete theRadDecay;
delete theDir;
@@ -69,5 +77,7 @@ void G4PhysListFactoryMessenger::SetNewValue(G4UIcommand* aComm, G4String)
thePhysList->RegisterPhysics(new G4RadioactiveDecayPhysics(ver));
} else if(aComm == theOptical) {
thePhysList->RegisterPhysics(new G4OpticalPhysics(ver));
} else if(aComm == theThermal) {
thePhysList->RegisterPhysics(new G4ThermalNeutrons(ver));
}
}
source/physics_lists/lists/src/QBBC_ABLA.cc
+74
View File
@@ -0,0 +1,74 @@
//
// ********************************************************************
// * 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. *
// ********************************************************************
//
//
//---------------------------------------------------------------------------
//
// ClassName: QBBC_ABLA
//
// Author: Alberto Ribon (CERN), April 2023
//
// The new, experimental physics list QBBC_ABLA is similar to the reference
// physics list QBBC, except that for hadron inelastic the physics constructor
// G4HadronInelasticQBBC_ABLA is used (instead of G4HadronInelasticQBBC):
// in practice, QBBC_ABLA behaves as QBBC, with the only difference that for
// the final-state of nuclear inelastic interactions of charged pions and
// nucleons projectiles, the ABLA model (instead of the usual
// Precompound/de-excitation) is utilized for nuclear de-excitation.
//
// Modified:
//
//----------------------------------------------------------------------------
//
#include "QBBC_ABLA.hh"
#include "globals.hh"
#include "G4PhysicalConstants.hh"
#include "G4SystemOfUnits.hh"
#include "G4DecayPhysics.hh"
#include "G4EmStandardPhysics.hh"
#include "G4EmExtraPhysics.hh"
#include "G4StoppingPhysics.hh"
#include "G4HadronInelasticQBBC_ABLA.hh"
#include "G4HadronElasticPhysicsXS.hh"
#include "G4IonPhysicsXS.hh"
#include "G4IonElasticPhysics.hh"
#include "G4NeutronTrackingCut.hh"
QBBC_ABLA::QBBC_ABLA( G4int ver, const G4String& ) {
if ( ver > 0 ) G4cout << "<<< Experimental Reference Physics List QBBC_ABLA " << G4endl;
defaultCutValue = 0.7*CLHEP::mm;
SetVerboseLevel( ver );
RegisterPhysics( new G4EmStandardPhysics(ver) );
RegisterPhysics( new G4EmExtraPhysics(ver) );
RegisterPhysics( new G4DecayPhysics(ver) );
RegisterPhysics( new G4HadronElasticPhysicsXS(ver) );
RegisterPhysics( new G4StoppingPhysics(ver) );
RegisterPhysics( new G4IonPhysicsXS(ver) );
RegisterPhysics( new G4IonElasticPhysics(ver) );
RegisterPhysics( new G4HadronInelasticQBBC_ABLA(ver) );
RegisterPhysics( new G4NeutronTrackingCut(ver) );
}
source/physics_lists/lists/src/QGSP_BIC_HPT.cc
+86
View File
@@ -0,0 +1,86 @@
//
// ********************************************************************
// * 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. *
// ********************************************************************
//
//
//---------------------------------------------------------------------------
//
// ClassName: QGSP_BIC_HPT
//
// Author: Alberto Ribon (CERN), April 2023
//
// Similar to QGSP_BIC_HP, with the special treatment of elastic scattering
// of thermal neutrons (i.e. with kinetic energy below 4 eV) activated.
// This special treatment, called Thermal Scattering Law (TSL), is based on
// the S(alpha, beta) approach, which relies on both experimental measurements
// and molecular dynamics calculations.
//
// Modified:
//
//----------------------------------------------------------------------------
//
#include "G4DecayPhysics.hh"
#include "G4RadioactiveDecayPhysics.hh"
#include "G4EmStandardPhysics_option4.hh"
#include "G4EmExtraPhysics.hh"
#include "G4IonPhysics.hh"
#include "G4IonElasticPhysics.hh"
#include "G4StoppingPhysics.hh"
#include "G4HadronElasticPhysicsHPT.hh"
#include "QGSP_BIC_HPT.hh"
#include "G4HadronPhysicsQGSP_BIC_HP.hh"
QGSP_BIC_HPT::QGSP_BIC_HPT( G4int ver ) {
if ( ver > 0 ) {
G4cout << "<<< Geant4 Physics List simulation engine: QGSP_BIC_HPT" << G4endl << G4endl;
}
defaultCutValue = 0.7*CLHEP::mm;
SetCutValue( 0.0, "proton" );
SetVerboseLevel( ver );
// EM Physics
RegisterPhysics( new G4EmStandardPhysics_option4(ver) );
// Synchroton Radiation & GN Physics
RegisterPhysics( new G4EmExtraPhysics(ver) );
// Decays
RegisterPhysics( new G4DecayPhysics(ver) );
RegisterPhysics( new G4RadioactiveDecayPhysics(ver) );
// Hadron Elastic scattering
RegisterPhysics( new G4HadronElasticPhysicsHPT(ver) );
// Hadron Physics
RegisterPhysics( new G4HadronPhysicsQGSP_BIC_HP(ver) );
// Stopping Physics
RegisterPhysics( new G4StoppingPhysics(ver) );
// Ion Physics
RegisterPhysics( new G4IonElasticPhysics(ver) );
RegisterPhysics( new G4IonPhysics(ver) );
}
source/physics_lists/lists/src/Shielding.cc
+5 -1
View File
@@ -82,8 +82,12 @@ Shielding::Shielding(G4int verbose, const G4String& n_model,
if(verbose > 0) {
G4cout << "<<< Geant4 Physics List simulation engine: Shielding"
<< HadrPhysVariant << G4endl;
if ( LEN_model=="LEND" )
if ( LEN_model=="LEND" ) {
G4cout << "<<< LEND will be used for low energy neutron and gamma projectiles" << G4endl;
} else {
G4cout << "<<< (Note that Shielding" << HadrPhysVariant << " and Shielding"
<< HadrPhysVariant << "_HP are equivalent!)" << G4endl;
}
}
defaultCutValue = 0.7*CLHEP::mm;
SetCutValue(0, "proton");