100 G4double* pMicroRoughnessTransTable,
101 G4double* pmaxMicroRoughnessTransTable)
129 if (Nthetadim*NEdim > 0) {
190 std::ofstream dateir(
"MRrefl.dat",std::ios::out);
191 std::ofstream dateit(
"MRtrans.dat",std::ios::out);
200 IntIplus(E, fermipot, theta_i, AngNoTheta, AngNoPhi,
205 IntIminus(E, fermipot, theta_i, AngNoTheta, AngNoPhi,
223 std::ofstream dateic(
"MRcheck.dat",std::ios::out);
224 std::ofstream dateimr(
"MRmaxrefl.dat",std::ios::out);
225 std::ofstream dateimt(
"MRmaxtrans.dat",std::ios::out);
262 if (theta_i<theta_i_min || theta_i>
theta_i_max || Energy<Emin || Energy>
Emax)
288 if (theta_i<theta_i_min || theta_i>
theta_i_max || Energy<Emin || Energy>
Emax)
311 if (theta_i<theta_i_min || theta_i>
theta_i_max || Energy<Emin || Energy>
Emax)
332 Energy<Emin || Energy>
Emax) {
357 if (theta_i<theta_i_min || theta_i>
theta_i_max || Energy<Emin || Energy>
Emax)
378 Energy<Emin || Energy>
Emax) {
401 ProbIplus(Energy, fermipot, theta_i, theta_o, phi_o,
b,
w,
AngCut);
410 ProbIminus(Energy, fermipot,theta_i, theta_o, phi_o,
b,
w,
AngCut);
429 if (2*
b*k*std::cos(theta_i) < 1 && 2*
b*k_l < 1)
return true;
440 if (E*(std::cos(theta_i)*std::cos(theta_i)) < VFermi)
return false;
449 if (2*
b*std::sqrt(kS2)*std::cos(theta_i) < 1 && 2*
b*std::sqrt(k_l2) < 1)
return true;