| 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 // 080721 Create adjust_final_state method by
28 // 080801 Residual reconstruction with theNDLD
29 // 101110 Set lower limit for gamma energy(1ke
30 // P. Arce, June-2014 Conversion neutron_hp to
31 //
32
33 #include "G4ParticleHPFinalState.hh"
34
35 #include "G4Alpha.hh"
36 #include "G4Deuteron.hh"
37 #include "G4Gamma.hh"
38 #include "G4He3.hh"
39 #include "G4IonTable.hh"
40 #include "G4Neutron.hh"
41 #include "G4PhysicalConstants.hh"
42 #include "G4Proton.hh"
43 #include "G4RandomDirection.hh"
44 #include "G4SystemOfUnits.hh"
45 #include "G4Triton.hh"
46
47 G4ParticleHPFinalState::G4ParticleHPFinalState
48 {
49 theProjectile = G4Neutron::Neutron();
50 theResult.Put(nullptr);
51 fManager = G4ParticleHPManager::GetInstance(
52 ionTable = G4IonTable::GetIonTable();
53 }
54
55 G4ParticleHPFinalState::~G4ParticleHPFinalStat
56 {
57 delete theResult.Get();
58 }
59
60 void G4ParticleHPFinalState::adjust_final_stat
61 {
62 G4double minimum_energy = 1 * keV;
63
64 if (fManager->GetDoNotAdjustFinalState()) re
65
66 auto nSecondaries = (G4int)theResult.Get()->
67
68 G4int sum_Z = 0;
69 G4int sum_A = 0;
70 G4int max_SecZ = 0;
71 G4int max_SecA = 0;
72 G4int imaxA = -1;
73 for (G4int i = 0; i < nSecondaries; ++i) {
74 auto ptr = theResult.Get()->GetSecondary(i
75 sum_Z += ptr->GetAtomicNumber();
76 max_SecZ = std::max(max_SecZ, ptr->GetAtom
77 sum_A += ptr->GetAtomicMass();
78 max_SecA = std::max(max_SecA, ptr->GetAtom
79 if (ptr->GetAtomicMass() == max_SecA)
80 imaxA = i;
81 #ifdef G4PHPDEBUG
82 if (fManager->GetDEBUG())
83 G4cout << "G4ParticleHPFinalState::adjus
84 << ptr->GetParticleName() << G4en
85 #endif
86 }
87
88 G4ParticleDefinition* resi_pd = nullptr;
89
90 G4int baseZNew = theBaseZ;
91 G4int baseANew = theBaseA;
92 if (theProjectile == G4Neutron::Neutron()) {
93 baseANew++;
94 }
95 else if (theProjectile == G4Proton::Proton()
96 baseZNew++;
97 baseANew++;
98 }
99 else if (theProjectile == G4Deuteron::Deuter
100 baseZNew++;
101 baseANew += 2;
102 }
103 else if (theProjectile == G4Triton::Triton()
104 baseZNew++;
105 baseANew += 3;
106 }
107 else if (theProjectile == G4He3::He3()) {
108 baseZNew += 2;
109 baseANew += 3;
110 }
111 else if (theProjectile == G4Alpha::Alpha())
112 baseZNew += 2;
113 baseANew += 4;
114 }
115
116 #ifdef G4PHPDEBUG
117 if (fManager->GetDEBUG())
118 G4cout << "G4ParticleHPFinalState::adjust_
119 << baseANew << " sum_Z " << sum_Z <
120 #endif
121
122 G4bool needOneMoreSec = false;
123 G4ParticleDefinition* oneMoreSec_pd = nullpt
124 if (baseZNew == sum_Z && baseANew == sum_A)
125 // All secondaries are already created;
126 resi_pd = theResult.Get()->GetSecondary(im
127 }
128 else {
129 if (max_SecA >= baseANew - sum_A) {
130 // Most heavy secondary is interpreted a
131 resi_pd = theResult.Get()->GetSecondary(
132 needOneMoreSec = true;
133 }
134 else {
135 // creation of residual is required
136 resi_pd = ionTable->GetIon(baseZNew - su
137 }
138
139 if (needOneMoreSec) {
140 if (baseZNew == sum_Z && baseANew == sum
141 // In this case, one neutron is added
142 if (baseANew - sum_A > 1)
143 G4cout << "More than one neutron is
144 << G4endl;
145 oneMoreSec_pd = G4Neutron::Neutron();
146 }
147 else {
148 #ifdef G4PHPDEBUG
149 if (fManager->GetDEBUG())
150 G4cout << this << "G4ParticleHPFinal
151 << baseZNew << " - " << sum_Z
152 << " A " << baseANew << " - "
153 << theProjectile->GetParticle
154 #endif
155 oneMoreSec_pd =
156 G4IonTable::GetIonTable()->GetIon(ba
157 if (oneMoreSec_pd == nullptr) {
158 G4ExceptionDescription ed;
159 ed << "G4ParticleHPFinalState oneMor
160 << " A=" << baseANew << " - "
161 << theProjectile->GetParticle
162 G4Exception("G4ParticleHPFinalState:
163 ed, "No adjustment will
164 return;
165 }
166 }
167 }
168
169 if (resi_pd == nullptr) {
170 // theNDLDataZ,A has the Z and A of used
171 G4int ndlZNew = theNDLDataZ;
172 G4int ndlANew = theNDLDataA;
173 if (theProjectile == G4Neutron::Neutron(
174 ndlANew++;
175 }
176 else if (theProjectile == G4Proton::Prot
177 ndlZNew++;
178 ndlANew++;
179 }
180 else if (theProjectile == G4Deuteron::De
181 ndlZNew++;
182 ndlANew += 2;
183 }
184 else if (theProjectile == G4Triton::Trit
185 ndlZNew++;
186 ndlANew += 3;
187 }
188 else if (theProjectile == G4He3::He3())
189 ndlZNew += 2;
190 ndlANew += 3;
191 }
192 else if (theProjectile == G4Alpha::Alpha
193 ndlZNew += 2;
194 ndlANew += 4;
195 }
196 // theNDLDataZ,A has the Z and A of used
197 if (ndlZNew == sum_Z && ndlANew == sum_A
198 G4int dif_Z = theNDLDataZ - theBaseZ;
199 G4int dif_A = theNDLDataA - theBaseA;
200 resi_pd = ionTable->GetIon(max_SecZ -
201 if (resi_pd == nullptr) {
202 G4ExceptionDescription ed;
203 ed << "resi_pd Z=" << max_SecZ << "
204 << max_SecA << " - " << dif_A
205 << theProjectile->GetParticle
206 G4Exception("G4ParticleHPFinalState:
207 ed, "No adjustment will
208 return;
209 }
210
211 for (G4int i = 0; i < nSecondaries; ++
212 auto ptr = theResult.Get()->GetSecon
213 if (ptr->GetDefinition()->GetAtomicN
214 ptr->GetDefinition()->GetAtomicM
215 {
216 G4ThreeVector p = ptr->GetMomentum
217 / ionTable->GetIon(max_SecZ, m
218 ptr->SetDefinition(resi_pd);
219 ptr->SetMomentum(p);
220 }
221 }
222 }
223 }
224 }
225
226 G4LorentzVector secs_4p_lab(0.0);
227
228 auto n_sec = (G4int)theResult.Get()->GetNumb
229 G4double fast = 0;
230 G4double slow = 1;
231 G4int ifast = 0;
232 G4int islow = 0;
233 G4int ires = -1;
234
235 for (G4int i = 0; i < n_sec; ++i) {
236 auto ptr = theResult.Get()->GetSecondary(i
237 secs_4p_lab += ptr->Get4Momentum();
238
239 G4double beta = 0;
240 if (ptr->GetDefinition() != G4Gamma::Gamma
241 beta = ptr->Get4Momentum().beta();
242 }
243 else {
244 beta = 1.0;
245 }
246
247 if (ptr->GetDefinition() == resi_pd) ires
248
249 if (slow > beta && beta != 0) {
250 slow = beta;
251 islow = i;
252 }
253
254 if (fast <= beta) {
255 if (fast != 1) {
256 fast = beta;
257 ifast = i;
258 }
259 else {
260 // fast is already photon then check E
261 G4double e = ptr->Get4Momentum().e();
262 if (e > theResult.Get()->GetSecondary(
263 // among photons, the highest E beco
264 ifast = i;
265 }
266 }
267 }
268 }
269
270 G4LorentzVector dif_4p = init_4p_lab - secs_
271
272 G4LorentzVector p4(0);
273 if (ires == -1) {
274 // Create and Add Residual Nucleus
275 ires = nSecondaries;
276 nSecondaries += 1;
277
278 auto res = new G4DynamicParticle(resi_pd,
279 theResult.Get()->AddSecondary(res, secID);
280
281 p4 = res->Get4Momentum();
282 if (slow > p4.beta()) {
283 slow = p4.beta();
284 islow = ires;
285 }
286 dif_4p = init_4p_lab - (secs_4p_lab + p4);
287 }
288
289 if (needOneMoreSec && oneMoreSec_pd != nullp
290 //
291 // fca: this is not a fix, this is a crash a
292 // fca: the baryon number is still wrong, mo
293 // fca: should have been decreased, but sinc
294 // fca: we just do not add it
295 //
296 {
297 nSecondaries += 1;
298 auto one = new G4DynamicParticle(oneMoreSe
299 theResult.Get()->AddSecondary(one, secID);
300 p4 = one->Get4Momentum();
301 if (slow > p4.beta()) {
302 slow = p4.beta();
303 islow = nSecondaries - 1; // Because th
304 }
305 dif_4p = init_4p_lab - (secs_4p_lab + p4);
306 }
307
308 // Which is bigger dif_p or dif_e
309
310 if (dif_4p.v().mag() < std::abs(dif_4p.e()))
311 // Adjust p
312 if (minimum_energy < dif_4p.v().mag() && d
313 nSecondaries += 1;
314 theResult.Get()->AddSecondary(new G4Dyna
315 }
316 }
317 else {
318 // dif_p > dif_e
319 // at first momentum
320 // Move residual momentum
321 p4 = theResult.Get()->GetSecondary(ires)->
322 theResult.Get()->GetSecondary(ires)->GetPa
323 dif_4p = init_4p_lab -
324 (secs_4p_lab - p4 + theResult.Get()->Get
325 }
326
327 G4double dif_e = dif_4p.e() - (dif_4p.v()).m
328
329 if (dif_e > 0) {
330 // create 2 gamma
331
332 nSecondaries += 2;
333 G4double e1 = (dif_4p.e() - dif_4p.v().mag
334
335 if (minimum_energy < e1) {
336 G4ThreeVector dir = G4RandomDirection();
337 theResult.Get()->AddSecondary(new G4Dyna
338 theResult.Get()->AddSecondary(new G4Dyna
339 }
340 }
341 else // dif_e < 0
342 {
343 // At first reduce KE of the fastest secon
344 auto ptr = theResult.Get()->GetSecondary(i
345 G4double ke0 = ptr->GetKineticEnergy();
346 G4ThreeVector p0 = ptr->GetMomentum();
347 G4ThreeVector dir = p0.unit();
348
349 if (ke0 + dif_e > 0) {
350 ptr->SetKineticEnergy(ke0 + dif_e);
351 G4ThreeVector dp = p0 - theResult.Get()-
352 G4ThreeVector p = theResult.Get()->GetSe
353 theResult.Get()->GetSecondary(islow)->Ge
354 }
355 }
356 }
357