46 G4cout<<
"Regular transparent X-ray TR radiator EM process is called"<<
G4endl;
70 G4double result,
sum = 0.,
tmp, cof1, cof2, cofMin, cofPHC,aMa, bMb, sigma;
100 if (cofMin > kMin) kMin++;
115 for( k = kMin; k <=
kMax; k++ )
118 result = (k - cof1)*(k - cof1)*(k + cof2)*(k + cof2);
120 if( k == kMin && kMin ==
G4int(cofMin) )
122 sum += 0.5*std::sin(tmp)*std::sin(tmp)*
std::abs(k-cofMin)/result;
126 sum += std::sin(tmp)*std::sin(tmp)*
std::abs(k-cofMin)/result;
130 result = 4.*( cof1 + cof2 )*( cof1 + cof2 )*sum/
energy;
131 result *= ( 1. - std::exp(-
fPlateNumber*sigma) )/( 1. - std::exp(-sigma) );
175 G4double result, Qa, Qb,
Q, aZa, bZb, aMa, bMb,
D, sigma;
182 Qa = std::exp(-0.5*aMa);
183 Qb = std::exp(-0.5*bMb);
186 G4complex Ha( Qa*std::cos(aZa), -Qa*std::sin(aZa) );
187 G4complex Hb( Qb*std::cos(bZb), -Qb*std::sin(bZb) );
190 D = 1.0 /( (1. -
Q)*(1. - Q) +
191 4.*Q*std::sin(0.5*(aZa + bZb))*std::sin(0.5*(aZa + bZb)) );
194 G4complex F2 = (1.0 - Ha)*(1.0 - Ha)*Hb*(1.0 - Hs)*(1.0 - Hs)
198 result = 2.0*std::real(R);