| 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 "G4INCLNpiToLK2piChannel.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 NpiToLK2piChannel::angularSlo
50
51 NpiToLK2piChannel::NpiToLK2piChannel(Particl
52 : particle1(p1), particle2(p2)
53 {}
54
55 NpiToLK2piChannel::~NpiToLK2piChannel(){}
56
57 void NpiToLK2piChannel::fillFinalState(Final
58
59 // p pi+ -> L K+ pi+ pi0 (1)
60 // p pi+ -> L K0 pi+ pi+ (1)
61 //
62 // p pi0 -> L K+ pi0 pi0 (1/4)
63 // p pi0 -> L K+ pi+ pi- (1)
64 // p pi0 -> L K0 pi+ pi0 (1/2)
65 //
66 // p pi- -> L K+ pi0 pi- (1)
67 // p pi- -> L K0 pi+ pi- (1)
68 // p pi- -> L K0 pi0 pi0 (1/2)
69
70 Particle *nucleon;
71 Particle *pion;
72
73 if(particle1->isNucleon()){
74 nucleon = particle1;
75 pion = particle2;
76 }
77 else{
78 nucleon = particle2;
79 pion = particle1;
80 }
81
82 const G4double sqrtS = KinematicsUtils::to
83
84 const G4int iso = ParticleTable::getIsospi
85 G4double rdm = Random::shoot();
86
87 ParticleType KaonType;
88 ParticleType PionType;
89
90 if(iso == 3 || iso == -3){
91 if(rdm < 0.5){
92 KaonType = ParticleTable::getKaonType(
93 PionType = PiZero;
94 }
95 else{
96 KaonType = ParticleTable::getKaonType(
97 PionType = ParticleTable::getPionType(
98 }
99 }
100 else if(pion->getType() == PiZero){
101 if(rdm*7. < 1.){
102 KaonType = ParticleTable::getKaonType(
103 PionType = PiZero;
104 }
105 else if(rdm*7. < 5.){
106 KaonType = ParticleTable::getKaonType(
107 pion->setType(PiPlus);
108 PionType = PiMinus;
109 }
110 else{
111 KaonType = ParticleTable::getKaonType(
112 PionType = ParticleTable::getPionType(
113 }
114 }
115 else{
116 if(rdm*5. < 2.){
117 KaonType = ParticleTable::getKaonType(
118 PionType = PiZero;
119 }
120 else if(rdm*5. < 4.){
121 KaonType = ParticleTable::getKaonType(
122 PionType = ParticleTable::getPionType(
123 }
124 else{
125 KaonType = ParticleTable::getKaonType(
126 pion->setType(PiZero);
127 PionType = PiZero;
128 }
129 }
130
131 nucleon->setType(Lambda);
132
133 #ifdef INCLXX_IN_GEANT4_MODE
134 // Erase the parent resonance information
135 nucleon->setParentResonancePDGCode(0);
136 nucleon->setParentResonanceID(0);
137 pion->setParentResonancePDGCode(0);
138 pion->setParentResonanceID(0);
139 #endif
140
141 ParticleList list;
142 list.push_back(nucleon);
143 list.push_back(pion);
144 const ThreeVector &rcol1 = nucleon->getPos
145 const ThreeVector &rcol2 = pion->getPositi
146 const ThreeVector zero;
147 Particle *kaon = new Particle(KaonType,zer
148 Particle *pion2 = new Particle(PionType,ze
149 list.push_back(kaon);
150 list.push_back(pion2);
151
152 PhaseSpaceGenerator::generateBiased(sqrtS,
153
154 INCL_DEBUG("NpiToLK2pi " << (kaon->getMome
155
156 fs->addModifiedParticle(nucleon);
157 fs->addModifiedParticle(pion);
158 fs->addCreatedParticle(kaon);
159 fs->addCreatedParticle(pion2);
160
161 }
162 }
163