| 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 // $Id: G4BGGPionElasticXS.cc,v 1.3 2008/12/01 16:50:23 vnivanch Exp $
>> 27 // GEANT4 tag $Name: geant4-09-02 $
26 // 28 //
27 // ------------------------------------------- 29 // -------------------------------------------------------------------
28 // 30 //
29 // GEANT4 Class file 31 // GEANT4 Class file
30 // 32 //
31 // 33 //
32 // File name: G4BGGPionElasticXS 34 // File name: G4BGGPionElasticXS
33 // 35 //
34 // Author: Vladimir Ivanchenko 36 // Author: Vladimir Ivanchenko
35 // 37 //
36 // Creation date: 01.10.2003 38 // Creation date: 01.10.2003
37 // Modifications: 39 // Modifications:
38 // 40 //
>> 41 //
39 // ------------------------------------------- 42 // -------------------------------------------------------------------
40 // 43 //
41 44
42 #include "G4BGGPionElasticXS.hh" 45 #include "G4BGGPionElasticXS.hh"
43 #include "G4SystemOfUnits.hh" << 46 #include "G4GlauberGribovCrossSection.hh"
44 #include "G4ComponentGGHadronNucleusXsc.hh" <<
45 #include "G4UPiNuclearCrossSection.hh" 47 #include "G4UPiNuclearCrossSection.hh"
46 #include "G4HadronNucleonXsc.hh" 48 #include "G4HadronNucleonXsc.hh"
47 #include "G4NuclearRadii.hh" <<
48 <<
49 #include "G4Proton.hh" <<
50 #include "G4PionPlus.hh" 49 #include "G4PionPlus.hh"
51 #include "G4PionMinus.hh" 50 #include "G4PionMinus.hh"
52 #include "G4NistManager.hh" 51 #include "G4NistManager.hh"
53 #include "G4HadronicParameters.hh" <<
54 #include "G4Pow.hh" <<
55 <<
56 G4double G4BGGPionElasticXS::theGlauberFacPiPl <<
57 G4double G4BGGPionElasticXS::theCoulombFacPiPl <<
58 G4double G4BGGPionElasticXS::theGlauberFacPiMi <<
59 G4double G4BGGPionElasticXS::theCoulombFacPiMi <<
60 G4int G4BGGPionElasticXS::theA[93] = {0}; <<
61 52
62 //....oooOO0OOooo........oooOO0OOooo........oo 53 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
63 54
64 G4BGGPionElasticXS::G4BGGPionElasticXS(const G << 55 G4BGGPionElasticXS::G4BGGPionElasticXS(const G4ParticleDefinition*)
65 : G4VCrossSectionDataSet("BarashenkovGlauberG <<
66 { 56 {
67 verboseLevel = 0; 57 verboseLevel = 0;
68 fGlauberEnergy = 91.*CLHEP::GeV; << 58 fGlauberEnergy = 91.*GeV;
69 fLowEnergy = 20.*CLHEP::MeV; << 59 fLowEnergy = 20.*MeV;
70 fLowestEnergy = 1.*CLHEP::MeV; << 60 fPion = 0;
71 SetMinKinEnergy(0.0); << 61 fGlauber = 0;
72 SetMaxKinEnergy( G4HadronicParameters::Insta << 62 fHadron = 0;
73 << 63 particle = 0;
74 fPion = new G4UPiNuclearCrossSection(); << 64 isPiplus = false;
75 fGlauber = new G4ComponentGGHadronNucleusXsc << 65 isInitialized = false;
76 fHadron = new G4HadronNucleonXsc(); <<
77 <<
78 fG4pow = G4Pow::GetInstance(); <<
79 <<
80 theProton = G4Proton::Proton(); <<
81 thePiPlus = G4PionPlus::PionPlus(); <<
82 isPiplus = (p == thePiPlus); <<
83 SetForAllAtomsAndEnergies(true); <<
84 <<
85 if (0 == theA[0]) { Initialise(); } <<
86 } 66 }
87 67
88 //....oooOO0OOooo........oooOO0OOooo........oo 68 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
89 69
90 G4BGGPionElasticXS::~G4BGGPionElasticXS() 70 G4BGGPionElasticXS::~G4BGGPionElasticXS()
91 { 71 {
>> 72 delete fGlauber;
>> 73 delete fPion;
92 delete fHadron; 74 delete fHadron;
93 } 75 }
94 76
95 //....oooOO0OOooo........oooOO0OOooo........oo 77 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
96 78
97 G4bool << 79 G4double G4BGGPionElasticXS::GetIsoZACrossSection(const G4DynamicParticle* dp,
98 G4BGGPionElasticXS::IsElementApplicable(const << 80 G4double Z,
99 const << 81 G4double A,
100 { << 82 G4double)
101 return true; <<
102 } <<
103 <<
104 //....oooOO0OOooo........oooOO0OOooo........oo <<
105 <<
106 G4bool G4BGGPionElasticXS::IsIsoApplicable(con <<
107 G4i <<
108 con <<
109 { <<
110 return (1 == Z); <<
111 } <<
112 <<
113 //....oooOO0OOooo........oooOO0OOooo........oo <<
114 <<
115 G4double <<
116 G4BGGPionElasticXS::GetElementCrossSection(con <<
117 G4i <<
118 { 83 {
119 // this method should be called only for Z > <<
120 G4double cross = 0.0; 84 G4double cross = 0.0;
121 G4double ekin = std::max(dp->GetKineticEnerg << 85 G4double ekin = dp->GetKineticEnergy();
122 G4int Z = std::min(ZZ, 92); << 86 G4int iz = G4int(Z);
123 if(1 == Z) { << 87 if(iz > 92) iz = 92;
124 cross = 1.0115*GetIsoCrossSection(dp,1,1); << 88
125 } else { << 89 if(ekin <= fLowEnergy) {
126 if(ekin <= fLowEnergy) { << 90 cross = theCoulombFac[iz];
127 cross = (isPiplus) ? theCoulombFacPiPlus << 91 if(isPiplus) { cross *= CoulombFactor(ekin, A); }
128 : theCoulombFacPiMinus[Z]*FactorPiMinu << 92
129 } else if(ekin > fGlauberEnergy) { << 93 } else if(iz == 1) {
130 cross = (isPiplus) ? theGlauberFacPiPlus << 94 if( A < 1.5) {
131 cross *= fGlauber->GetElasticGlauberGrib << 95 //fHadron->GetHadronNucleonXscPDG(dp, G4Proton::Proton());
>> 96 //fHadron->GetHadronNucleonXscEL(dp, G4Proton::Proton());
>> 97 fHadron->GetHadronNucleonXscNS(dp, G4Proton::Proton());
>> 98 //fHadron->GetHadronNucleonXscVU(dp, G4Proton::Proton());
>> 99 //fHadron->GetHadronNucleonXscMK(dp, G4Proton::Proton());
>> 100 cross = fHadron->GetElasticHadronNucleonXsc();
132 } else { 101 } else {
133 cross = fPion->GetElasticCrossSection(dp << 102 fHadron->GetHadronNucleonXscNS(dp, G4Proton::Proton());
>> 103 cross = fHadron->GetElasticHadronNucleonXsc();
>> 104 fHadron->GetHadronNucleonXscNS(dp, G4Neutron::Neutron());
>> 105 cross += fHadron->GetElasticHadronNucleonXsc();
134 } 106 }
>> 107 } else if(ekin > fGlauberEnergy) {
>> 108 cross = theGlauberFac[iz]*fGlauber->GetElasticGlauberGribov(dp, Z, A);
>> 109 } else {
>> 110 cross = fPion->GetElasticCrossSection(dp, Z, A);
135 } 111 }
136 #ifdef G4VERBOSE <<
137 if(verboseLevel > 1) { <<
138 G4cout << "G4BGGPionElasticXS::GetElementC <<
139 << dp->GetDefinition()->GetParticle <<
140 << " Ekin(GeV)= " << dp->GetKineti <<
141 << " in nucleus Z= " << Z << " A= <<
142 << " XS(b)= " << cross/barn <<
143 << G4endl; <<
144 } <<
145 #endif <<
146 return cross; <<
147 } <<
148 112
149 //....oooOO0OOooo........oooOO0OOooo........oo << 113 if(verboseLevel > 1)
>> 114 G4cout << "G4BGGPionElasticXS::GetCrossSection for "
>> 115 << dp->GetDefinition()->GetParticleName()
>> 116 << " Ekin(GeV)= " << dp->GetKineticEnergy()
>> 117 << " in nucleus Z= " << Z << " A= " << A
>> 118 << " XS(b)= " << cross/barn
>> 119 << G4endl;
150 120
151 G4double <<
152 G4BGGPionElasticXS::GetIsoCrossSection(const G <<
153 G4int, <<
154 const G <<
155 const G <<
156 const G <<
157 { <<
158 // this method should be called only for Z = <<
159 fHadron->HadronNucleonXscNS(dp->GetDefinitio <<
160 dp->GetKineticEn <<
161 G4double cross = A*fHadron->GetElasticHadron <<
162 <<
163 #ifdef G4VERBOSE <<
164 if(verboseLevel > 1) { <<
165 G4cout << "G4BGGPionElasticXS::GetIsoCross <<
166 << dp->GetDefinition()->GetParticle <<
167 << " Ekin(GeV)= " << dp->GetKineti <<
168 << " in nucleus Z=1 A=" << A <<
169 << " XS(b)= " << cross/barn <<
170 << G4endl; <<
171 } <<
172 #endif <<
173 return cross; 121 return cross;
174 } 122 }
175 123
176 //....oooOO0OOooo........oooOO0OOooo........oo 124 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
177 125
178 void G4BGGPionElasticXS::BuildPhysicsTable(con 126 void G4BGGPionElasticXS::BuildPhysicsTable(const G4ParticleDefinition& p)
179 { 127 {
180 if(verboseLevel > 1) { <<
181 G4cout << "G4BGGPionElasticXS::BuildPhysic <<
182 << p.GetParticleName() << G4endl; <<
183 } <<
184 if(&p == G4PionPlus::PionPlus() || &p == G4P 128 if(&p == G4PionPlus::PionPlus() || &p == G4PionMinus::PionMinus()) {
185 isPiplus = (&p == G4PionPlus::PionPlus()); << 129 particle = &p;
>> 130 Initialise();
186 } else { 131 } else {
187 G4ExceptionDescription ed; << 132 G4cout << "### G4BGGPionElasticXS WARNING: is not applicable to "
188 ed << "This BGG cross section is applicabl << 133 << p.GetParticleName()
189 << p.GetParticleName() << G4endl; << 134 << G4endl;
190 G4Exception("G4BGGPionElasticXS::BuildPhys <<
191 FatalException, ed); <<
192 } 135 }
193 } 136 }
194 137
195 //....oooOO0OOooo........oooOO0OOooo........oo 138 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
196 139
197 void G4BGGPionElasticXS::Initialise() << 140 void G4BGGPionElasticXS::DumpPhysicsTable(const G4ParticleDefinition&)
>> 141 {
>> 142 G4cout << "G4BGGPionElasticXS:"<<G4endl;
>> 143 }
>> 144
>> 145 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
>> 146
>> 147 void G4BGGPionElasticXS::Initialise()
198 { 148 {
199 theA[0] = theA[1] = 1; << 149 if(isInitialized) return;
>> 150 isInitialized = true;
>> 151
>> 152 fPion = new G4UPiNuclearCrossSection();
>> 153 fGlauber = new G4GlauberGribovCrossSection();
>> 154 fHadron = new G4HadronNucleonXsc();
>> 155 fPion->BuildPhysicsTable(*particle);
>> 156 fGlauber->BuildPhysicsTable(*particle);
>> 157 if(particle == G4PionPlus::PionPlus()) isPiplus = true;
>> 158
>> 159 G4ParticleDefinition* part = const_cast<G4ParticleDefinition*>(particle);
200 G4ThreeVector mom(0.0,0.0,1.0); 160 G4ThreeVector mom(0.0,0.0,1.0);
201 G4DynamicParticle dp(thePiPlus, mom, fGlaube << 161 G4DynamicParticle dp(part, mom, fGlauberEnergy);
202 162
203 G4NistManager* nist = G4NistManager::Instanc 163 G4NistManager* nist = G4NistManager::Instance();
204 164
205 G4double csup, csdn; << 165 G4double A, csup, csdn;
206 for (G4int iz=2; iz<93; ++iz) { <<
207 166
208 G4int A = G4lrint(nist->GetAtomicMassAmu(i << 167 if(verboseLevel > 0) G4cout << "### G4BGGPionElasticXS::Initialise for "
209 theA[iz] = A; << 168 << particle->GetParticleName() << G4endl;
210 169
211 csup = fGlauber->GetElasticGlauberGribov(& << 170 for(G4int iz=2; iz<93; iz++) {
212 csdn = fPion->GetElasticCrossSection(&dp, <<
213 theGlauberFacPiPlus[iz] = csdn/csup; <<
214 } <<
215 171
216 dp.SetDefinition(G4PionMinus::PionMinus()); << 172 G4double Z = G4double(iz);
217 for (G4int iz=2; iz<93; ++iz) { << 173 A = nist->GetAtomicMassAmu(iz);
218 csup = fGlauber->GetElasticGlauberGribov(& << 174
219 csdn = fPion->GetElasticCrossSection(&dp, << 175 csup = fGlauber->GetElasticGlauberGribov(&dp, Z, A);
220 theGlauberFacPiMinus[iz] = csdn/csup; << 176 csdn = fPion->GetElasticCrossSection(&dp, Z, A);
221 << 177
222 if (verboseLevel > 1) { << 178 theGlauberFac[iz] = csdn/csup;
223 G4cout << "Z= " << iz << " A= " << the << 179 if(verboseLevel > 0) G4cout << "Z= " << Z << " A= " << A
224 << " factorPiPlus= " << theGlauberFacPi << 180 << " factor= " << theGlauberFac[iz] << G4endl;
225 << " factorPiMinus= " << theGlauberFacP <<
226 << G4endl; <<
227 } <<
228 } 181 }
229 theCoulombFacPiPlus[1] = 1.0; <<
230 theCoulombFacPiMinus[1]= 1.0; <<
231 dp.SetKineticEnergy(fLowEnergy); 182 dp.SetKineticEnergy(fLowEnergy);
232 dp.SetDefinition(thePiPlus); << 183 fHadron->GetHadronNucleonXscNS(&dp, G4Proton::Proton());
233 for (G4int iz=2; iz<93; ++iz) { << 184 theCoulombFac[1] = fHadron->GetElasticHadronNucleonXsc();
234 theCoulombFacPiPlus[iz] = fPion->GetElasti << 185 if(isPiplus) { theCoulombFac[1] /= CoulombFactor(fLowEnergy,1.0); }
235 /CoulombFactorPiPlus(fLowEnergy, iz); << 186
236 } << 187 for(G4int iz=2; iz<93; iz++) {
237 dp.SetDefinition(G4PionMinus::PionMinus()); << 188
238 for(G4int iz=2; iz<93; ++iz) { << 189 G4double Z = G4double(iz);
239 theCoulombFacPiMinus[iz] = fPion->GetElast << 190 A = nist->GetAtomicMassAmu(iz);
240 /FactorPiMinus(fLowEnergy); << 191
241 << 192 theCoulombFac[iz] = fPion->GetElasticCrossSection(&dp, Z, A);
242 if(verboseLevel > 1) { << 193 if(isPiplus) { theCoulombFac[iz] /= CoulombFactor(fLowEnergy,A); }
243 G4cout << "Z= " << iz << " A= " << the << 194 if(verboseLevel > 0) G4cout << "Z= " << Z << " A= " << A
244 << " CoulombFactorPiPlus= " << theCoulo << 195 << " factor= " << theCoulombFac[iz] << G4endl;
245 << " CoulombFactorPiMinus= " << theCoul <<
246 << G4endl; <<
247 } <<
248 } 196 }
249 } 197 }
250 198
251 //....oooOO0OOooo........oooOO0OOooo........oo 199 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
252 200
253 G4double G4BGGPionElasticXS::CoulombFactorPiPl << 201 G4double G4BGGPionElasticXS::CoulombFactor(G4double kinEnergy, G4double A)
254 { 202 {
255 return (kinEnergy > 0.0) ? << 203 G4double res= 0.0;
256 G4NuclearRadii::CoulombFactor(Z, theA[Z], << 204 if(kinEnergy <= DBL_MIN) return res;
257 } << 205 else if(A < 1.5) return kinEnergy*kinEnergy;
>> 206
>> 207 G4double elog = std::log10(kinEnergy/GeV);
258 208
259 //....oooOO0OOooo........oooOO0OOooo........oo << 209 // from G4ProtonInelasticCrossSection
>> 210 G4double f1 = 8.0 - 8.0/A - 0.008*A;
>> 211 G4double f2 = 2.34 - 5.4/A - 0.0028*A;
260 212
261 G4double G4BGGPionElasticXS::FactorPiMinus(G4d << 213 res = 1.0/(1.0 + std::exp(-f1*(elog + f2)));
262 { << 214
263 return 1.0/std::sqrt(kinEnergy); << 215 f1 = 5.6 - 0.016*A;
>> 216 f2 = 1.37 + 1.37/A;
>> 217 res *= ( 1.0 + (0.8 + 18./A - 0.002*A)/(1.0 + std::exp(f1*(elog + f2))));
>> 218 return res;
264 } 219 }
265 220
266 //....oooOO0OOooo........oooOO0OOooo........oo 221 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo......
267 222
268 void <<
269 G4BGGPionElasticXS::CrossSectionDescription(st <<
270 { <<
271 outFile << "The Barashenkov-Glauber-Gribov c <<
272 << "scattering of pions from nuclei <<
273 << "Barashenkov parameterization is <<
274 << "Glauber-Gribov parameterization <<
275 } <<
276 223
277 //....oooOO0OOooo........oooOO0OOooo........oo <<
278 224