Import Geant4 11.3.0.beta source tree

This commit is contained in:
Gabriele Cosmo
2024-06-28 13:08:51 +02:00
parent f7b23877ed
commit e58e650b32
5232 changed files with 239416 additions and 244360 deletions
@@ -35,22 +35,21 @@
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
#include "TSRunAction.hh"
#include "TSActionInitialization.hh"
#include "G4RunManager.hh"
#include "G4Run.hh"
#include "G4Timer.hh"
#include "G4TaskRunManager.hh"
#include "TSRun.hh"
#include "TSDetectorConstruction.hh"
#include "TSRun.hh"
#include "G4Run.hh"
#include "G4RunManager.hh"
#include "G4StatAnalysis.hh"
#include "G4TaskRunManager.hh"
#include "G4Timer.hh"
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
TSRunAction::TSRunAction()
: fDetector(TSDetectorConstruction::Instance())
, fName(fDetector->GetMFDName())
: fDetector(TSDetectorConstruction::Instance()), fName(fDetector->GetMFDName())
{}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
@@ -59,7 +58,10 @@ TSRunAction::~TSRunAction() {}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
G4Run* TSRunAction::GenerateRun() { return new TSRun(fName); }
G4Run* TSRunAction::GenerateRun()
{
return new TSRun(fName);
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
@@ -68,16 +70,14 @@ void TSRunAction::BeginOfRunAction(const G4Run* aRun)
// G4int evts_to_process = aRun->GetNumberOfEventToBeProcessed();
// G4RunManager::GetRunManager()->SetPrintProgress(
// (evts_to_process > 1000) ? evts_to_process / 1000 : 1);
if(IsMaster() && aRun != nullptr)
G4PrintEnv();
if (IsMaster() && aRun != nullptr) G4PrintEnv();
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
void TSRunAction::EndOfRunAction(const G4Run* aRun)
{
if(IsMaster())
{
if (IsMaster()) {
G4cout << " ###### EndOfTSRunAction ###### " << G4endl;
aRun->GetNumberOfEvent();
@@ -97,51 +97,45 @@ void TSRunAction::EndOfRunAction(const G4Run* aRun)
//---------------------------------------------
// Dump accumulated quantities for this RUN.
//---------------------------------------------
std::vector<G4String> primScorerNames{ "EnergyDeposit", "NumberOfSteps" };
std::vector<G4String> fnames{ "mfd_tl", "mfd_tg" };
std::vector<G4double> units{ CLHEP::eV, CLHEP::keV, 1, 1 };
std::vector<G4String> unitstr{ "keV", "steps" };
std::vector<G4String> primScorerNames{"EnergyDeposit", "NumberOfSteps"};
std::vector<G4String> fnames{"mfd_tl", "mfd_tg"};
std::vector<G4double> units{CLHEP::eV, CLHEP::keV, 1, 1};
std::vector<G4String> unitstr{"keV", "steps"};
//----------------------------------------------------------------------//
// lambda to print double value
auto print = [](std::ostream& fout, G4int first, G4double second,
G4double unit1, G4double unit2, G4String unit2str) {
if(fout)
fout << first << " " << second / unit1 << G4endl;
auto print = [](std::ostream& fout, G4int first, G4double second, G4double unit1,
G4double unit2, G4String unit2str) {
if (fout) fout << first << " " << second / unit1 << G4endl;
G4cout << " " << std::setw(10) << first << " " << std::setw(15)
<< std::setprecision(6) << std::fixed << second / unit2 << " "
<< unit2str << G4endl;
G4cout << " " << std::setw(10) << first << " " << std::setw(15) << std::setprecision(6)
<< std::fixed << second / unit2 << " " << unit2str << G4endl;
G4cout.unsetf(std::ios::fixed);
};
//----------------------------------------------------------------------//
// lambda to print statistics
auto stat_print = [](std::ostream& fout, G4int first, G4StatAnalysis* stat,
G4ConvergenceTester* conv, G4double unit1,
G4double unit2, G4String unit2str) {
if(!stat || !conv)
return;
G4ConvergenceTester* conv, G4double unit1, G4double unit2,
G4String unit2str) {
if (!stat || !conv) return;
auto fsecond = (*stat);
auto psecond = (*stat);
fsecond /= unit1;
psecond /= unit2;
if(fout)
{
if (fout) {
fout << first << " " << fsecond << G4endl;
conv->ShowResult(fout);
}
std::stringstream ss;
ss << " " << std::setw(10) << first << " " << std::setw(15)
<< std::setprecision(6) << std::fixed << psecond << " " << unit2str;
ss << " " << std::setw(10) << first << " " << std::setw(15) << std::setprecision(6)
<< std::fixed << psecond << " " << unit2str;
// skip print of ConvergenceTester to stdout
G4cout << ss.str() << G4endl;
};
//----------------------------------------------------------------------//
for(unsigned i = 0; i < primScorerNames.size(); ++i)
{
for(unsigned j = 0; j < fnames.size(); ++j)
{
for (unsigned i = 0; i < primScorerNames.size(); ++i) {
for (unsigned j = 0; j < fnames.size(); ++j) {
fname = fnames.at(j) + "_" + primScorerNames.at(i) + ".out";
fileout.open(fname);
G4cout << separator.str() << G4endl;
@@ -149,97 +143,77 @@ void TSRunAction::EndOfRunAction(const G4Run* aRun)
G4cout << separator.str() << G4endl;
G4bool valid = true;
if(j == 0)
{
G4THitsMap<G4double>* hitmap =
tsRun->GetHitsMap(fName + "/" + primScorerNames.at(i));
if (j == 0) {
G4THitsMap<G4double>* hitmap = tsRun->GetHitsMap(fName + "/" + primScorerNames.at(i));
G4StatContainer<G4StatAnalysis>* statmap =
tsRun->GetStatMap(fName + "/" + primScorerNames.at(i));
G4StatContainer<G4ConvergenceTester>* convmap =
tsRun->GetConvMap(fName + "/" + primScorerNames.at(i));
if(hitmap && hitmap->size() != 0)
{
for(auto itr = hitmap->begin(); itr != hitmap->end(); itr++)
{
if(!hitmap->GetObject(itr))
continue;
if (hitmap && hitmap->size() != 0) {
for (auto itr = hitmap->begin(); itr != hitmap->end(); itr++) {
if (!hitmap->GetObject(itr)) continue;
IDs.insert(itr->first);
std::get<0>(fTypeCompare[primScorerNames.at(i)][itr->first]) =
*itr->second / units.at(i);
print(fileout, itr->first, *itr->second, units.at(i),
units.at(i + 1), unitstr.at(i));
print(fileout, itr->first, *itr->second, units.at(i), units.at(i + 1), unitstr.at(i));
}
}
else
{
else {
valid = false;
}
if(statmap && statmap->size() != 0 && convmap && convmap->size() != 0)
{
if (statmap && statmap->size() != 0 && convmap && convmap->size() != 0) {
auto stat_fname = "stat_" + fname;
std::ofstream statout;
statout.open(stat_fname);
for(auto itr = statmap->begin(); itr != statmap->end(); itr++)
{
G4int _f = statmap->GetIndex(itr);
G4StatAnalysis* _s = statmap->GetObject(itr);
for (auto itr = statmap->begin(); itr != statmap->end(); itr++) {
G4int _f = statmap->GetIndex(itr);
G4StatAnalysis* _s = statmap->GetObject(itr);
G4ConvergenceTester* _c = convmap->GetObject(_f);
stat_print(statout, _f, _s, _c, units.at(i), units.at(i + 1),
unitstr.at(i));
stat_print(statout, _f, _s, _c, units.at(i), units.at(i + 1), unitstr.at(i));
}
statout.close();
}
else
{
else {
std::stringstream ss;
ss << " StatMap/ConvMap is either not "
<< "created or the StatMap/ConvMap was empty";
if(statmap)
ss << " (StatMap size == " << statmap->size() << ")";
if(convmap)
ss << " (ConvMap size == " << convmap->size() << ")";
if (statmap) ss << " (StatMap size == " << statmap->size() << ")";
if (convmap) ss << " (ConvMap size == " << convmap->size() << ")";
G4Exception("TSRunAction", "002", JustWarning,
G4String(primScorerNames.at(i) + ss.str()).c_str());
}
if(!valid)
{
if (!valid) {
G4Exception("TSRunAction", "000", JustWarning,
G4String(primScorerNames.at(i) +
" HitsMap is either not "
"created or the HitsMap was empty")
G4String(primScorerNames.at(i)
+ " HitsMap is either not "
"created or the HitsMap was empty")
.c_str());
}
}
else
{
else {
G4TAtomicHitsMap<G4double>* hitmap =
tsRun->GetAtomicHitsMap(fName + "/" + primScorerNames.at(i));
if(hitmap && hitmap->size() != 0)
{
for(auto itr = hitmap->begin(); itr != hitmap->end(); itr++)
{
if (hitmap && hitmap->size() != 0) {
for (auto itr = hitmap->begin(); itr != hitmap->end(); itr++) {
IDs.insert(itr->first);
std::get<1>(fTypeCompare[primScorerNames.at(i)][itr->first]) =
*itr->second / units.at(i);
print(fileout, itr->first, *itr->second, units.at(i),
units.at(i + 1), unitstr.at(i));
print(fileout, itr->first, *itr->second, units.at(i), units.at(i + 1), unitstr.at(i));
}
}
else
{
else {
valid = false;
}
if(!valid)
{
if (!valid) {
G4Exception("TSRunAction", "001", JustWarning,
G4String(primScorerNames.at(i) +
" HitsMap is either not "
"created or the HitsMap was empty")
G4String(primScorerNames.at(i)
+ " HitsMap is either not "
"created or the HitsMap was empty")
.c_str());
}
}
@@ -249,15 +223,11 @@ void TSRunAction::EndOfRunAction(const G4Run* aRun)
G4cout << " closed file " << fname << " for output" << G4endl;
}
// add the mutex data
TSRun::MutexHitsMap_t* hitmap =
tsRun->GetMutexHitsMap(fName + "/" + primScorerNames.at(i));
if(hitmap && hitmap->size() != 0)
{
for(auto itr = hitmap->begin(); itr != hitmap->end(); itr++)
{
TSRun::MutexHitsMap_t* hitmap = tsRun->GetMutexHitsMap(fName + "/" + primScorerNames.at(i));
if (hitmap && hitmap->size() != 0) {
for (auto itr = hitmap->begin(); itr != hitmap->end(); itr++) {
IDs.insert(itr->first);
std::get<2>(fTypeCompare[primScorerNames.at(i)][itr->first]) =
itr->second / units.at(i);
std::get<2>(fTypeCompare[primScorerNames.at(i)][itr->first]) = itr->second / units.at(i);
}
}
}
@@ -275,17 +245,14 @@ void TSRunAction::EndOfRunAction(const G4Run* aRun)
G4cout << separator.str() << G4endl;
fileout << " " << std::setw(10) << "ID"
<< " " << std::setw(30) << std::setprecision(12) << std::fixed
<< "MFD value"
<< " " << std::setw(30) << std::setprecision(12) << std::fixed << "MFD value"
<< " " << std::setw(30) << std::setprecision(12) << std::fixed
<< "Atomic Hits Map value"
<< " " << std::setw(30) << std::setprecision(8)
<< std::scientific << "Difference"
<< " " << std::setw(30) << std::setprecision(8)
<< std::scientific << "Diff (MFD - MUTEXED)"
<< " " << std::setw(30) << std::setprecision(8)
<< std::scientific << "Diff (ATOM_HIT_MAP - MUTEXED)" << G4endl
<< G4endl;
<< " " << std::setw(30) << std::setprecision(8) << std::scientific << "Difference"
<< " " << std::setw(30) << std::setprecision(8) << std::scientific
<< "Diff (MFD - MUTEXED)"
<< " " << std::setw(30) << std::setprecision(8) << std::scientific
<< "Diff (ATOM_HIT_MAP - MUTEXED)" << G4endl << G4endl;
//----------------------------------------------------------------------//
//
@@ -309,29 +276,26 @@ void TSRunAction::EndOfRunAction(const G4Run* aRun)
};
// this is the outer-loop of tasks
auto report_type_comparison = [=](const G4String& id,
const IDcompare_t& comp) {
auto report_type_comparison = [=](const G4String& id, const IDcompare_t& comp) {
// the 'report_type_comparison' generates more tasks
auto report_subtype_comparison = [](const G4int& idx,
const Compare_t& value) {
auto report_subtype_comparison = [](const G4int& idx, const Compare_t& value) {
std::stringstream streamout;
G4double d01 = std::fabs(std::get<0>(value) - std::get<1>(value));
G4double d02 = std::fabs(std::get<0>(value) - std::get<2>(value));
G4double d03 = std::fabs(std::get<1>(value) - std::get<2>(value));
auto _print_diff = [&](const G4double& _dval) {
if(_dval > 0.0)
streamout << std::setprecision(8) << std::scientific
<< std::setw(30) << _dval << " ";
if (_dval > 0.0)
streamout << std::setprecision(8) << std::scientific << std::setw(30) << _dval
<< " ";
else
streamout << std::setprecision(1) << std::fixed << std::setw(30)
<< _dval << " ";
streamout << std::setprecision(1) << std::fixed << std::setw(30) << _dval << " ";
};
streamout << " " << std::setw(10) << idx << " " << std::setw(30)
<< std::setprecision(12) << std::fixed << std::get<0>(value)
<< " " << std::setw(30) << std::setprecision(12)
<< std::fixed << std::get<1>(value) << " ";
<< std::setprecision(12) << std::fixed << std::get<0>(value) << " "
<< std::setw(30) << std::setprecision(12) << std::fixed << std::get<1>(value)
<< " ";
_print_diff(d01);
_print_diff(d02);
@@ -343,23 +307,21 @@ void TSRunAction::EndOfRunAction(const G4Run* aRun)
std::stringstream streamout;
streamout << "\n\nType = " << id << "\n" << G4endl;
if(tp)
{
if (tp) {
// create a task group (nested inside the 'report_type_comparison' task)
G4TaskGroup<std::string> tg(join_output, tp);
// create the tasks in the task-group
for(auto titr = comp.begin(); titr != comp.end(); ++titr)
for (auto titr = comp.begin(); titr != comp.end(); ++titr)
tg.exec(report_subtype_comparison, titr->first, titr->second);
// wait on the tasks to finish and execute the join function
// this will block the outer task from completing until all the inner
// tasks have been completed
streamout << tg.join();
}
else
{
else {
// if there isn't a tasking thread-pool then we make traditional
// function call on this thread
for(auto titr = comp.begin(); titr != comp.end(); ++titr)
for (auto titr = comp.begin(); titr != comp.end(); ++titr)
streamout << report_subtype_comparison(titr->first, titr->second);
}
// this is the completion of the outer tasks
@@ -367,12 +329,11 @@ void TSRunAction::EndOfRunAction(const G4Run* aRun)
};
G4String tasking_result = "";
if(tp)
{
if (tp) {
G4cout << "\n\nGenerating diff output via tasking... ";
// create a task group to
G4TaskGroup<std::string> tg(join_output, tp);
for(auto itr = fTypeCompare.begin(); itr != fTypeCompare.end(); ++itr)
for (auto itr = fTypeCompare.begin(); itr != fTypeCompare.end(); ++itr)
tg.exec(report_type_comparison, itr->first, itr->second);
// wait on the tasks to finish and execute the join function
tasking_result = tg.join();
@@ -380,31 +341,27 @@ void TSRunAction::EndOfRunAction(const G4Run* aRun)
// if thread-pool was available, lets validate that tasking did what was
// expected
if(tp)
{
if (tp) {
// generate the output serially
G4String serial_result = "";
for(auto itr = fTypeCompare.begin(); itr != fTypeCompare.end(); ++itr)
for (auto itr = fTypeCompare.begin(); itr != fTypeCompare.end(); ++itr)
serial_result += report_type_comparison(itr->first, itr->second);
// write the tasking result even if it was bad so that it can viewed
fileout << tasking_result;
// compare the strings -- should be the same
if(serial_result != tasking_result)
{
if (serial_result != tasking_result) {
G4Exception("TSRunAction", "003", JustWarning,
"Output written via tasking did not match output written "
"serially. Appending serial result to output file");
fileout
<< "\n\n#================CORRECT_SERIAL_OUTPUT================#\n\n";
fileout << "\n\n#================CORRECT_SERIAL_OUTPUT================#\n\n";
fileout << serial_result;
}
}
else
{
else {
// if thread-pool was not available, then just write serially
for(auto itr = fTypeCompare.begin(); itr != fTypeCompare.end(); ++itr)
for (auto itr = fTypeCompare.begin(); itr != fTypeCompare.end(); ++itr)
fileout << report_type_comparison(itr->first, itr->second);
}