37 const G4double elim = 0.2*CLHEP::MeV;
53 x = alpha*(0.76 + 2.2/
A13 + (2.12/(
A13*
A13) - 0.05)*CLHEP::MeV/e);
83 if (10 >= Z) { res = 0.42; }
84 else if (20 >= Z) { res = 0.42 + (Z - 10)*0.016; }
85 else if (30 >= Z) { res = 0.58 + (Z - 20)*0.01; }
86 else if (50 >= Z) { res = 0.68 + (Z - 30)*0.0045; }
87 else if (70 > Z) { res = 0.77 + (Z - 50)*0.0015; }
95 if (10 >= Z) { res = 0.68; }
96 else if (20 >= Z) { res = 0.68 + (Z - 10)*0.014; }
97 else if (30 >= Z) { res = 0.82 + (Z - 20)*0.009; }
98 else if (50 >= Z) { res = 0.91 + (Z - 30)*0.003; }
99 else if (70 > Z) { res = 0.97 + (Z - 50)*0.0005; }
107 if (10 >= Z) { res = 0.50; }
108 else if (20 >= Z) { res = 0.50 - (Z - 10)*0.022; }
109 else if (30 >= Z) { res = 0.28 - (Z - 20)*0.008; }
110 else if (50 >= Z) { res = 0.20 - (Z - 30)*0.0025; }
111 else if (70 > Z) { res = 0.15 - (Z - 50)*0.0025; }
119 if (30 >= Z) { res = 0.10; }
120 else if (50 >= Z) { res = 0.10 - (Z - 30)*0.001; }
121 else if (70 >= Z) { res = 0.08 + (Z - 50)*0.001; }
133 a *= (1. - x/
A)*(1. - x/
A);
137 a *= (1. + x/
A)*(1. + x/
A);
141 a *= (1. - 0.5/
A)*(1. - 0.5/
A);
145 a *= (1. - (1. + x)/
A)*(1. - (1. + x)/
A);
149 a *= (1. - (1. - x)/
A)*(1. - (1. - x)/
A);
153 a *= (1. - 1.5/
A)*(1. - 1.5/
A);
static G4double LevelDensity(const G4int Z, const G4int A, const G4int index)
static G4double AlphaCValue(const G4int Z)
static G4double ProtonKValue(const G4int Z)
static G4double AlphaKValue(const G4int Z)
static G4double ProtonCValue(const G4int Z)
static G4double CorrectionFactor(const G4int index, const G4int Z, const G4double A13, const G4double bCoulomb, const G4double ekin)