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.7 2009/11/19 19:40:45 vnivanch Exp $ >> 27 // GEANT4 tag $Name: geant4-09-03-patch-01 $ 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->GetHadronNucleonXscNS(dp, G4Proton::Proton()); >> 96 cross = fHadron->GetElasticHadronNucleonXsc(); 132 } else { 97 } else { 133 cross = fPion->GetElasticCrossSection(dp << 98 fHadron->GetHadronNucleonXscNS(dp, G4Proton::Proton()); >> 99 cross = fHadron->GetElasticHadronNucleonXsc(); >> 100 fHadron->GetHadronNucleonXscNS(dp, G4Neutron::Neutron()); >> 101 cross += fHadron->GetElasticHadronNucleonXsc(); 134 } 102 } >> 103 } else if(ekin > fGlauberEnergy) { >> 104 cross = theGlauberFac[iz]*fGlauber->GetElasticGlauberGribov(dp, Z, A); >> 105 } else { >> 106 cross = fPion->GetElasticCrossSection(dp, Z, A); 135 } 107 } 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 108 149 //....oooOO0OOooo........oooOO0OOooo........oo << 109 if(verboseLevel > 1) >> 110 G4cout << "G4BGGPionElasticXS::GetCrossSection for " >> 111 << dp->GetDefinition()->GetParticleName() >> 112 << " Ekin(GeV)= " << dp->GetKineticEnergy() >> 113 << " in nucleus Z= " << Z << " A= " << A >> 114 << " XS(b)= " << cross/barn >> 115 << G4endl; 150 116 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; 117 return cross; 174 } 118 } 175 119 176 //....oooOO0OOooo........oooOO0OOooo........oo 120 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 177 121 178 void G4BGGPionElasticXS::BuildPhysicsTable(con 122 void G4BGGPionElasticXS::BuildPhysicsTable(const G4ParticleDefinition& p) 179 { 123 { 180 if(verboseLevel > 1) { << 181 G4cout << "G4BGGPionElasticXS::BuildPhysic << 182 << p.GetParticleName() << G4endl; << 183 } << 184 if(&p == G4PionPlus::PionPlus() || &p == G4P 124 if(&p == G4PionPlus::PionPlus() || &p == G4PionMinus::PionMinus()) { 185 isPiplus = (&p == G4PionPlus::PionPlus()); << 125 particle = &p; >> 126 Initialise(); 186 } else { 127 } else { 187 G4ExceptionDescription ed; << 128 G4cout << "### G4BGGPionElasticXS WARNING: is not applicable to " 188 ed << "This BGG cross section is applicabl << 129 << p.GetParticleName() 189 << p.GetParticleName() << G4endl; << 130 << G4endl; 190 G4Exception("G4BGGPionElasticXS::BuildPhys << 191 FatalException, ed); << 192 } 131 } 193 } 132 } 194 133 195 //....oooOO0OOooo........oooOO0OOooo........oo 134 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 196 135 197 void G4BGGPionElasticXS::Initialise() << 136 void G4BGGPionElasticXS::DumpPhysicsTable(const G4ParticleDefinition&) >> 137 { >> 138 G4cout << "G4BGGPionElasticXS:"<<G4endl; >> 139 } >> 140 >> 141 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... >> 142 >> 143 void G4BGGPionElasticXS::Initialise() 198 { 144 { 199 theA[0] = theA[1] = 1; << 145 if(isInitialized) return; >> 146 isInitialized = true; >> 147 >> 148 fPion = new G4UPiNuclearCrossSection(); >> 149 fGlauber = new G4GlauberGribovCrossSection(); >> 150 fHadron = new G4HadronNucleonXsc(); >> 151 fPion->BuildPhysicsTable(*particle); >> 152 fGlauber->BuildPhysicsTable(*particle); >> 153 if(particle == G4PionPlus::PionPlus()) isPiplus = true; >> 154 >> 155 G4ParticleDefinition* part = const_cast<G4ParticleDefinition*>(particle); 200 G4ThreeVector mom(0.0,0.0,1.0); 156 G4ThreeVector mom(0.0,0.0,1.0); 201 G4DynamicParticle dp(thePiPlus, mom, fGlaube << 157 G4DynamicParticle dp(part, mom, fGlauberEnergy); 202 158 203 G4NistManager* nist = G4NistManager::Instanc 159 G4NistManager* nist = G4NistManager::Instance(); 204 160 205 G4double csup, csdn; << 161 G4double A, csup, csdn; 206 for (G4int iz=2; iz<93; ++iz) { << 207 162 208 G4int A = G4lrint(nist->GetAtomicMassAmu(i << 163 if(verboseLevel > 0) G4cout << "### G4BGGPionElasticXS::Initialise for " 209 theA[iz] = A; << 164 << particle->GetParticleName() << G4endl; 210 165 211 csup = fGlauber->GetElasticGlauberGribov(& << 166 for(G4int iz=2; iz<93; iz++) { 212 csdn = fPion->GetElasticCrossSection(&dp, << 213 theGlauberFacPiPlus[iz] = csdn/csup; << 214 } << 215 167 216 dp.SetDefinition(G4PionMinus::PionMinus()); << 168 G4double Z = G4double(iz); 217 for (G4int iz=2; iz<93; ++iz) { << 169 A = nist->GetAtomicMassAmu(iz); 218 csup = fGlauber->GetElasticGlauberGribov(& << 170 219 csdn = fPion->GetElasticCrossSection(&dp, << 171 csup = fGlauber->GetElasticGlauberGribov(&dp, Z, A); 220 theGlauberFacPiMinus[iz] = csdn/csup; << 172 csdn = fPion->GetElasticCrossSection(&dp, Z, A); 221 << 173 222 if (verboseLevel > 1) { << 174 theGlauberFac[iz] = csdn/csup; 223 G4cout << "Z= " << iz << " A= " << the << 175 if(verboseLevel > 0) G4cout << "Z= " << Z << " A= " << A 224 << " factorPiPlus= " << theGlauberFacPi << 176 << " factor= " << theGlauberFac[iz] << G4endl; 225 << " factorPiMinus= " << theGlauberFacP << 226 << G4endl; << 227 } << 228 } 177 } 229 theCoulombFacPiPlus[1] = 1.0; << 230 theCoulombFacPiMinus[1]= 1.0; << 231 dp.SetKineticEnergy(fLowEnergy); 178 dp.SetKineticEnergy(fLowEnergy); 232 dp.SetDefinition(thePiPlus); << 179 fHadron->GetHadronNucleonXscNS(&dp, G4Proton::Proton()); 233 for (G4int iz=2; iz<93; ++iz) { << 180 theCoulombFac[1] = fHadron->GetElasticHadronNucleonXsc(); 234 theCoulombFacPiPlus[iz] = fPion->GetElasti << 181 if(isPiplus) { theCoulombFac[1] /= CoulombFactor(fLowEnergy,1.0); } 235 /CoulombFactorPiPlus(fLowEnergy, iz); << 182 236 } << 183 for(G4int iz=2; iz<93; iz++) { 237 dp.SetDefinition(G4PionMinus::PionMinus()); << 184 238 for(G4int iz=2; iz<93; ++iz) { << 185 G4double Z = G4double(iz); 239 theCoulombFacPiMinus[iz] = fPion->GetElast << 186 A = nist->GetAtomicMassAmu(iz); 240 /FactorPiMinus(fLowEnergy); << 187 241 << 188 theCoulombFac[iz] = fPion->GetElasticCrossSection(&dp, Z, A); 242 if(verboseLevel > 1) { << 189 if(isPiplus) { theCoulombFac[iz] /= CoulombFactor(fLowEnergy,A); } 243 G4cout << "Z= " << iz << " A= " << the << 190 if(verboseLevel > 0) G4cout << "Z= " << Z << " A= " << A 244 << " CoulombFactorPiPlus= " << theCoulo << 191 << " factor= " << theCoulombFac[iz] << G4endl; 245 << " CoulombFactorPiMinus= " << theCoul << 246 << G4endl; << 247 } << 248 } 192 } 249 } 193 } 250 194 251 //....oooOO0OOooo........oooOO0OOooo........oo 195 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 252 196 253 G4double G4BGGPionElasticXS::CoulombFactorPiPl << 197 G4double G4BGGPionElasticXS::CoulombFactor(G4double kinEnergy, G4double A) 254 { 198 { 255 return (kinEnergy > 0.0) ? << 199 G4double res= 0.0; 256 G4NuclearRadii::CoulombFactor(Z, theA[Z], << 200 if(kinEnergy <= DBL_MIN) return res; 257 } << 201 else if(A < 1.5) return kinEnergy*kinEnergy; >> 202 >> 203 G4double elog = std::log10(kinEnergy/GeV); 258 204 259 //....oooOO0OOooo........oooOO0OOooo........oo << 205 // from G4ProtonInelasticCrossSection >> 206 G4double f1 = 8.0 - 8.0/A - 0.008*A; >> 207 G4double f2 = 2.34 - 5.4/A - 0.0028*A; 260 208 261 G4double G4BGGPionElasticXS::FactorPiMinus(G4d << 209 res = 1.0/(1.0 + std::exp(-f1*(elog + f2))); 262 { << 210 263 return 1.0/std::sqrt(kinEnergy); << 211 f1 = 5.6 - 0.016*A; >> 212 f2 = 1.37 + 1.37/A; >> 213 res *= ( 1.0 + (0.8 + 18./A - 0.002*A)/(1.0 + std::exp(f1*(elog + f2)))); >> 214 return res; 264 } 215 } 265 216 266 //....oooOO0OOooo........oooOO0OOooo........oo 217 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... 267 218 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 219 277 //....oooOO0OOooo........oooOO0OOooo........oo << 278 220