| 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 // INCL++ intra-nuclear cascade model
27 // Alain Boudard, CEA-Saclay, France
28 // Joseph Cugnon, University of Liege, Belgium
29 // Jean-Christophe David, CEA-Saclay, France
30 // Pekka Kaitaniemi, CEA-Saclay, France, and H
31 // Sylvie Leray, CEA-Saclay, France
32 // Davide Mancusi, CEA-Saclay, France
33 //
34 #define INCLXX_IN_GEANT4_MODE 1
35
36 #include "globals.hh"
37
38 #include "G4INCLPiNToMultiPionsChannel.hh"
39 #include "G4INCLKinematicsUtils.hh"
40 #include "G4INCLBinaryCollisionAvatar.hh"
41 #include "G4INCLRandom.hh"
42 #include "G4INCLGlobals.hh"
43 #include "G4INCLLogger.hh"
44 #include <algorithm>
45 #include "G4INCLPhaseSpaceGenerator.hh"
46
47 namespace G4INCL {
48
49 const G4double PiNToMultiPionsChannel::angul
50
51 PiNToMultiPionsChannel::PiNToMultiPionsChann
52 : npion(npi),
53 ind2(0),
54 particle1(p1),
55 particle2(p2)
56 {
57 std::fill(isosp, isosp+4, 0);
58 }
59
60 PiNToMultiPionsChannel::~PiNToMultiPionsChan
61
62 }
63
64 void PiNToMultiPionsChannel::fillFinalState(
65
66 // assert(npion > 1 && npion < 5);
67
68 Particle * nucleon;
69 Particle * pion;
70 if(particle1->isNucleon()) {
71 nucleon = particle1;
72 pion = particle2;
73 } else {
74 nucleon = particle2;
75 pion = particle1;
76 }
77 #ifdef INCLXX_IN_GEANT4_MODE
78 // Erase the parent resonance information
79 nucleon->setParentResonancePDGCode(0);
80 nucleon->setParentResonanceID(0);
81 pion->setParentResonancePDGCode(0);
82 pion->setParentResonanceID(0);
83 #endif
84 G4int ipi=ParticleTable::getIsospin(pion
85 ind2=ParticleTable::getIsospin(nucleon->
86
87 ParticleList list;
88 list.push_back(nucleon);
89 list.push_back(pion);
90 fs->addModifiedParticle(nucleon);
91 fs->addModifiedParticle(pion);
92
93 isospinRepartition(ipi);
94
95 const ParticleType tn=ParticleTable::get
96 nucleon->setType(tn);
97 ParticleType pionType=ParticleTable::get
98 pion->setType(pionType);
99 const ThreeVector &rcolpion = pion->getP
100 const ThreeVector zero;
101 for(G4int i=1; i<npion; ++i) {
102 pionType=ParticleTable::getPionType(is
103 Particle *newPion = new Particle(pionT
104 newPion->setType(pionType);
105 list.push_back(newPion);
106 fs->addCreatedParticle(newPion);
107 }
108
109 const G4double sqrtS = KinematicsUtils::
110 PhaseSpaceGenerator::generateBiased(sqrt
111
112 }
113
114 void PiNToMultiPionsChannel::isospinRepart
115 G4double rjcd=Random::shoot();
116 const G4int itot=ipi*ind2;
117
118 isosp[1]=ipi;
119 if (npion != 3) {
120 if (npion == 4){
121 const G4double r2 = Random::shoo
122 if (r2*3. > 2.) {
123 isosp[2]= 0;
124 isosp[3]= 0;
125 }
126 else {
127 isosp[2]= 2;
128 isosp[3]= -2;
129 }
130 }
131
132 if (itot == 2) {
133 // CAS PI+ P ET PI- n
134 rjcd *= 5.;
135 if (rjcd > 3.) {
136 // PI+ PI+ N ET PI- P
137 isosp[0]=2*ind2;
138 isosp[1]=ipi;
139 ind2=-ind2;
140 }
141 else {
142 // PI+ PI0 P ET PI- P
143 isosp[0]=0;
144 isosp[1]=ipi;
145 }
146 }
147 else if (itot == 0) {
148 // CAS PI0 P ET PI0 N
149 rjcd *= 90.;
150 if (rjcd > 13.) {
151 if (rjcd > 52.) {
152 // PI+ PI0 N ET PI
153 isosp[0]=2*ind2;
154 isosp[1]=0;
155 ind2=-ind2;
156 }
157 else {
158 // PI+ PI- P ET PI
159 isosp[1]=-2;
160 isosp[0]=2;
161 }
162 }
163 else {
164 // PI0 PI0 P ET PI0 PI
165 isosp[0]=0;
166 isosp[1]=0;
167 }
168 }
169 else if (itot == -2) {
170 // CAS PI- P ET PI+ N
171 rjcd *= 45.;
172 if (rjcd > 17.) {
173 if (rjcd > 24.) {
174 // PI+ PI- N ET PI
175 isosp[0]=2*ind2;
176 ind2=-ind2;
177 }
178 else {
179 // PI0 PI0 N ET PI
180 isosp[0]=0;
181 isosp[1]=0;
182 ind2=-ind2;
183 }
184 }
185 else
186 // PI- PI0 P ET PI+ PI
187 isosp[0]=0;
188 }
189 } // if (npion != 3)
190 else {
191 // PI N -> PI PI PI N
192 // IF (IPI*IND2) 20,21,22
193 if (itot == -2) {
194 // CAS PI- P ET PI+ N
195 rjcd *= 135.;
196 if (rjcd <= 28.) {
197 // PI0 PI0 PI0 N ET PI
198 isosp[0]=0;
199 isosp[1]=0;
200 isosp[2]=0;
201 ind2=-ind2;
202 }
203 else {
204 if (rjcd <= 84.) {
205 // PI+ PI- PI0 N E
206 isosp[0]=2*ind2;
207 isosp[2]=0;
208 ind2=-ind2;
209 }
210 else {
211 if (rjcd <= 118.) {
212 // PI- PI- PI+
213 isosp[0]=ipi;
214 isosp[2]=-ipi;
215 }
216 else {
217 // PI- PI0 PI0
218 isosp[0]=0;
219 isosp[2]=0;
220 }
221 }
222 }
223 }
224 else if (itot == 0) {
225 // CAS PI0 P ET PI0 N
226 rjcd *= 270.;
227 if (rjcd <= 39.) {
228 // PI0 PI0 PI0 P ET PI
229 isosp[0]=0;
230 isosp[2]=0;
231 }
232 else {
233 if (rjcd <= 156.) {
234 // PI+ PI- PI0 P E
235 isosp[0]=2;
236 isosp[2]=-2;
237 }
238 else {
239 if (rjcd <= 194.) {
240 // PI+ PI0 PI0
241 isosp[0]=0;
242 isosp[2]=2*ind2;
243 ind2=-ind2;
244 }
245 else {
246 // PI- PI+ PI+
247 isosp[0]=2*ind2;
248 isosp[1]=2*ind2;
249 isosp[2]=-2*ind2;
250 ind2=-ind2;
251 }
252 }
253 }
254 }
255 else if (itot == 2) {
256 // CAS PI+ P ET PI- N
257 rjcd *= 5.;
258 if (rjcd <= 2.) {
259 // PI+ P PI0 PI0 ET PI
260 isosp[0]=0;
261 isosp[2]=0;
262 }
263 else {
264 if (rjcd <= 3.) {
265 // PI+ P PI+ PI- E
266 isosp[0]=-2;
267 isosp[2]=2;
268 }
269 else {
270 // PI+ N PI+ PI0 E
271 isosp[0]=2*ind2;
272 isosp[2]=0;
273 ind2=-ind2;
274 }
275 }
276 }
277 }
278
279 std::shuffle(isosp,isosp+npion,Random:
280 }
281
282 }
283