\(\int \frac {e^{\frac {2 (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x)}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} (288-96 e^5 x+16 x^2)+e^{\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} (4608-1536 e^5 x+256 x^2)}{x^4} \, dx\) [7588]

   Optimal result
   Rubi [F]
   Mathematica [A] (verified)
   Maple [B] (verified)
   Fricas [B] (verification not implemented)
   Sympy [B] (verification not implemented)
   Maxima [A] (verification not implemented)
   Giac [F]
   Mupad [B] (verification not implemented)

Optimal result

Integrand size = 140, antiderivative size = 33 \[ \int \frac {e^{\frac {2 \left (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x\right )}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (288-96 e^5 x+16 x^2\right )+e^{\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (4608-1536 e^5 x+256 x^2\right )}{x^4} \, dx=\left (16+e^{5+\frac {8 \left (-e^{\frac {\left (3-e^5 x\right )^2}{x^2}}+x\right )}{x}}\right )^2 \]

[Out]

(16+exp(5+8*(x-exp((-x*exp(5)+3)^2/x^2))/x))^2

Rubi [F]

\[ \int \frac {e^{\frac {2 \left (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x\right )}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (288-96 e^5 x+16 x^2\right )+e^{\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (4608-1536 e^5 x+256 x^2\right )}{x^4} \, dx=\int \frac {\exp \left (\frac {2 \left (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x\right )}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}\right ) \left (288-96 e^5 x+16 x^2\right )+\exp \left (\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}\right ) \left (4608-1536 e^5 x+256 x^2\right )}{x^4} \, dx \]

[In]

Int[(E^((2*(-8*E^((9 - 6*E^5*x + E^10*x^2)/x^2) + 13*x))/x + (9 - 6*E^5*x + E^10*x^2)/x^2)*(288 - 96*E^5*x + 1
6*x^2) + E^((-8*E^((9 - 6*E^5*x + E^10*x^2)/x^2) + 13*x)/x + (9 - 6*E^5*x + E^10*x^2)/x^2)*(4608 - 1536*E^5*x
+ 256*x^2))/x^4,x]

[Out]

288*Defer[Int][E^(26*(1 + E^10/26) + 9/x^2 - (6*E^5)/x - (16*E^((-3 + E^5*x)^2/x^2))/x)/x^4, x] + 4608*Defer[I
nt][E^(13*(1 + E^10/13) + 9/x^2 - (6*E^5)/x - (8*E^((-3 + E^5*x)^2/x^2))/x)/x^4, x] - 96*Defer[Int][E^(31*(1 +
 E^10/31) + 9/x^2 - (6*E^5)/x - (16*E^((-3 + E^5*x)^2/x^2))/x)/x^3, x] - 1536*Defer[Int][E^(18*(1 + E^10/18) +
 9/x^2 - (6*E^5)/x - (8*E^((-3 + E^5*x)^2/x^2))/x)/x^3, x] + 16*Defer[Int][E^(26*(1 + E^10/26) + 9/x^2 - (6*E^
5)/x - (16*E^((-3 + E^5*x)^2/x^2))/x)/x^2, x] + 256*Defer[Int][E^(13*(1 + E^10/13) + 9/x^2 - (6*E^5)/x - (8*E^
((-3 + E^5*x)^2/x^2))/x)/x^2, x]

Rubi steps \begin{align*} \text {integral}& = \int \left (\frac {288 \exp \left (26 \left (1+\frac {e^{10}}{26}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {16 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^4}+\frac {4608 \exp \left (13 \left (1+\frac {e^{10}}{13}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {8 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^4}-\frac {96 \exp \left (31 \left (1+\frac {e^{10}}{31}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {16 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^3}-\frac {1536 \exp \left (18 \left (1+\frac {e^{10}}{18}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {8 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^3}+\frac {16 \exp \left (26 \left (1+\frac {e^{10}}{26}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {16 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^2}+\frac {256 \exp \left (13 \left (1+\frac {e^{10}}{13}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {8 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^2}\right ) \, dx \\ & = 16 \int \frac {\exp \left (26 \left (1+\frac {e^{10}}{26}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {16 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^2} \, dx-96 \int \frac {\exp \left (31 \left (1+\frac {e^{10}}{31}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {16 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^3} \, dx+256 \int \frac {\exp \left (13 \left (1+\frac {e^{10}}{13}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {8 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^2} \, dx+288 \int \frac {\exp \left (26 \left (1+\frac {e^{10}}{26}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {16 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^4} \, dx-1536 \int \frac {\exp \left (18 \left (1+\frac {e^{10}}{18}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {8 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^3} \, dx+4608 \int \frac {\exp \left (13 \left (1+\frac {e^{10}}{13}\right )+\frac {9}{x^2}-\frac {6 e^5}{x}-\frac {8 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}\right )}{x^4} \, dx \\ \end{align*}

Mathematica [A] (verified)

Time = 0.15 (sec) , antiderivative size = 53, normalized size of antiderivative = 1.61 \[ \int \frac {e^{\frac {2 \left (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x\right )}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (288-96 e^5 x+16 x^2\right )+e^{\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (4608-1536 e^5 x+256 x^2\right )}{x^4} \, dx=e^{13-\frac {16 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}} \left (e^{13}+32 e^{\frac {8 e^{\frac {\left (-3+e^5 x\right )^2}{x^2}}}{x}}\right ) \]

[In]

Integrate[(E^((2*(-8*E^((9 - 6*E^5*x + E^10*x^2)/x^2) + 13*x))/x + (9 - 6*E^5*x + E^10*x^2)/x^2)*(288 - 96*E^5
*x + 16*x^2) + E^((-8*E^((9 - 6*E^5*x + E^10*x^2)/x^2) + 13*x)/x + (9 - 6*E^5*x + E^10*x^2)/x^2)*(4608 - 1536*
E^5*x + 256*x^2))/x^4,x]

[Out]

E^(13 - (16*E^((-3 + E^5*x)^2/x^2))/x)*(E^13 + 32*E^((8*E^((-3 + E^5*x)^2/x^2))/x))

Maple [B] (verified)

Leaf count of result is larger than twice the leaf count of optimal. \(62\) vs. \(2(30)=60\).

Time = 7.97 (sec) , antiderivative size = 63, normalized size of antiderivative = 1.91

method result size
risch \({\mathrm e}^{\frac {-16 \,{\mathrm e}^{\frac {x^{2} {\mathrm e}^{10}-6 x \,{\mathrm e}^{5}+9}{x^{2}}}+26 x}{x}}+32 \,{\mathrm e}^{\frac {-8 \,{\mathrm e}^{\frac {x^{2} {\mathrm e}^{10}-6 x \,{\mathrm e}^{5}+9}{x^{2}}}+13 x}{x}}\) \(63\)
parts \({\mathrm e}^{\frac {-16 \,{\mathrm e}^{\frac {x^{2} {\mathrm e}^{10}-6 x \,{\mathrm e}^{5}+9}{x^{2}}}+26 x}{x}}+32 \,{\mathrm e}^{\frac {-8 \,{\mathrm e}^{\frac {x^{2} {\mathrm e}^{10}-6 x \,{\mathrm e}^{5}+9}{x^{2}}}+13 x}{x}}\) \(68\)
parallelrisch \({\mathrm e}^{-\frac {2 \left (8 \,{\mathrm e}^{\frac {x^{2} {\mathrm e}^{10}-6 x \,{\mathrm e}^{5}+9}{x^{2}}}-13 x \right )}{x}}+32 \,{\mathrm e}^{-\frac {8 \,{\mathrm e}^{\frac {x^{2} {\mathrm e}^{10}-6 x \,{\mathrm e}^{5}+9}{x^{2}}}-13 x}{x}}\) \(70\)
norman \(\frac {x^{3} {\mathrm e}^{\frac {-16 \,{\mathrm e}^{\frac {x^{2} {\mathrm e}^{10}-6 x \,{\mathrm e}^{5}+9}{x^{2}}}+26 x}{x}}+32 x^{3} {\mathrm e}^{\frac {-8 \,{\mathrm e}^{\frac {x^{2} {\mathrm e}^{10}-6 x \,{\mathrm e}^{5}+9}{x^{2}}}+13 x}{x}}}{x^{3}}\) \(79\)

[In]

int(((-96*x*exp(5)+16*x^2+288)*exp((x^2*exp(5)^2-6*x*exp(5)+9)/x^2)*exp((-8*exp((x^2*exp(5)^2-6*x*exp(5)+9)/x^
2)+13*x)/x)^2+(-1536*x*exp(5)+256*x^2+4608)*exp((x^2*exp(5)^2-6*x*exp(5)+9)/x^2)*exp((-8*exp((x^2*exp(5)^2-6*x
*exp(5)+9)/x^2)+13*x)/x))/x^4,x,method=_RETURNVERBOSE)

[Out]

exp(2*(-8*exp((x^2*exp(10)-6*x*exp(5)+9)/x^2)+13*x)/x)+32*exp((-8*exp((x^2*exp(10)-6*x*exp(5)+9)/x^2)+13*x)/x)

Fricas [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 130 vs. \(2 (29) = 58\).

Time = 0.30 (sec) , antiderivative size = 130, normalized size of antiderivative = 3.94 \[ \int \frac {e^{\frac {2 \left (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x\right )}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (288-96 e^5 x+16 x^2\right )+e^{\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (4608-1536 e^5 x+256 x^2\right )}{x^4} \, dx={\left (e^{\left (\frac {2 \, {\left (x^{2} e^{10} + 13 \, x^{2} - 6 \, x e^{5} - 8 \, x e^{\left (\frac {x^{2} e^{10} - 6 \, x e^{5} + 9}{x^{2}}\right )} + 9\right )}}{x^{2}}\right )} + 32 \, e^{\left (\frac {x^{2} e^{10} + 13 \, x^{2} - 6 \, x e^{5} - 8 \, x e^{\left (\frac {x^{2} e^{10} - 6 \, x e^{5} + 9}{x^{2}}\right )} + 9}{x^{2}} + \frac {x^{2} e^{10} - 6 \, x e^{5} + 9}{x^{2}}\right )}\right )} e^{\left (-\frac {2 \, {\left (x^{2} e^{10} - 6 \, x e^{5} + 9\right )}}{x^{2}}\right )} \]

[In]

integrate(((-96*x*exp(5)+16*x^2+288)*exp((x^2*exp(5)^2-6*x*exp(5)+9)/x^2)*exp((-8*exp((x^2*exp(5)^2-6*x*exp(5)
+9)/x^2)+13*x)/x)^2+(-1536*x*exp(5)+256*x^2+4608)*exp((x^2*exp(5)^2-6*x*exp(5)+9)/x^2)*exp((-8*exp((x^2*exp(5)
^2-6*x*exp(5)+9)/x^2)+13*x)/x))/x^4,x, algorithm="fricas")

[Out]

(e^(2*(x^2*e^10 + 13*x^2 - 6*x*e^5 - 8*x*e^((x^2*e^10 - 6*x*e^5 + 9)/x^2) + 9)/x^2) + 32*e^((x^2*e^10 + 13*x^2
 - 6*x*e^5 - 8*x*e^((x^2*e^10 - 6*x*e^5 + 9)/x^2) + 9)/x^2 + (x^2*e^10 - 6*x*e^5 + 9)/x^2))*e^(-2*(x^2*e^10 -
6*x*e^5 + 9)/x^2)

Sympy [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 58 vs. \(2 (26) = 52\).

Time = 0.25 (sec) , antiderivative size = 58, normalized size of antiderivative = 1.76 \[ \int \frac {e^{\frac {2 \left (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x\right )}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (288-96 e^5 x+16 x^2\right )+e^{\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (4608-1536 e^5 x+256 x^2\right )}{x^4} \, dx=e^{\frac {2 \cdot \left (13 x - 8 e^{\frac {x^{2} e^{10} - 6 x e^{5} + 9}{x^{2}}}\right )}{x}} + 32 e^{\frac {13 x - 8 e^{\frac {x^{2} e^{10} - 6 x e^{5} + 9}{x^{2}}}}{x}} \]

[In]

integrate(((-96*x*exp(5)+16*x**2+288)*exp((x**2*exp(5)**2-6*x*exp(5)+9)/x**2)*exp((-8*exp((x**2*exp(5)**2-6*x*
exp(5)+9)/x**2)+13*x)/x)**2+(-1536*x*exp(5)+256*x**2+4608)*exp((x**2*exp(5)**2-6*x*exp(5)+9)/x**2)*exp((-8*exp
((x**2*exp(5)**2-6*x*exp(5)+9)/x**2)+13*x)/x))/x**4,x)

[Out]

exp(2*(13*x - 8*exp((x**2*exp(10) - 6*x*exp(5) + 9)/x**2))/x) + 32*exp((13*x - 8*exp((x**2*exp(10) - 6*x*exp(5
) + 9)/x**2))/x)

Maxima [A] (verification not implemented)

none

Time = 0.48 (sec) , antiderivative size = 52, normalized size of antiderivative = 1.58 \[ \int \frac {e^{\frac {2 \left (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x\right )}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (288-96 e^5 x+16 x^2\right )+e^{\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (4608-1536 e^5 x+256 x^2\right )}{x^4} \, dx={\left (e^{26} + 32 \, e^{\left (\frac {8 \, e^{\left (-\frac {6 \, e^{5}}{x} + \frac {9}{x^{2}} + e^{10}\right )}}{x} + 13\right )}\right )} e^{\left (-\frac {16 \, e^{\left (-\frac {6 \, e^{5}}{x} + \frac {9}{x^{2}} + e^{10}\right )}}{x}\right )} \]

[In]

integrate(((-96*x*exp(5)+16*x^2+288)*exp((x^2*exp(5)^2-6*x*exp(5)+9)/x^2)*exp((-8*exp((x^2*exp(5)^2-6*x*exp(5)
+9)/x^2)+13*x)/x)^2+(-1536*x*exp(5)+256*x^2+4608)*exp((x^2*exp(5)^2-6*x*exp(5)+9)/x^2)*exp((-8*exp((x^2*exp(5)
^2-6*x*exp(5)+9)/x^2)+13*x)/x))/x^4,x, algorithm="maxima")

[Out]

(e^26 + 32*e^(8*e^(-6*e^5/x + 9/x^2 + e^10)/x + 13))*e^(-16*e^(-6*e^5/x + 9/x^2 + e^10)/x)

Giac [F]

\[ \int \frac {e^{\frac {2 \left (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x\right )}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (288-96 e^5 x+16 x^2\right )+e^{\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (4608-1536 e^5 x+256 x^2\right )}{x^4} \, dx=\int { \frac {16 \, {\left ({\left (x^{2} - 6 \, x e^{5} + 18\right )} e^{\left (\frac {2 \, {\left (13 \, x - 8 \, e^{\left (\frac {x^{2} e^{10} - 6 \, x e^{5} + 9}{x^{2}}\right )}\right )}}{x} + \frac {x^{2} e^{10} - 6 \, x e^{5} + 9}{x^{2}}\right )} + 16 \, {\left (x^{2} - 6 \, x e^{5} + 18\right )} e^{\left (\frac {13 \, x - 8 \, e^{\left (\frac {x^{2} e^{10} - 6 \, x e^{5} + 9}{x^{2}}\right )}}{x} + \frac {x^{2} e^{10} - 6 \, x e^{5} + 9}{x^{2}}\right )}\right )}}{x^{4}} \,d x } \]

[In]

integrate(((-96*x*exp(5)+16*x^2+288)*exp((x^2*exp(5)^2-6*x*exp(5)+9)/x^2)*exp((-8*exp((x^2*exp(5)^2-6*x*exp(5)
+9)/x^2)+13*x)/x)^2+(-1536*x*exp(5)+256*x^2+4608)*exp((x^2*exp(5)^2-6*x*exp(5)+9)/x^2)*exp((-8*exp((x^2*exp(5)
^2-6*x*exp(5)+9)/x^2)+13*x)/x))/x^4,x, algorithm="giac")

[Out]

integrate(16*((x^2 - 6*x*e^5 + 18)*e^(2*(13*x - 8*e^((x^2*e^10 - 6*x*e^5 + 9)/x^2))/x + (x^2*e^10 - 6*x*e^5 +
9)/x^2) + 16*(x^2 - 6*x*e^5 + 18)*e^((13*x - 8*e^((x^2*e^10 - 6*x*e^5 + 9)/x^2))/x + (x^2*e^10 - 6*x*e^5 + 9)/
x^2))/x^4, x)

Mupad [B] (verification not implemented)

Time = 14.48 (sec) , antiderivative size = 54, normalized size of antiderivative = 1.64 \[ \int \frac {e^{\frac {2 \left (-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x\right )}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (288-96 e^5 x+16 x^2\right )+e^{\frac {-8 e^{\frac {9-6 e^5 x+e^{10} x^2}{x^2}}+13 x}{x}+\frac {9-6 e^5 x+e^{10} x^2}{x^2}} \left (4608-1536 e^5 x+256 x^2\right )}{x^4} \, dx=32\,{\mathrm {e}}^{-\frac {8\,{\mathrm {e}}^{-\frac {6\,{\mathrm {e}}^5}{x}}\,{\mathrm {e}}^{\frac {9}{x^2}}\,{\mathrm {e}}^{{\mathrm {e}}^{10}}}{x}}\,{\mathrm {e}}^{13}+{\mathrm {e}}^{-\frac {16\,{\mathrm {e}}^{-\frac {6\,{\mathrm {e}}^5}{x}}\,{\mathrm {e}}^{\frac {9}{x^2}}\,{\mathrm {e}}^{{\mathrm {e}}^{10}}}{x}}\,{\mathrm {e}}^{26} \]

[In]

int((exp((2*(13*x - 8*exp((x^2*exp(10) - 6*x*exp(5) + 9)/x^2)))/x)*exp((x^2*exp(10) - 6*x*exp(5) + 9)/x^2)*(16
*x^2 - 96*x*exp(5) + 288) + exp((13*x - 8*exp((x^2*exp(10) - 6*x*exp(5) + 9)/x^2))/x)*exp((x^2*exp(10) - 6*x*e
xp(5) + 9)/x^2)*(256*x^2 - 1536*x*exp(5) + 4608))/x^4,x)

[Out]

32*exp(-(8*exp(-(6*exp(5))/x)*exp(9/x^2)*exp(exp(10)))/x)*exp(13) + exp(-(16*exp(-(6*exp(5))/x)*exp(9/x^2)*exp
(exp(10)))/x)*exp(26)