Mathematica numerical integration