22.38 Problem number 6680

e7+x2254xe2(x2)4xe2(e2(1+2x2)+254xe2(x2)4xe2(8x4xlog(25x2)))dx

Optimal antiderivative xee4xln(25x2)e2+x25

command

Integrate[E^(-7 + x^2 - 25^((4*x)/E^2)*(x^2)^((4*x)/E^2))*(E^2*(1 + 2*x^2) + 25^((4*x)/E^2)*(x^2)^((4*x)/E^2)*(-8*x - 4*x*Log[25*x^2])),x]

Mathematica 13.1 output

e7+x2254xe2(x2)4xe2(e2(1+2x2)+254xe2(x2)4xe2(8x4xlog(25x2)))dx

Mathematica 12.3 output

e5+x2254xe2(x2)4xe2x