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

Import Geant4 10.3.0.beta source tree

Browse Source
This commit is contained in:
Gabriele Cosmo
2016-06-30 14:12:05 +02:00
parent a654a7ab1f
commit 4ec577e5c4
2021 changed files with 100995 additions and 78277 deletions
Download Patch File Download Diff File Expand all files Collapse all files
source/processes/electromagnetic/utils/src/G4EmModelManager.cc
+150 -67
View File
@@ -23,7 +23,7 @@
// * acceptance of all terms of the Geant4 Software license. *
// ********************************************************************
//
// $Id: G4EmModelManager.cc 92921 2015-09-21 15:06:51Z gcosmo $
// $Id: G4EmModelManager.cc 97742 2016-06-08 09:24:54Z gcosmo $
//
// -------------------------------------------------------------------
//
@@ -162,7 +162,7 @@ void G4EmModelManager::Clear()
if(n > 0) {
for(size_t i=0; i<n; ++i) {
delete setOfRegionModels[i];
setOfRegionModels[i] = 0;
setOfRegionModels[i] = nullptr;
}
}
}
@@ -210,12 +210,12 @@ void G4EmModelManager::UpdateEmModel(const G4String& nam,
G4VEmModel* G4EmModelManager::GetModel(G4int i, G4bool ver)
{
G4VEmModel* model = nullptr;
if(i >= 0 && i < nEmModels) { model = models[i]; }
if(i < nEmModels) { model = models[i]; }
else if(verboseLevel > 0 && ver) {
G4cout << "G4EmModelManager::GetModel WARNING: "
<< "index " << i << " is wrong Nmodels= "
<< nEmModels;
if(particle) G4cout << " for " << particle->GetParticleName();
if(particle) { G4cout << " for " << particle->GetParticleName(); }
G4cout<< G4endl;
}
return model;
@@ -223,6 +223,23 @@ G4VEmModel* G4EmModelManager::GetModel(G4int i, G4bool ver)
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
G4VEmModel* G4EmModelManager::GetRegionModel(G4int k, size_t idx)
{
G4RegionModels* rm = setOfRegionModels[idxOfRegionModels[idx]];
G4VEmModel* mod = models[rm->ModelIndex(k)];
return mod;
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
G4int G4EmModelManager::NumberOfRegionModels(size_t idx) const
{
G4RegionModels* rm = setOfRegionModels[idxOfRegionModels[idx]];
return rm->NumberOfModels();
}
//....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
const G4DataVector*
G4EmModelManager::Initialise(const G4ParticleDefinition* p,
const G4ParticleDefinition* secondaryParticle,
@@ -231,11 +248,9 @@ G4EmModelManager::Initialise(const G4ParticleDefinition* p,
{
verboseLevel = val;
G4String partname = p->GetParticleName();
// if(partname == "proton") verboseLevel = 2;
//else verboseLevel = 0;
if(1 < verboseLevel) {
G4cout << "G4EmModelManager::Initialise() for "
<< partname << G4endl;
<< partname << " Nmodels= " << nEmModels << G4endl;
}
// Are models defined?
if(nEmModels < 1) {
@@ -335,9 +350,12 @@ G4EmModelManager::Initialise(const G4ParticleDefinition* p,
<< " tmin(MeV)= " << tmin/MeV
<< "; tmax(MeV)= " << tmax/MeV
<< "; order= " << ord
<< "; tminAct= " << model->LowEnergyActivationLimit()/MeV
<< "; tmaxAct= " << model->HighEnergyActivationLimit()/MeV
<< G4endl;
}
static const G4double limitdelta = 0.01*eV;
if(n > 0) {
// extend energy range to previous models
@@ -346,7 +364,7 @@ G4EmModelManager::Initialise(const G4ParticleDefinition* p,
//G4cout << "tmin= " << tmin << " tmax= "
// << tmax << " ord= " << ord <<G4endl;
// empty energy range
if( tmax - tmin <= eV) push = false;
if( tmax - tmin <= limitdelta) { push = false; }
// low-energy model
else if (tmax == eLow[0]) {
push = false;
@@ -356,53 +374,100 @@ G4EmModelManager::Initialise(const G4ParticleDefinition* p,
} else if(tmin < eHigh[n-1]) {
// compare order
for(G4int k=0; k<n; ++k) {
// new model has lower application
// new model has higher order parameter,
// so, its application area may be reduced
// to avoid intersections
if(ord >= modelOrd[k]) {
if(tmin < eHigh[k] && tmin >= eLow[k]) tmin = eHigh[k];
if(tmax <= eHigh[k] && tmax > eLow[k]) tmax = eLow[k];
if(tmin < eHigh[k] && tmin >= eLow[k]) { tmin = eHigh[k]; }
if(tmax <= eHigh[k] && tmax > eLow[k]) { tmax = eLow[k]; }
if(tmax > eHigh[k] && tmin < eLow[k]) {
if(tmax - eHigh[k] > eLow[k] - tmin) tmin = eHigh[k];
else tmax = eLow[k];
if(tmax - eHigh[k] > eLow[k] - tmin) { tmin = eHigh[k]; }
else { tmax = eLow[k]; }
}
if( tmax - tmin <= eV) {
if( tmax - tmin <= limitdelta) {
push = false;
break;
}
}
}
// this model has lower order parameter than possible
// other models, with which there may be intersections
// so, appliction area of such models may be reduced
//G4cout << "tmin= " << tmin << " tmax= "
// << tmax << " push= " << push << " idx= " << idx <<G4endl;
if(push) {
if (tmax == eLow[0]) {
push = false;
insert = true;
idx = 0;
// continue resolve intersections
} else if(tmin < eHigh[n-1]) {
// last energy interval
if(tmin > eLow[n-1] && tmax >= eHigh[n-1]) {
eHigh[n-1] = tmin;
// first energy interval
} else if(tmin <= eLow[0] && tmax < eHigh[0]) {
eLow[0] = tmax;
push = false;
insert = true;
idx = 0;
} else {
// find energy interval to replace
for(G4int k=0; k<n; ++k) {
if(tmin <= eLow[k] && tmax >= eHigh[k]) {
// << tmax << " push= " << push << " idx= " << idx <<G4endl;
//G4cout << "n= " << n << " eLow[0]= " << eLow[0] << " eLow[n-1]= " << eLow[n-1]
// << " eHigh[0]= " << eHigh[0] << " eHigh[n-1]= " << eHigh[n-1] << G4endl;
// insert below the first model
if (tmax <= eLow[0]) {
push = false;
insert = true;
idx = 0;
// resolve intersections
} else if(tmin < eHigh[n-1]) {
// last energy interval
if(tmin > eLow[n-1] && tmax >= eHigh[n-1]) {
eHigh[n-1] = tmin;
// first energy interval
} else if(tmin <= eLow[0] && tmax < eHigh[0]) {
eLow[0] = tmax;
push = false;
insert = true;
idx = 0;
// loop over all models
} else {
for(G4int k=n-1; k>=0; --k) {
if(tmin <= eLow[k] && tmax >= eHigh[k]) {
// full overlap exclude previous model
isUsed[modelAtRegion[k]] = 0;
idx = k;
if(k < n-1) {
// shift upper models and change index
for(G4int kk=k; kk<n-1; ++kk) {
modelAtRegion[kk] = modelAtRegion[kk+1];
modelOrd[kk] = modelOrd[kk+1];
eLow[kk] = eLow[kk+1];
eHigh[kk] = eHigh[kk+1];
}
++k;
}
--n;
} else {
// partially reduce previous model area
if(tmin <= eLow[k] && tmax > eLow[k]) {
eLow[k] = tmax;
idx = k;
insert = true;
push = false;
modelAtRegion[k] = ii;
modelOrd[k] = ord;
isUsed[ii] = 1;
}
} else if(tmin < eHigh[k] && tmax >= eHigh[k]) {
eHigh[k] = tmin;
idx = k + 1;
if(idx < n) {
insert = true;
push = false;
}
} else if(tmin > eLow[k] && tmax < eHigh[k]) {
if(eHigh[k] - tmax > tmin - eLow[k]) {
eLow[k] = tmax;
idx = k;
insert = true;
push = false;
} else {
eHigh[k] = tmin;
idx = k + 1;
if(idx < n) {
insert = true;
push = false;
}
}
}
}
}
}
}
}
}
// provide space for the new model
if(insert) {
for(G4int k=n-1; k>=idx; --k) {
modelAtRegion[k+1] = modelAtRegion[k];
@@ -412,7 +477,8 @@ G4EmModelManager::Initialise(const G4ParticleDefinition* p,
}
}
//G4cout << "push= " << push << " insert= " << insert
//<< " idx= " << idx <<G4endl;
// << " idx= " << idx <<G4endl;
// the model is added
if (push || insert) {
++n;
modelAtRegion[idx] = ii;
@@ -421,16 +487,31 @@ G4EmModelManager::Initialise(const G4ParticleDefinition* p,
eHigh[idx] = tmax;
isUsed[ii] = 1;
}
// exclude models with zero energy range
for(G4int k=n-1; k>=0; --k) {
if(eHigh[k] - eLow[k] <= limitdelta) {
isUsed[modelAtRegion[k]] = 0;
if(k < n-1) {
for(G4int kk=k; kk<n-1; ++kk) {
modelAtRegion[kk] = modelAtRegion[kk+1];
modelOrd[kk] = modelOrd[kk+1];
eLow[kk] = eLow[kk+1];
eHigh[kk] = eHigh[kk+1];
}
}
--n;
}
}
}
}
eLow[0] = 0.0;
eLow[n] = eHigh[n-1];
if(1 < verboseLevel) {
G4cout << "New G4RegionModels set with " << n << " models for region <";
G4cout << "### New G4RegionModels set with " << n << " models for region <";
if (region) { G4cout << region->GetName(); }
G4cout << "> Elow(MeV)= ";
for(G4int ii=0; ii<=n; ++ii) {G4cout << eLow[ii]/MeV << " ";}
for(G4int iii=0; iii<=n; ++iii) {G4cout << eLow[iii]/MeV << " ";}
G4cout << G4endl;
}
G4RegionModels* rm = new G4RegionModels(n, modelAtRegion, eLow, region);
@@ -733,32 +814,34 @@ void G4EmModelManager::DumpModelList(G4int verb)
std::max(r->LowEdgeEnergy(j),model->LowEnergyActivationLimit());
G4double emax =
std::min(r->LowEdgeEnergy(j+1),model->HighEnergyActivationLimit());
G4cout << std::setw(20);
G4cout << model->GetName() << " : Emin= "
<< std::setw(8) << G4BestUnit(emin,"Energy")
<< " Emax= "
<< std::setw(8) << G4BestUnit(emax,"Energy");
G4PhysicsTable* table = model->GetCrossSectionTable();
if(table) {
size_t kk = table->size();
for(size_t k=0; k<kk; ++k) {
G4PhysicsVector* v = (*table)[k];
if(v) {
G4int nn = v->GetVectorLength() - 1;
G4cout << " Table with " << nn << " bins Emin= "
<< std::setw(6) << G4BestUnit(v->Energy(0),"Energy")
<< " Emax= "
<< std::setw(6) << G4BestUnit(v->Energy(nn),"Energy");
break;
}
if(emax > emin) {
G4cout << std::setw(20);
G4cout << model->GetName() << " : Emin= "
<< std::setw(8) << G4BestUnit(emin,"Energy")
<< " Emax= "
<< std::setw(8) << G4BestUnit(emax,"Energy");
G4PhysicsTable* table = model->GetCrossSectionTable();
if(table) {
size_t kk = table->size();
for(size_t k=0; k<kk; ++k) {
G4PhysicsVector* v = (*table)[k];
if(v) {
G4int nn = v->GetVectorLength() - 1;
G4cout << " Table with " << nn << " bins Emin= "
<< std::setw(6) << G4BestUnit(v->Energy(0),"Energy")
<< " Emax= "
<< std::setw(6) << G4BestUnit(v->Energy(nn),"Energy");
break;
}
}
}
}
G4VEmAngularDistribution* an = model->GetAngularDistribution();
if(an) { G4cout << " " << an->GetName(); }
if(fluoFlag && model->DeexcitationFlag()) {
G4cout << " FluoActive";
}
G4cout << G4endl;
G4VEmAngularDistribution* an = model->GetAngularDistribution();
if(an) { G4cout << " " << an->GetName(); }
if(fluoFlag && model->DeexcitationFlag()) {
G4cout << " FluoActive";
}
G4cout << G4endl;
}
}
}
if(1 == nEmModels) { break; }