| Geant4 Cross Reference |
1 // 1
2 // *******************************************
3 // * License and Disclaimer
4 // *
5 // * The Geant4 software is copyright of th
6 // * the Geant4 Collaboration. It is provided
7 // * conditions of the Geant4 Software License
8 // * LICENSE and available at http://cern.ch/
9 // * include a list of copyright holders.
10 // *
11 // * Neither the authors of this software syst
12 // * institutes,nor the agencies providing fin
13 // * work make any representation or warran
14 // * regarding this software system or assum
15 // * use. Please see the license in the file
16 // * for the full disclaimer and the limitatio
17 // *
18 // * This code implementation is the result
19 // * technical work of the GEANT4 collaboratio
20 // * By using, copying, modifying or distri
21 // * any work based on the software) you ag
22 // * use in resulting scientific publicati
23 // * acceptance of all terms of the Geant4 Sof
24 // *******************************************
25 //
26 //
27 /// \file GB05BOptrSplitAndKillByCrossSection.
28 /// \brief Implementation of the GB05BOptrSpli
29
30 #include "GB05BOptrSplitAndKillByCrossSection.
31
32 #include "GB05BOptnSplitAndKillByCrossSection.
33
34 #include "G4BiasingProcessInterface.hh"
35 #include "G4ParticleDefinition.hh"
36 #include "G4ParticleTable.hh"
37 #include "G4VProcess.hh"
38
39 //....oooOO0OOooo........oooOO0OOooo........oo
40
41 GB05BOptrSplitAndKillByCrossSection::GB05BOptr
42
43 : G4VBiasingOperator(name), fSetup(true)
44 {
45 fParticleToBias = G4ParticleTable::GetPartic
46
47 if (fParticleToBias == 0) {
48 G4ExceptionDescription ed;
49 ed << "Particle `" << particleName << "' n
50 G4Exception("GB05BOptrSplitAndKillByCrossS
51 }
52
53 fSplitAndKillByCrossSection =
54 new GB05BOptnSplitAndKillByCrossSection("s
55 }
56
57 //....oooOO0OOooo........oooOO0OOooo........oo
58
59 GB05BOptrSplitAndKillByCrossSection::~GB05BOpt
60 {
61 delete fSplitAndKillByCrossSection;
62 }
63
64 //....oooOO0OOooo........oooOO0OOooo........oo
65
66 void GB05BOptrSplitAndKillByCrossSection::Star
67 {
68 // ---------------
69 // -- Setup stage:
70 // ---------------
71 // -- Start by collecting the pointer of the
72 // -- considered for the splitting by cross-
73 // -- this also verifies that these physics
74 // -- under control of a G4BiasingProcessInt
75 if (fSetup) {
76 const G4ProcessManager* processManager = f
77 const G4BiasingProcessSharedData* sharedDa
78 G4BiasingProcessInterface::GetSharedData
79 if (sharedData) {
80 for (size_t i = 0; i < fProcessesToEquip
81 G4bool processFound(false);
82 for (size_t j = 0; j < (sharedData->Ge
83 const G4BiasingProcessInterface* wra
84 (sharedData->GetPhysicsBiasingProc
85 if (fProcessesToEquipoise[i] == wrap
86 fProcesses.push_back(wrapperProces
87 processFound = true;
88 break;
89 }
90 }
91 if (!processFound) {
92 G4String particleName = "(unknown)";
93 if (fParticleToBias != nullptr) {
94 particleName = fParticleToBias->Ge
95 }
96 G4ExceptionDescription ed;
97 ed << "Process `" << fProcessesToEqu
98 << particleName << "'" << G4endl;
99 G4Exception("GB05BOptrSplitAndKillBy
100 JustWarning, ed);
101 }
102 }
103 }
104 fSetup = false;
105 }
106
107 if (fProcessesToEquipoise.size() == 0 || fPr
108 G4ExceptionDescription ed;
109 ed << "No processes to counterbalance for
110 << "Biasing will do nothing." << G4endl
111 G4Exception("GB05BOptrSplitAndKillByCrossS
112 }
113 }
114
115 //....oooOO0OOooo........oooOO0OOooo........oo
116
117 G4VBiasingOperation* GB05BOptrSplitAndKillByCr
118 const G4Track* track, const G4BiasingProcess
119 {
120 // -----------------------------------------
121 // -- Check if current particle type is the
122 // -----------------------------------------
123 if (track->GetDefinition() != fParticleToBia
124
125 // -----------------------------------------
126 // -- Compute the total cross-section for th
127 // -- considered.
128 // -- These physics processes have been upda
129 // -- state by their related wrapper G4Biasi
130 // -- the cross-sections/mean free pathes ar
131 // -----------------------------------------
132 G4double totalCrossSection(0.0);
133 for (size_t i = 0; i < fProcesses.size(); i+
134 G4double interactionLength = fProcesses[i]
135 if (interactionLength < DBL_MAX / 10.) tot
136 }
137 if (totalCrossSection < DBL_MIN) return 0;
138
139 G4double totalInteractionLength = 1. / total
140
141 // -----------------------------------------
142 // -- Passes the updated "absorption" cross-
143 // -- to the biasing operation, and returns
144 // -----------------------------------------
145 fSplitAndKillByCrossSection->SetInteractionL
146
147 return fSplitAndKillByCrossSection;
148 }
149
150 void GB05BOptrSplitAndKillByCrossSection::AddP
151 {
152 fProcessesToEquipoise.push_back(processName)
153 }
154