| 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 // << 26 // $Id: G4ionEffectiveCharge.cc,v 1.24.2.1 2010/01/26 14:33:54 gcosmo Exp $
27 // ------------------------------------------- << 27 // GEANT4 tag $Name: geant4-09-02-patch-03 $
28 // << 28 //
29 // GEANT4 Class file << 29 // -------------------------------------------------------------------
30 // << 30 //
31 // << 31 // GEANT4 Class file
32 // File name: G4ionEffectiveCharge << 32 //
33 // << 33 //
34 // Author: Vladimir Ivanchenko << 34 // File name: G4ionEffectiveCharge
35 // << 35 //
36 // Creation date: 07.05.2002 << 36 // Author: Vladimir Ivanchenko
37 // << 37 //
38 // Modifications: << 38 // Creation date: 07.05.2002
39 // 12.09.2004 Set low energy limit to 1 keV (V << 39 //
40 // 25.01.2005 Add protection - min Charge 0.1 << 40 // Modifications:
41 // 28.04.2006 Set upper energy limit to 50 MeV << 41 // 12.09.2004 Set low energy limit to 1 keV (V.Ivanchenko)
42 // 23.05.2006 Set upper energy limit to Z*10 M << 42 // 25.01.2005 Add protection - min Charge 0.1 eplus (V.Ivanchenko)
43 // 15.08.2006 Add protection for not defined m << 43 // 28.04.2006 Set upper energy limit to 50 MeV (V.Ivanchenko)
44 // 27-09-2007 Use Fermi energy from material, << 44 // 23.05.2006 Set upper energy limit to Z*10 MeV (V.Ivanchenko)
45 // << 45 // 15.08.2006 Add protection for not defined material (V.Ivanchenko)
46 << 46 // 27-09-2007 Use Fermi energy from material, optimazed formulas (V.Ivanchenko)
47 // ------------------------------------------- << 47 //
48 // << 48
49 //....oooOO0OOooo........oooOO0OOooo........oo << 49 // -------------------------------------------------------------------
50 //....oooOO0OOooo........oooOO0OOooo........oo << 50 //
51 << 51 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
52 #include "G4ionEffectiveCharge.hh" << 52 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
53 #include "G4PhysicalConstants.hh" << 53
54 #include "G4SystemOfUnits.hh" << 54 #include "G4ionEffectiveCharge.hh"
55 #include "G4UnitsTable.hh" << 55 #include "G4UnitsTable.hh"
56 #include "G4Material.hh" << 56 #include "G4Material.hh"
57 #include "G4NistManager.hh" << 57 #include "G4NistManager.hh"
58 #include "G4Log.hh" << 58
59 #include "G4Exp.hh" << 59 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
60 #include "G4Pow.hh" << 60
61 << 61 G4ionEffectiveCharge::G4ionEffectiveCharge()
62 //....oooOO0OOooo........oooOO0OOooo........oo << 62 {
63 << 63 chargeCorrection = 1.0;
64 G4ionEffectiveCharge::G4ionEffectiveCharge() << 64 energyHighLimit = 20.0*MeV;
65 { << 65 energyLowLimit = 1.0*keV;
66 chargeCorrection = 1.0; << 66 energyBohr = 25.*keV;
67 energyHighLimit = 20.0*CLHEP::MeV; << 67 massFactor = amu_c2/(proton_mass_c2*keV);
68 energyLowLimit = 1.0*CLHEP::keV; << 68 minCharge = 1.0;
69 energyBohr = 25.*CLHEP::keV; << 69 lastPart = 0;
70 massFactor = CLHEP::amu_c2/(CLHEP::pro << 70 lastMat = 0;
71 minCharge = 1.0; << 71 lastKinEnergy = 0.0;
72 lastKinEnergy = 0.0; << 72 effCharge = eplus;
73 effCharge = CLHEP::eplus; << 73 nist = G4NistManager::Instance();
74 inveplus = 1.0/CLHEP::eplus; << 74 }
75 g4calc = G4Pow::GetInstance(); << 75
76 } << 76 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
77 << 77
78 //....oooOO0OOooo........oooOO0OOooo........oo << 78 G4ionEffectiveCharge::~G4ionEffectiveCharge()
79 << 79 {}
80 G4double G4ionEffectiveCharge::EffectiveCharge << 80
81 << 81 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
82 << 82
83 { << 83 G4double G4ionEffectiveCharge::EffectiveCharge(const G4ParticleDefinition* p,
84 if(p == lastPart && material == lastMat && k << 84 const G4Material* material,
85 return effCharge; << 85 G4double kineticEnergy)
86 << 86 {
87 lastPart = p; << 87 if(p == lastPart && material == lastMat && kineticEnergy == lastKinEnergy)
88 lastMat = material; << 88 return effCharge;
89 lastKinEnergy = kineticEnergy; << 89
90 << 90 lastPart = p;
91 G4double mass = p->GetPDGMass(); << 91 lastMat = material;
92 effCharge = p->GetPDGCharge(); << 92 lastKinEnergy = kineticEnergy;
93 G4int Zi = G4lrint(effCharge*inveplus); << 93
94 chargeCorrection = 1.0; << 94 G4double mass = p->GetPDGMass();
95 if(Zi <= 1) { return effCharge; } << 95 G4double charge = p->GetPDGCharge();
96 << 96 G4double Zi = charge/eplus;
97 // The aproximation of ion effective charge << 97
98 // J.F.Ziegler, J.P. Biersack, U. Littmark << 98 chargeCorrection = 1.0;
99 // The Stopping and Range of Ions in Matter, << 99 effCharge = charge;
100 // Vol.1, Pergamon Press, 1985 << 100
101 // Fast ions or hadrons << 101 // The aproximation of ion effective charge from:
102 G4double reducedEnergy = kineticEnergy * CLH << 102 // J.F.Ziegler, J.P. Biersack, U. Littmark
103 << 103 // The Stopping and Range of Ions in Matter,
104 //G4cout << "e= " << reducedEnergy << " Zi= << 104 // Vol.1, Pergamon Press, 1985
105 //<< material->GetName() << G4endl; << 105 // Fast ions or hadrons
106 << 106 G4double reducedEnergy = kineticEnergy * proton_mass_c2/mass ;
107 if(reducedEnergy > effCharge*energyHighLimit << 107
108 return effCharge; << 108 //G4cout << "e= " << reducedEnergy << " Zi= " << Zi << " " << material->GetName() << G4endl;
109 } << 109
110 G4double z = material->GetIonisation()->GetZ << 110 if( reducedEnergy > Zi*energyHighLimit || Zi < 1.5 || !material) return charge;
111 reducedEnergy = std::max(reducedEnergy,energ << 111
112 << 112 G4double z = material->GetIonisation()->GetZeffective();
113 // Helium ion case << 113 reducedEnergy = std::max(reducedEnergy,energyLowLimit);
114 if( Zi <= 2 ) { << 114
115 << 115 // Helium ion case
116 static const G4double c[6] = << 116 if( Zi < 2.5 ) {
117 {0.2865,0.1266,-0.001429,0.02402,-0.0113 << 117
118 << 118 static G4double c[6] = {0.2865, 0.1266, -0.001429,
119 G4double Q = std::max(0.0,G4Log(reducedEne << 119 0.02402,-0.01135, 0.001475} ;
120 G4double x = c[0]; << 120
121 G4double y = 1.0; << 121 G4double Q = std::max(0.0,std::log(reducedEnergy*massFactor));
122 for (G4int i=1; i<6; ++i) { << 122 G4double x = c[0];
123 y *= Q; << 123 G4double y = 1.0;
124 x += y * c[i] ; << 124 for (G4int i=1; i<6; i++) {
125 } << 125 y *= Q;
126 G4double ex = (x < 0.2) ? x * (1 - 0.5*x) << 126 x += y * c[i] ;
127 << 127 }
128 G4double tq = 7.6 - Q; << 128 G4double ex;
129 G4double tq2= tq*tq; << 129 if(x < 0.2) ex = x * (1 - 0.5*x);
130 G4double tt = ( 0.007 + 0.00005 * z ); << 130 else ex = 1. - std::exp(-x);
131 if(tq2 < 0.2) { tt *= (1.0 - tq2 + 0.5*tq2 << 131
132 else { tt *= G4Exp(-tq2); } << 132 G4double tq = 7.6 - Q;
133 << 133 G4double tq2= tq*tq;
134 effCharge *= (1.0 + tt) * std::sqrt(ex); << 134 G4double tt = ( 0.007 + 0.00005 * z );
135 << 135 if(tq2 < 0.2) tt *= (1.0 - tq2 + 0.5*tq2*tq2);
136 // Heavy ion case << 136 else tt *= std::exp(-tq2);
137 } else { << 137
138 << 138 effCharge = charge*(1.0 + tt) * std::sqrt(ex);
139 G4double zi13 = g4calc->Z13(Zi); << 139
140 G4double zi23 = zi13*zi13; << 140 // Heavy ion case
141 << 141 } else {
142 // v1 is ion velocity in vF unit << 142
143 G4double eF = material->GetIonisation()- << 143 G4double y;
144 G4double v1sq = reducedEnergy/eF; << 144 // = nist->GetZ13(z);
145 G4double vFsq = eF/energyBohr; << 145 //G4double z23 = y*y;
146 G4double vF = std::sqrt(vFsq); << 146 G4double zi13 = nist->GetZ13(Zi);
147 << 147 G4double zi23 = zi13*zi13;
148 G4double y = ( v1sq > 1.0 ) << 148 // G4double e = std::max(reducedEnergy,energyBohr/z23);
149 // Faster than Fermi velocity << 149 //G4double e = reducedEnergy;
150 ? vF * std::sqrt(v1sq) * ( 1.0 + 0.2/v1s << 150
151 // Slower than Fermi velocity << 151 // v1 is ion velocity in vF unit
152 : 0.692308 * vF * (1.0 + 0.666666*v1sq + << 152 G4double eF = material->GetIonisation()->GetFermiEnergy();
153 << 153 G4double v1sq = reducedEnergy/eF;
154 G4double y3 = G4Exp(0.3*G4Log(y)); << 154 G4double vFsq = eF/energyBohr;
155 // G4cout<<"y= "<<y<<" y3= "<<y3<<" v1= "< << 155 G4double vF = std::sqrt(eF/energyBohr);
156 G4double q = std::max(1.0 - G4Exp( 0.803*y << 156
157 - 0.00898 << 157 // Faster than Fermi velocity
158 << 158 if ( v1sq > 1.0 ) {
159 // compute charge correction << 159 y = vF * std::sqrt(v1sq) * ( 1.0 + 0.2/v1sq ) / zi23 ;
160 G4double tq = 7.6 - G4Log(reducedEnergy/CL << 160
161 G4double tq2= tq*tq; << 161 // Slower than Fermi velocity
162 G4double sq = 1.0 + ( 0.18 + 0.0015 * z )* << 162 } else {
163 // G4cout << "sq= " << sq << G4endl; << 163 y = 0.692308 * vF * (1.0 + 0.666666*v1sq + v1sq*v1sq/15.0) / zi23 ;
164 << 164 }
165 // Screen length according to << 165
166 // J.F.Ziegler and J.M.Manoyan, The stoppi << 166 G4double q;
167 // Nucl. Inst. & Meth. in Phys. Res. B35 ( << 167 G4double y3 = std::pow(y, 0.3) ;
168 << 168 // G4cout<<"y= "<<y<<" y3= "<<y3<<" v1= "<<v1<<" vF= "<<vF<<G4endl;
169 G4double lambda = 10.0 * vF *g4calc->A23(1 << 169 q = 1.0 - std::exp( 0.803*y3 - 1.3167*y3*y3 - 0.38157*y - 0.008983*y*y ) ;
170 G4double lambda2 = lambda*lambda; << 170
171 G4double xx = (0.5/q - 0.5)*G4Log(1.0 + la << 171 //y *= 0.77;
172 << 172 //y *= (0.75 + 0.52/Zi);
173 effCharge *= q; << 173
174 chargeCorrection = sq * (1.0 + xx); << 174 //if( y < 0.2 ) q = y*(1.0 - 0.5*y);
175 } << 175 //else q = 1.0 - std::exp(-y);
176 // G4cout << "G4ionEffectiveCharge: charge= << 176
177 // << " chargeCor= " << chargeCorrec << 177 G4double qmin = minCharge/Zi;
178 // << " e(MeV)= " << kineticEnergy << 178 if(q < qmin) q = qmin;
179 return effCharge; << 179
180 } << 180 effCharge = q*charge;
181 << 181
182 //....oooOO0OOooo........oooOO0OOooo........oo << 182 /*
>> 183 G4double x1 = 1.0*effCharge*(1.0 - 0.132*std::log(y))/(y*std::sqrt(z));
>> 184 G4double x2 = 0.1*effCharge*effCharge*energyBohr/reducedEnergy;
>> 185
>> 186 chargeCorrection = 1.0 + x1 - x2;
>> 187
>> 188 G4cout << "x1= "<<x1<<" x2= "<< x2<<" corr= "<<chargeCorrection<<G4endl;
>> 189 */
>> 190
>> 191 G4double tq = 7.6 - std::log(reducedEnergy/keV);
>> 192 G4double tq2= tq*tq;
>> 193 G4double sq = ( 0.18 + 0.0015 * z ) / (Zi*Zi);
>> 194 if(tq2 < 0.2) sq *= (1.0 - tq2 + 0.5*tq2*tq2);
>> 195 else sq *= std::exp(-tq2);
>> 196 sq += 1.0;
>> 197 // G4cout << "sq= " << sq << G4endl;
>> 198
>> 199 // Screen length according to
>> 200 // J.F.Ziegler and J.M.Manoyan, The stopping of ions in compaunds,
>> 201 // Nucl. Inst. & Meth. in Phys. Res. B35 (1988) 215-228.
>> 202
>> 203 G4double lambda = 10.0 * vF / (zi13 * (6.0 + q));
>> 204 if(q < 0.2) lambda *= (1.0 - 0.66666667*q - q*q/9.0);
>> 205 else lambda *= std::pow(1.0-q, 0.666666);
>> 206
>> 207 G4double lambda2 = lambda*lambda;
>> 208
>> 209 G4double xx = (0.5/q - 0.5)/vFsq;
>> 210 if(lambda2 < 0.2) xx *= lambda2*(1.0 - 0.5*lambda2);
>> 211 else xx *= std::log(1.0 + lambda2);
>> 212
>> 213 chargeCorrection = sq * (1.0 + xx);
>> 214
>> 215 }
>> 216 // G4cout << "G4ionEffectiveCharge: charge= " << charge << " q= " << q
>> 217 // << " chargeCor= " << chargeCorrection
>> 218 // << " e(MeV)= " << kineticEnergy/MeV << G4endl;
>> 219 return effCharge;
>> 220 }
>> 221
>> 222 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
>> 223
>> 224
183 225