| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer << 3 // * DISCLAIMER *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th << 5 // * The following disclaimer summarizes all the specific disclaimers *
6 // * the Geant4 Collaboration. It is provided << 6 // * of contributors to this software. The specific disclaimers,which *
7 // * conditions of the Geant4 Software License << 7 // * govern, are listed with their locations in: *
8 // * LICENSE and available at http://cern.ch/ << 8 // * http://cern.ch/geant4/license *
9 // * include a list of copyright holders. <<
10 // * 9 // * *
11 // * Neither the authors of this software syst 10 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 11 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 12 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 13 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file << 14 // * use. *
16 // * for the full disclaimer and the limitatio <<
17 // * 15 // * *
18 // * This code implementation is the result << 16 // * This code implementation is the intellectual property of the *
19 // * technical work of the GEANT4 collaboratio << 17 // * GEANT4 collaboration. *
20 // * By using, copying, modifying or distri << 18 // * By copying, distributing or modifying the Program (or any work *
21 // * any work based on the software) you ag << 19 // * based on the Program) you indicate your acceptance of this *
22 // * use in resulting scientific publicati << 20 // * statement, and all its terms. *
23 // * acceptance of all terms of the Geant4 Sof <<
24 // ******************************************* 21 // ********************************************************************
25 // 22 //
26 // 23 //
27 // ------------------------------------------- 24 // -------------------------------------------------------------------
28 // 25 //
29 // GEANT4 Class file 26 // GEANT4 Class file
30 // 27 //
31 // 28 //
32 // File name: G4hNuclearStoppingModel 29 // File name: G4hNuclearStoppingModel
33 // 30 //
34 // Author: V.Ivanchenko (Vladimir.Ivanc 31 // Author: V.Ivanchenko (Vladimir.Ivanchenko@cern.ch)
35 // 32 //
36 // Creation date: 20 July 2000 33 // Creation date: 20 July 2000
37 // 34 //
38 // Modifications: 35 // Modifications:
39 // 20/07/2000 V.Ivanchenko First implementati 36 // 20/07/2000 V.Ivanchenko First implementation
40 // 22/08/2000 V.Ivanchenko Bug fixed in call 37 // 22/08/2000 V.Ivanchenko Bug fixed in call of a model
41 // 03/10/2000 V.Ivanchenko CodeWizard clean u 38 // 03/10/2000 V.Ivanchenko CodeWizard clean up
42 // 39 //
43 // Class Description: 40 // Class Description:
44 // 41 //
45 // Low energy protons/ions nuclear stopping pa 42 // Low energy protons/ions nuclear stopping parametrisation
46 // 43 //
47 // Class Description: End 44 // Class Description: End
48 // 45 //
49 // ------------------------------------------- 46 // -------------------------------------------------------------------
50 // 47 //
51 //....oooOO0OOooo........oooOO0OOooo........oo 48 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
52 //....oooOO0OOooo........oooOO0OOooo........oo 49 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
53 50
54 #include "G4hNuclearStoppingModel.hh" 51 #include "G4hNuclearStoppingModel.hh"
55 <<
56 #include "globals.hh" <<
57 #include "G4PhysicalConstants.hh" <<
58 #include "G4SystemOfUnits.hh" <<
59 #include "G4UnitsTable.hh" 52 #include "G4UnitsTable.hh"
>> 53 #include "globals.hh"
>> 54 #include "G4hZiegler1977Nuclear.hh"
60 #include "G4hZiegler1985Nuclear.hh" 55 #include "G4hZiegler1985Nuclear.hh"
61 #include "G4hICRU49Nuclear.hh" 56 #include "G4hICRU49Nuclear.hh"
62 #include "G4DynamicParticle.hh" 57 #include "G4DynamicParticle.hh"
63 #include "G4ParticleDefinition.hh" 58 #include "G4ParticleDefinition.hh"
64 #include "G4ElementVector.hh" 59 #include "G4ElementVector.hh"
65 #include "G4Material.hh" <<
66 60
67 //....oooOO0OOooo........oooOO0OOooo........oo 61 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
68 62
69 G4hNuclearStoppingModel::G4hNuclearStoppingMod << 63 G4hNuclearStoppingModel::G4hNuclearStoppingModel(const G4String& name):
70 :G4VLowEnergyModel(name), modelName(name) << 64 G4VLowEnergyModel(name)
71 { 65 {
>> 66 modelName = name ;
72 InitializeMe() ; 67 InitializeMe() ;
73 } 68 }
74 69
75 //....oooOO0OOooo........oooOO0OOooo........oo 70 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
76 71
77 void G4hNuclearStoppingModel::InitializeMe() 72 void G4hNuclearStoppingModel::InitializeMe()
78 { 73 {
79 // Constants 74 // Constants
80 highEnergyLimit = 100.*MeV ; 75 highEnergyLimit = 100.*MeV ;
81 lowEnergyLimit = 1.*eV ; 76 lowEnergyLimit = 1.*eV ;
82 factorPDG2AMU = 1.007276/proton_mass_c2 ; 77 factorPDG2AMU = 1.007276/proton_mass_c2 ;
83 theZieglerFactor= eV*cm2*1.0e-15 ; 78 theZieglerFactor= eV*cm2*1.0e-15 ;
84 79
85 // Registration of parametrisation models of 80 // Registration of parametrisation models of nuclear energy losses
86 G4String blank = G4String(" ") ; 81 G4String blank = G4String(" ") ;
>> 82 G4String zi77 = G4String("Ziegler1977") ;
87 G4String ir49 = G4String("ICRU_R49") ; 83 G4String ir49 = G4String("ICRU_R49") ;
88 G4String zi85 = G4String("Ziegler1985") ; 84 G4String zi85 = G4String("Ziegler1985") ;
89 if(ir49 == modelName || blank == modelName) << 85 if(zi77 == modelName) {
>> 86 nStopingPowerTable = new G4hZiegler1977Nuclear();
>> 87
>> 88 } else if(ir49 == modelName || blank == modelName) {
90 nStopingPowerTable = new G4hICRU49Nuclea 89 nStopingPowerTable = new G4hICRU49Nuclear();
91 90
92 } else if(zi85 == modelName) { 91 } else if(zi85 == modelName) {
93 nStopingPowerTable = new G4hZiegler1985N 92 nStopingPowerTable = new G4hZiegler1985Nuclear();
94 93
95 } else { 94 } else {
96 G4cout << 95 G4cout <<
97 "G4hLowEnergyIonisation warning: There is 96 "G4hLowEnergyIonisation warning: There is no table with the modelName <"
98 << modelName << ">" << 97 << modelName << ">"
99 << " for nuclear stopping, <ICRU_R49> is << 98 << " for nuclear stopping, <ICRU_R49> is applied "
100 << G4endl; << 99 << G4endl;
101 nStopingPowerTable = new G4hICRU49Nuclear( 100 nStopingPowerTable = new G4hICRU49Nuclear();
102 } 101 }
103 102
104 // Default is nuclear stopping fluctuations 103 // Default is nuclear stopping fluctuations On
105 // nStopingPowerTable->SetNuclearStoppingFl << 104 nStopingPowerTable->SetNuclearStoppingFluctuationsOn();
106 nStopingPowerTable->SetNuclearStoppingFluctu <<
107 } 105 }
108 106
109 //....oooOO0OOooo........oooOO0OOooo........oo 107 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
110 108
111 G4hNuclearStoppingModel::~G4hNuclearStoppingMo 109 G4hNuclearStoppingModel::~G4hNuclearStoppingModel()
112 { 110 {
113 delete nStopingPowerTable; 111 delete nStopingPowerTable;
114 } 112 }
115 113
116 //....oooOO0OOooo........oooOO0OOooo........oo 114 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
117 115
118 G4double G4hNuclearStoppingModel::TheValue( 116 G4double G4hNuclearStoppingModel::TheValue(
119 const G4DynamicParti 117 const G4DynamicParticle* particle,
120 const G4Material* material 118 const G4Material* material)
121 { 119 {
122 // Projectile nucleus 120 // Projectile nucleus
123 G4double energy = particle->GetKineticEnergy 121 G4double energy = particle->GetKineticEnergy() ;
124 G4double z1 = std::abs((particle->GetCharge( << 122 G4double z1 = abs((particle->GetCharge())/eplus) ;
125 G4double m1 = (particle->GetMass())*factorPD 123 G4double m1 = (particle->GetMass())*factorPDG2AMU ;
126 124
127 G4double nloss = StoppingPower(material, ene 125 G4double nloss = StoppingPower(material, energy, z1, m1) * theZieglerFactor;
128 126
129 return nloss; 127 return nloss;
130 } 128 }
131 129
132 //....oooOO0OOooo........oooOO0OOooo........oo 130 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
133 131
134 G4double G4hNuclearStoppingModel::TheValue( 132 G4double G4hNuclearStoppingModel::TheValue(
135 const G4ParticleDefi 133 const G4ParticleDefinition* aParticle,
136 const G4Material* material, 134 const G4Material* material,
137 G4double kinet 135 G4double kineticEnergy)
138 { 136 {
139 // Projectile nucleus 137 // Projectile nucleus
140 G4double z1 = std::abs((aParticle->GetPDGCha << 138 G4double z1 = abs((aParticle->GetPDGCharge())/eplus) ;
141 G4double m1 = (aParticle->GetPDGMass())*fact 139 G4double m1 = (aParticle->GetPDGMass())*factorPDG2AMU ;
142 140
143 G4double nloss = StoppingPower(material, kin 141 G4double nloss = StoppingPower(material, kineticEnergy, z1, m1)
144 * theZieglerFactor; 142 * theZieglerFactor;
145 143
146 return nloss; 144 return nloss;
147 } 145 }
148 146
149 //....oooOO0OOooo........oooOO0OOooo........oo 147 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
150 148
151 G4double G4hNuclearStoppingModel::StoppingPowe 149 G4double G4hNuclearStoppingModel::StoppingPower(
152 const G4Material* ma 150 const G4Material* material,
153 G4double kinet 151 G4double kineticEnergy,
154 G4double z1, G 152 G4double z1, G4double m1) const
155 { 153 {
156 // Target nucleus 154 // Target nucleus
157 std::size_t NumberOfElements = material->Get << 155 G4int NumberOfElements = material->GetNumberOfElements() ;
158 if(0 == NumberOfElements) return 0.0 ; 156 if(0 == NumberOfElements) return 0.0 ;
159 157
160 const G4ElementVector* theElementVector = 158 const G4ElementVector* theElementVector =
161 material->Get 159 material->GetElementVector() ;
162 const G4double* theAtomicNumDensityVector = 160 const G4double* theAtomicNumDensityVector =
163 material->Get 161 material->GetAtomicNumDensityVector() ;
164 162
165 // loop for the elements in the material 163 // loop for the elements in the material
166 164
167 G4double nloss = 0.0; 165 G4double nloss = 0.0;
168 166
169 for (std::size_t iel=0; iel<NumberOfElements << 167 for (G4int iel=0; iel<NumberOfElements; iel++) {
170 const G4Element* element = (*theElementVec << 168 const G4Element* element = (*theElementVector)(iel) ;
171 G4double z2 = element->GetZ(); << 169 G4double z2 = element->GetZ() ;
172 G4double m2Local = element->GetA()*mole/g << 170 G4double m2 = element->GetA()*mole/g ;
173 nloss += (nStopingPowerTable-> 171 nloss += (nStopingPowerTable->
174 NuclearStoppingPower(kineticEner << 172 NuclearStoppingPower(kineticEnergy, z1, z2, m1, m2))
175 * theAtomicNumDensityVector[iel] ; 173 * theAtomicNumDensityVector[iel] ;
176 } 174 }
177 175
178 return nloss; 176 return nloss;
179 } 177 }
180 178
181 //....oooOO0OOooo........oooOO0OOooo........oo 179 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
>> 180
>> 181
>> 182
>> 183
>> 184
>> 185
>> 186
>> 187
182 188