| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer 3 // * License and Disclaimer *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. 9 // * include a list of copyright holders. *
10 // * 10 // * *
11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. *
17 // * 17 // * *
18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. *
24 // ******************************************* 24 // ********************************************************************
25 // 25 //
26 // 26 //
27 // 080721 Create adjust_final_state method by << 27 //080721 Create adjust_final_state method by T. Koi
28 // 080801 Residual reconstruction with theNDLD << 28 //080801 Residual reconstruction with theNDLDataA,Z (A, Z, and momentum are adjusted) by T. Koi
29 // 101110 Set lower limit for gamma energy(1ke << 29 //101110 Set lower limit for gamma energy(1keV) by T. Koi
30 // P. Arce, June-2014 Conversion neutron_hp to 30 // P. Arce, June-2014 Conversion neutron_hp to particle_hp
31 // 31 //
32 32
33 #include "G4ParticleHPFinalState.hh" 33 #include "G4ParticleHPFinalState.hh"
34 34
35 #include "G4Alpha.hh" << 35 #include "G4PhysicalConstants.hh"
36 #include "G4Deuteron.hh" << 36 #include "G4SystemOfUnits.hh"
37 #include "G4Gamma.hh" <<
38 #include "G4He3.hh" <<
39 #include "G4IonTable.hh" 37 #include "G4IonTable.hh"
>> 38 #include "G4Gamma.hh"
40 #include "G4Neutron.hh" 39 #include "G4Neutron.hh"
41 #include "G4PhysicalConstants.hh" <<
42 #include "G4Proton.hh" 40 #include "G4Proton.hh"
43 #include "G4RandomDirection.hh" << 41 #include "G4Deuteron.hh"
44 #include "G4SystemOfUnits.hh" <<
45 #include "G4Triton.hh" 42 #include "G4Triton.hh"
>> 43 #include "G4Alpha.hh"
46 44
47 G4ParticleHPFinalState::G4ParticleHPFinalState <<
48 { <<
49 theProjectile = G4Neutron::Neutron(); <<
50 theResult.Put(nullptr); <<
51 fManager = G4ParticleHPManager::GetInstance( <<
52 ionTable = G4IonTable::GetIonTable(); <<
53 } <<
54 45
55 G4ParticleHPFinalState::~G4ParticleHPFinalStat << 46 void G4ParticleHPFinalState::adjust_final_state ( G4LorentzVector init_4p_lab )
56 { 47 {
57 delete theResult.Get(); <<
58 } <<
59 48
60 void G4ParticleHPFinalState::adjust_final_stat << 49 G4double minimum_energy = 1*keV;
61 { <<
62 G4double minimum_energy = 1 * keV; <<
63 50
64 if (fManager->GetDoNotAdjustFinalState()) re << 51 if ( adjustResult != true ) return;
65 52
66 auto nSecondaries = (G4int)theResult.Get()-> << 53 G4int nSecondaries = theResult.GetNumberOfSecondaries();
67 54
68 G4int sum_Z = 0; << 55 G4int sum_Z = 0;
69 G4int sum_A = 0; << 56 G4int sum_A = 0;
70 G4int max_SecZ = 0; << 57 G4int max_SecZ = 0;
71 G4int max_SecA = 0; << 58 G4int max_SecA = 0;
72 G4int imaxA = -1; << 59 G4int imaxA = -1;
73 for (G4int i = 0; i < nSecondaries; ++i) { << 60 for ( int i = 0 ; i < nSecondaries ; i++ )
74 auto ptr = theResult.Get()->GetSecondary(i << 61 {
75 sum_Z += ptr->GetAtomicNumber(); << 62 sum_Z += theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetAtomicNumber();
76 max_SecZ = std::max(max_SecZ, ptr->GetAtom << 63 max_SecZ = std::max ( max_SecZ , theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetAtomicNumber() );
77 sum_A += ptr->GetAtomicMass(); << 64 sum_A += theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetAtomicMass();
78 max_SecA = std::max(max_SecA, ptr->GetAtom << 65 max_SecA = std::max ( max_SecA , theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetAtomicMass() );
79 if (ptr->GetAtomicMass() == max_SecA) << 66 if ( theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetAtomicMass() == max_SecA ) imaxA = i;
80 imaxA = i; <<
81 #ifdef G4PHPDEBUG 67 #ifdef G4PHPDEBUG
82 if (fManager->GetDEBUG()) << 68 if( getenv("G4ParticleHPDebug")) G4cout << "G4ParticleHPFinalState::adjust_final_stat SECO " << i << " " <<theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetParticleName() << G4endl;
83 G4cout << "G4ParticleHPFinalState::adjus <<
84 << ptr->GetParticleName() << G4en <<
85 #endif 69 #endif
86 } <<
87 70
88 G4ParticleDefinition* resi_pd = nullptr; << 71 }
>> 72
>> 73 G4ParticleDefinition* resi_pd = NULL;
89 74
90 G4int baseZNew = theBaseZ; << 75 G4double baseZNew = theBaseZ;
91 G4int baseANew = theBaseA; << 76 G4double baseANew = theBaseA;
92 if (theProjectile == G4Neutron::Neutron()) { << 77 if( theProjectile == G4Neutron::Neutron() ) {
93 baseANew++; << 78 baseANew ++;
94 } << 79 } else if( theProjectile == G4Proton::Proton() ) {
95 else if (theProjectile == G4Proton::Proton() << 80 baseZNew ++;
96 baseZNew++; << 81 baseANew ++;
97 baseANew++; << 82 } else if( theProjectile == G4Deuteron::Deuteron() ) {
98 } << 83 baseZNew ++;
99 else if (theProjectile == G4Deuteron::Deuter << 84 baseANew += 2;
100 baseZNew++; << 85 } else if( theProjectile == G4Triton::Triton() ) {
101 baseANew += 2; << 86 baseZNew ++;
102 } << 87 baseANew += 3;
103 else if (theProjectile == G4Triton::Triton() << 88 } else if( theProjectile == G4Alpha::Alpha() ) {
104 baseZNew++; << 89 baseZNew += 2;
105 baseANew += 3; << 90 baseANew += 4;
106 } << 91 }
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 92
116 #ifdef G4PHPDEBUG 93 #ifdef G4PHPDEBUG
117 if (fManager->GetDEBUG()) << 94 if( getenv("G4ParticleHPDebug")) G4cout << "G4ParticleHPFinalState::adjust_final_stat BaseZ " << baseZNew << " BaseA " << baseANew << " sum_Z " << sum_Z << " sum_A " << sum_A << G4endl;
118 G4cout << "G4ParticleHPFinalState::adjust_ <<
119 << baseANew << " sum_Z " << sum_Z < <<
120 #endif 95 #endif
121 96
122 G4bool needOneMoreSec = false; << 97 G4bool needOneMoreSec = false;
123 G4ParticleDefinition* oneMoreSec_pd = nullpt << 98 G4ParticleDefinition* oneMoreSec_pd = NULL;
124 if (baseZNew == sum_Z && baseANew == sum_A) << 99 if ( (int)(baseZNew - sum_Z) == 0 && (int)(baseANew - sum_A) == 0 )
125 // All secondaries are already created; << 100 {
126 resi_pd = theResult.Get()->GetSecondary(im << 101 //All secondaries are already created;
127 } << 102 resi_pd = theResult.GetSecondary( imaxA )->GetParticle()->GetDefinition();
128 else { << 103 }
129 if (max_SecA >= baseANew - sum_A) { << 104 else
130 // Most heavy secondary is interpreted a << 105 {
131 resi_pd = theResult.Get()->GetSecondary( << 106 if ( max_SecA > int(baseANew - sum_A) )
132 needOneMoreSec = true; << 107 {
133 } << 108 //Most heavy secondary is interpreted as residual
134 else { << 109 resi_pd = theResult.GetSecondary( imaxA )->GetParticle()->GetDefinition();
135 // creation of residual is required << 110 needOneMoreSec = true;
136 resi_pd = ionTable->GetIon(baseZNew - su << 111 }
137 } << 112 else
138 << 113 {
139 if (needOneMoreSec) { << 114 //creation of residual is requierd
140 if (baseZNew == sum_Z && baseANew == sum << 115 resi_pd = G4IonTable::GetIonTable()->GetIon ( int(baseZNew - sum_Z) , (int)(baseANew - sum_A) , 0.0 );
141 // In this case, one neutron is added << 116 }
142 if (baseANew - sum_A > 1) << 117
143 G4cout << "More than one neutron is << 118 if ( needOneMoreSec )
144 << G4endl; << 119 {
145 oneMoreSec_pd = G4Neutron::Neutron(); << 120 if ( int(baseZNew - sum_Z) == 0 && (int)(baseANew - sum_A) > 0 )
146 } << 121 {
147 else { << 122 if ( int(baseANew - sum_A) > 1 ) G4cout << "More than one neutron is required for the balance of baryon number!" << G4endl;
>> 123 oneMoreSec_pd = theProjectile;
>> 124 }
>> 125 else
>> 126 {
148 #ifdef G4PHPDEBUG 127 #ifdef G4PHPDEBUG
149 if (fManager->GetDEBUG()) << 128 if( getenv("G4ParticleHPDebug")) G4cout << this << "G4ParticleHPFinalState oneMoreSec_pd Z " << baseZNew << " - " << sum_Z << " A " << baseANew << " - " << sum_A << " projectile " << theProjectile->GetParticleName() << G4endl;
150 G4cout << this << "G4ParticleHPFinal <<
151 << baseZNew << " - " << sum_Z <<
152 << " A " << baseANew << " - " <<
153 << theProjectile->GetParticle <<
154 #endif 129 #endif
155 oneMoreSec_pd = << 130 oneMoreSec_pd = G4IonTable::GetIonTable()->GetIon ( int(baseZNew - sum_Z) , (int)(baseANew - sum_A) , 0.0 );
156 G4IonTable::GetIonTable()->GetIon(ba << 131 if( !oneMoreSec_pd ) {
157 if (oneMoreSec_pd == nullptr) { << 132 G4cerr << this << "G4ParticleHPFinalState oneMoreSec_pd Z " << baseZNew << " - " << sum_Z << " A " << baseANew << " - " << sum_A << " projectile " << theProjectile->GetParticleName() << G4endl;
158 G4ExceptionDescription ed; << 133 G4Exception("G4ParticleHPFinalState:adjust_final_state",
159 ed << "G4ParticleHPFinalState oneMor << 134 "Warning",
160 << " A=" << baseANew << " - " << 135 JustWarning,
161 << theProjectile->GetParticle << 136 "No adjustment will be done!");
162 G4Exception("G4ParticleHPFinalState: << 137 return;
163 ed, "No adjustment will << 138 }
164 return; << 139 }
>> 140 }
>> 141
>> 142 if ( resi_pd == NULL )
>> 143 {
>> 144 // theNDLDataZ,A has the Z and A of used NDL file
>> 145 G4double ndlZNew = theNDLDataZ;
>> 146 G4double ndlANew = theNDLDataA;
>> 147 if( theProjectile == G4Neutron::Neutron() ) {
>> 148 ndlANew ++;
>> 149 } else if( theProjectile == G4Proton::Proton() ) {
>> 150 ndlZNew ++;
>> 151 ndlANew ++;
>> 152 } else if( theProjectile == G4Deuteron::Deuteron() ) {
>> 153 ndlZNew ++;
>> 154 ndlANew += 2;
>> 155 } else if( theProjectile == G4Triton::Triton() ) {
>> 156 ndlZNew ++;
>> 157 ndlANew += 3;
>> 158 } else if( theProjectile == G4Alpha::Alpha() ) {
>> 159 ndlZNew += 2;
>> 160 ndlANew += 4;
>> 161 }
>> 162 // theNDLDataZ,A has the Z and A of used NDL file
>> 163 if ( (int)(ndlZNew - sum_Z) == 0 && (int)(ndlANew - sum_A) == 0 )
>> 164 {
>> 165 G4int dif_Z = ( int ) ( theNDLDataZ - theBaseZ );
>> 166 G4int dif_A = ( int ) ( theNDLDataA - theBaseA );
>> 167 resi_pd = G4IonTable::GetIonTable()->GetIon ( max_SecZ - dif_Z , max_SecA - dif_A , 0.0 );
>> 168 if( !resi_pd ) {
>> 169 G4cerr << "G4ParticleHPFinalState resi_pd Z " << max_SecZ << " - " << dif_Z << " A " << max_SecA << " - " << dif_A << " projectile " << theProjectile->GetParticleName() << G4endl;
>> 170 G4Exception("G4ParticleHPFinalState:adjust_final_state",
>> 171 "Warning",
>> 172 JustWarning,
>> 173 "No adjustment will be done!");
>> 174 return;
>> 175 }
>> 176
>> 177 for ( int i = 0 ; i < nSecondaries ; i++ )
>> 178 {
>> 179 if ( theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetAtomicNumber() == max_SecZ
>> 180 && theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetAtomicMass() == max_SecA )
>> 181 {
>> 182 G4ThreeVector p = theResult.GetSecondary( i )->GetParticle()->GetMomentum();
>> 183 p = p * resi_pd->GetPDGMass()/ G4IonTable::GetIonTable()->GetIon ( max_SecZ , max_SecA , 0.0 )->GetPDGMass();
>> 184 theResult.GetSecondary( i )->GetParticle()->SetDefinition( resi_pd );
>> 185 theResult.GetSecondary( i )->GetParticle()->SetMomentum( p );
>> 186 }
>> 187 }
165 } 188 }
166 } 189 }
167 } << 190 }
168 191
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 192
211 for (G4int i = 0; i < nSecondaries; ++ << 193 G4LorentzVector secs_4p_lab( 0.0 );
212 auto ptr = theResult.Get()->GetSecon << 194
213 if (ptr->GetDefinition()->GetAtomicN << 195 G4int n_sec = theResult.GetNumberOfSecondaries();
214 ptr->GetDefinition()->GetAtomicM << 196 G4double fast = 0;
215 { << 197 G4double slow = 1;
216 G4ThreeVector p = ptr->GetMomentum << 198 G4int ifast = 0;
217 / ionTable->GetIon(max_SecZ, m << 199 G4int islow = 0;
218 ptr->SetDefinition(resi_pd); << 200 G4int ires = -1;
219 ptr->SetMomentum(p); << 201
220 } << 202 for ( G4int i = 0 ; i < n_sec ; i++ )
221 } << 203 {
>> 204
>> 205 //G4cout << "HP_DB " << i
>> 206 // << " " << theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetParticleName()
>> 207 // << " 4p " << theResult.GetSecondary( i )->GetParticle()->Get4Momentum()
>> 208 // << " ke " << theResult.GetSecondary( i )->GetParticle()->Get4Momentum().e() - theResult.GetSecondary( i )->GetParticle()->GetDefinition()->GetPDGMass()
>> 209 // << G4endl;
>> 210
>> 211 secs_4p_lab += theResult.GetSecondary( i )->GetParticle()->Get4Momentum();
>> 212
>> 213 G4double beta = 0;
>> 214 if ( theResult.GetSecondary( i )->GetParticle()->GetDefinition() != G4Gamma::Gamma() )
>> 215 {
>> 216 beta = theResult.GetSecondary( i )->GetParticle()->Get4Momentum().beta();
>> 217 }
>> 218 else
>> 219 {
>> 220 beta = 1;
>> 221 }
>> 222
>> 223 if ( theResult.GetSecondary( i )->GetParticle()->GetDefinition() == resi_pd ) ires = i;
>> 224
>> 225 if ( slow > beta && beta != 0 )
>> 226 {
>> 227 slow = beta;
>> 228 islow = i;
>> 229 }
>> 230
>> 231 if ( fast <= beta )
>> 232 {
>> 233 if ( fast != 1 )
>> 234 {
>> 235 fast = beta;
>> 236 ifast = i;
>> 237 }
>> 238 else
>> 239 {
>> 240 // fast is already photon then check E
>> 241 G4double e = theResult.GetSecondary( i )->GetParticle()->Get4Momentum().e();
>> 242 if ( e > theResult.GetSecondary( ifast )->GetParticle()->Get4Momentum().e() )
>> 243 {
>> 244 // among photons, the highest E becomes the fastest
>> 245 ifast = i;
>> 246 }
>> 247 }
>> 248 }
>> 249 }
>> 250
>> 251
>> 252 G4LorentzVector dif_4p = init_4p_lab - secs_4p_lab;
>> 253
>> 254 //G4cout << "HP_DB dif_4p " << init_4p_lab - secs_4p_lab << G4endl;
>> 255 //G4cout << "HP_DB dif_3p mag " << ( dif_4p.v() ).mag() << G4endl;
>> 256 //G4cout << "HP_DB dif_e " << dif_4p.e() - ( dif_4p.v() ).mag()<< G4endl;
>> 257
>> 258 G4LorentzVector p4(0);
>> 259 if ( ires == -1 )
>> 260 {
>> 261 // Create and Add Residual Nucleus
>> 262 ires = nSecondaries;
>> 263 nSecondaries += 1;
>> 264
>> 265 G4DynamicParticle* res = new G4DynamicParticle ( resi_pd , dif_4p.v() );
>> 266 theResult.AddSecondary ( res );
>> 267
>> 268 p4 = res->Get4Momentum();
>> 269 if ( slow > p4.beta() )
>> 270 {
>> 271 slow = p4.beta();
>> 272 islow = ires;
>> 273 }
>> 274 dif_4p = init_4p_lab - ( secs_4p_lab + p4 );
>> 275 }
>> 276
>> 277 if ( needOneMoreSec && oneMoreSec_pd)
>> 278 //
>> 279 // fca: this is not a fix, this is a crash avoidance...
>> 280 // fca: the baryon number is still wrong, most probably because it
>> 281 // fca: should have been decreased, but since we could not create a particle
>> 282 // fca: we just do not add it
>> 283 //
>> 284 {
>> 285 nSecondaries += 1;
>> 286 G4DynamicParticle* one = new G4DynamicParticle ( oneMoreSec_pd , dif_4p.v() );
>> 287 theResult.AddSecondary ( one );
>> 288 p4 = one->Get4Momentum();
>> 289 if ( slow > p4.beta() )
>> 290 {
>> 291 slow = p4.beta();
>> 292 islow = nSecondaries-1; //Because the first is 0th, so the last becomes "nSecondaries-1"
222 } 293 }
223 } << 294 dif_4p = init_4p_lab - ( secs_4p_lab + p4 );
224 } << 295 }
225 296
226 G4LorentzVector secs_4p_lab(0.0); << 297 //Which is bigger dif_p or dif_e
>> 298
>> 299 if ( dif_4p.v().mag() < std::abs( dif_4p.e() ) )
>> 300 {
>> 301
>> 302 // Adjust p
>> 303 //if ( dif_4p.v().mag() < 1*MeV )
>> 304 if ( minimum_energy < dif_4p.v().mag() && dif_4p.v().mag() < 1*MeV )
>> 305 {
>> 306
>> 307 nSecondaries += 1;
>> 308 theResult.AddSecondary ( new G4DynamicParticle ( G4Gamma::Gamma() , dif_4p.v() ) );
227 309
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 } 310 }
267 } << 311 else
268 } << 312 {
>> 313 //G4cout << "HP_DB Difference in dif_p is too large (>1MeV) or too small(<1keV) to adjust, so that give up tuning" << G4endl;
>> 314 }
269 315
270 G4LorentzVector dif_4p = init_4p_lab - secs_ << 316 }
>> 317 else
>> 318 {
>> 319
>> 320 // dif_p > dif_e
>> 321 // at first momentum
>> 322 // Move residual momentum
>> 323
>> 324 p4 = theResult.GetSecondary( ires )->GetParticle()->Get4Momentum();
>> 325 theResult.GetSecondary( ires )->GetParticle()->SetMomentum( p4.v() + dif_4p.v() );
>> 326 dif_4p = init_4p_lab - ( secs_4p_lab - p4 + theResult.GetSecondary( ires )->GetParticle()->Get4Momentum() );
>> 327
>> 328 //G4cout << "HP_DB new residual kinetic energy " << theResult.GetSecondary( ires )->GetParticle()->GetKineticEnergy() << G4endl;
>> 329
>> 330 }
>> 331
>> 332 G4double dif_e = dif_4p.e() - ( dif_4p.v() ).mag();
>> 333 //G4cout << "HP_DB dif_e " << dif_e << G4endl;
>> 334
>> 335 if ( dif_e > 0 )
>> 336 {
>> 337
>> 338 // create 2 gamma
>> 339
>> 340 nSecondaries += 2;
>> 341 G4double e1 = ( dif_4p.e() -dif_4p.v().mag() ) / 2;
>> 342
>> 343 if ( minimum_energy < e1 )
>> 344 {
>> 345 G4double costh = 2.*G4UniformRand()-1.;
>> 346 G4double phi = twopi*G4UniformRand();
>> 347 G4ThreeVector dir( std::sin(std::acos(costh))*std::cos(phi),
>> 348 std::sin(std::acos(costh))*std::sin(phi),
>> 349 costh);
>> 350 theResult.AddSecondary ( new G4DynamicParticle ( G4Gamma::Gamma() , e1*dir ) );
>> 351 theResult.AddSecondary ( new G4DynamicParticle ( G4Gamma::Gamma() , -e1*dir ) );
>> 352 }
>> 353 else
>> 354 {
>> 355 //G4cout << "HP_DB Difference is too small(<1keV) to adjust, so that neglect it" << G4endl;
>> 356 }
>> 357
>> 358 }
>> 359 else //dif_e < 0
>> 360 {
>> 361
>> 362 // At first reduce KE of the fastest secondary;
>> 363 G4double ke0 = theResult.GetSecondary( ifast )->GetParticle()->GetKineticEnergy();
>> 364 G4ThreeVector p0 = theResult.GetSecondary( ifast )->GetParticle()->GetMomentum();
>> 365 G4ThreeVector dir = ( theResult.GetSecondary( ifast )->GetParticle()->GetMomentum() ).unit();
>> 366
>> 367 //G4cout << "HP_DB ifast " << ifast << " ke0 " << ke0 << G4endl;
>> 368
>> 369 if ( ke0 + dif_e > 0 )
>> 370 {
>> 371 theResult.GetSecondary( ifast )->GetParticle()->SetKineticEnergy( ke0 + dif_e );
>> 372 G4ThreeVector dp = p0 - theResult.GetSecondary( ifast )->GetParticle()->GetMomentum();
>> 373
>> 374 G4ThreeVector p = theResult.GetSecondary( islow )->GetParticle()->GetMomentum();
>> 375 //theResult.GetSecondary( islow )->GetParticle()->SetMomentum( p - dif_e*dir );
>> 376 theResult.GetSecondary( islow )->GetParticle()->SetMomentum( p + dp );
>> 377 }
>> 378 else
>> 379 {
>> 380 //G4cout << "HP_DB Difference in dif_e too large ( <0MeV ) to adjust, so that give up tuning" << G4endl;
>> 381 }
>> 382
>> 383 }
271 384
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 } 385 }
>> 386
357 387