52 G4double theMatrixElement(k*N/(A*A*A*E));
54 if ( x < 2.0*MeV ) theMatrixElement *= x/std::sqrt(14.0*MeV*MeV);
55 else if ( x < 7.0*MeV ) x *= std::sqrt(x/7.0*MeV);
56 else if ( x < 15.0*MeV ) ;
57 else x *= std::sqrt(15.0*MeV/x);
62 G4double Epauli = ((P+1.0)*(P+1.0) + (H+1.0)*(H+1.0) + (P+1.0) - 3.0*(H-1.0))/4.0;
64 G4double Probability = gg*gg*gg *(E-Epauli)*(E-Epauli);
66 Probability *= theMatrixElement;