\(\int \frac {e^{.-\frac {3}{2}/x} (e^{.\frac {3}{2}/x} (480 x^3-320 x^4)+e^{e^{.-\frac {3}{2}/x} (-3+e^{.\frac {3}{2}/x} x)} (-81+216 x-144 x^2+e^{.\frac {3}{2}/x} (18 x^2-48 x^3+32 x^4)))}{18 x^2-48 x^3+32 x^4} \, dx\) [3042]

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

Optimal result

Integrand size = 112, antiderivative size = 28 \[ \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{18 x^2-48 x^3+32 x^4} \, dx=e^{-3 e^{\left .-\frac {3}{2}\right /x}+x}-\frac {10 x^2}{-\frac {3}{4}+x} \]

[Out]

exp(x-3/exp(3/2/x))-10*x^2/(x-3/4)

Rubi [F]

\[ \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{18 x^2-48 x^3+32 x^4} \, dx=\int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{18 x^2-48 x^3+32 x^4} \, dx \]

[In]

Int[(E^(3/(2*x))*(480*x^3 - 320*x^4) + E^((-3 + E^(3/(2*x))*x)/E^(3/(2*x)))*(-81 + 216*x - 144*x^2 + E^(3/(2*x
))*(18*x^2 - 48*x^3 + 32*x^4)))/(E^(3/(2*x))*(18*x^2 - 48*x^3 + 32*x^4)),x]

[Out]

(40*x^2)/(3 - 4*x) + Defer[Int][E^(-3/E^(3/(2*x)) + x), x] - (9*Defer[Int][E^(-3/E^(3/(2*x)) - 3/(2*x) + x)/x^
2, x])/2

Rubi steps \begin{align*} \text {integral}& = \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{x^2 \left (18-48 x+32 x^2\right )} \, dx \\ & = \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{2 x^2 (-3+4 x)^2} \, dx \\ & = \frac {1}{2} \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{x^2 (-3+4 x)^2} \, dx \\ & = \frac {1}{2} \int \left (2 e^{-3 e^{\left .-\frac {3}{2}\right /x}+x}-\frac {9 e^{-3 e^{\left .-\frac {3}{2}\right /x}-\frac {3}{2 x}+x}}{x^2}+\frac {160 (3-2 x) x}{(3-4 x)^2}\right ) \, dx \\ & = -\left (\frac {9}{2} \int \frac {e^{-3 e^{\left .-\frac {3}{2}\right /x}-\frac {3}{2 x}+x}}{x^2} \, dx\right )+80 \int \frac {(3-2 x) x}{(3-4 x)^2} \, dx+\int e^{-3 e^{\left .-\frac {3}{2}\right /x}+x} \, dx \\ & = \frac {40 x^2}{3-4 x}-\frac {9}{2} \int \frac {e^{-3 e^{\left .-\frac {3}{2}\right /x}-\frac {3}{2 x}+x}}{x^2} \, dx+\int e^{-3 e^{\left .-\frac {3}{2}\right /x}+x} \, dx \\ \end{align*}

Mathematica [A] (verified)

Time = 0.14 (sec) , antiderivative size = 30, normalized size of antiderivative = 1.07 \[ \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{18 x^2-48 x^3+32 x^4} \, dx=e^{-3 e^{\left .-\frac {3}{2}\right /x}+x}-10 x-\frac {45}{2 (-3+4 x)} \]

[In]

Integrate[(E^(3/(2*x))*(480*x^3 - 320*x^4) + E^((-3 + E^(3/(2*x))*x)/E^(3/(2*x)))*(-81 + 216*x - 144*x^2 + E^(
3/(2*x))*(18*x^2 - 48*x^3 + 32*x^4)))/(E^(3/(2*x))*(18*x^2 - 48*x^3 + 32*x^4)),x]

[Out]

E^(-3/E^(3/(2*x)) + x) - 10*x - 45/(2*(-3 + 4*x))

Maple [A] (verified)

Time = 0.31 (sec) , antiderivative size = 30, normalized size of antiderivative = 1.07

method result size
risch \(-10 x -\frac {45}{8 \left (x -\frac {3}{4}\right )}+{\mathrm e}^{\left (x \,{\mathrm e}^{\frac {3}{2 x}}-3\right ) {\mathrm e}^{-\frac {3}{2 x}}}\) \(30\)
parts \({\mathrm e}^{\left (x \,{\mathrm e}^{\frac {3}{2 x}}-3\right ) {\mathrm e}^{-\frac {3}{2 x}}}-10 x -\frac {45}{2 \left (-3+4 x \right )}\) \(34\)
parallelrisch \(\frac {-2880 x^{3}+288 \,{\mathrm e}^{\left (x \,{\mathrm e}^{\frac {3}{2 x}}-3\right ) {\mathrm e}^{-\frac {3}{2 x}}} x^{2}-216 \,{\mathrm e}^{\left (x \,{\mathrm e}^{\frac {3}{2 x}}-3\right ) {\mathrm e}^{-\frac {3}{2 x}}} x}{72 x \left (-3+4 x \right )}\) \(67\)
norman \(\frac {\left (-40 \,{\mathrm e}^{\frac {3}{2 x}} x^{3}+4 x^{2} {\mathrm e}^{\left (x \,{\mathrm e}^{\frac {3}{2 x}}-3\right ) {\mathrm e}^{-\frac {3}{2 x}}} {\mathrm e}^{\frac {3}{2 x}}-3 \,{\mathrm e}^{\frac {3}{2 x}} {\mathrm e}^{\left (x \,{\mathrm e}^{\frac {3}{2 x}}-3\right ) {\mathrm e}^{-\frac {3}{2 x}}} x \right ) {\mathrm e}^{-\frac {3}{2 x}}}{x \left (-3+4 x \right )}\) \(92\)

[In]

int((((32*x^4-48*x^3+18*x^2)*exp(3/2/x)-144*x^2+216*x-81)*exp((x*exp(3/2/x)-3)/exp(3/2/x))+(-320*x^4+480*x^3)*
exp(3/2/x))/(32*x^4-48*x^3+18*x^2)/exp(3/2/x),x,method=_RETURNVERBOSE)

[Out]

-10*x-45/8/(x-3/4)+exp((x*exp(3/2/x)-3)*exp(-3/2/x))

Fricas [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 44, normalized size of antiderivative = 1.57 \[ \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{18 x^2-48 x^3+32 x^4} \, dx=-\frac {80 \, x^{2} - 2 \, {\left (4 \, x - 3\right )} e^{\left ({\left (x e^{\left (\frac {3}{2 \, x}\right )} - 3\right )} e^{\left (-\frac {3}{2 \, x}\right )}\right )} - 60 \, x + 45}{2 \, {\left (4 \, x - 3\right )}} \]

[In]

integrate((((32*x^4-48*x^3+18*x^2)*exp(3/2/x)-144*x^2+216*x-81)*exp((x*exp(3/2/x)-3)/exp(3/2/x))+(-320*x^4+480
*x^3)*exp(3/2/x))/(32*x^4-48*x^3+18*x^2)/exp(3/2/x),x, algorithm="fricas")

[Out]

-1/2*(80*x^2 - 2*(4*x - 3)*e^((x*e^(3/2/x) - 3)*e^(-3/2/x)) - 60*x + 45)/(4*x - 3)

Sympy [A] (verification not implemented)

Time = 0.19 (sec) , antiderivative size = 27, normalized size of antiderivative = 0.96 \[ \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{18 x^2-48 x^3+32 x^4} \, dx=- 10 x + e^{\left (x e^{\frac {3}{2 x}} - 3\right ) e^{- \frac {3}{2 x}}} - \frac {45}{8 x - 6} \]

[In]

integrate((((32*x**4-48*x**3+18*x**2)*exp(3/2/x)-144*x**2+216*x-81)*exp((x*exp(3/2/x)-3)/exp(3/2/x))+(-320*x**
4+480*x**3)*exp(3/2/x))/(32*x**4-48*x**3+18*x**2)/exp(3/2/x),x)

[Out]

-10*x + exp((x*exp(3/(2*x)) - 3)*exp(-3/(2*x))) - 45/(8*x - 6)

Maxima [F]

\[ \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{18 x^2-48 x^3+32 x^4} \, dx=\int { -\frac {{\left ({\left (144 \, x^{2} - 2 \, {\left (16 \, x^{4} - 24 \, x^{3} + 9 \, x^{2}\right )} e^{\left (\frac {3}{2 \, x}\right )} - 216 \, x + 81\right )} e^{\left ({\left (x e^{\left (\frac {3}{2 \, x}\right )} - 3\right )} e^{\left (-\frac {3}{2 \, x}\right )}\right )} + 160 \, {\left (2 \, x^{4} - 3 \, x^{3}\right )} e^{\left (\frac {3}{2 \, x}\right )}\right )} e^{\left (-\frac {3}{2 \, x}\right )}}{2 \, {\left (16 \, x^{4} - 24 \, x^{3} + 9 \, x^{2}\right )}} \,d x } \]

[In]

integrate((((32*x^4-48*x^3+18*x^2)*exp(3/2/x)-144*x^2+216*x-81)*exp((x*exp(3/2/x)-3)/exp(3/2/x))+(-320*x^4+480
*x^3)*exp(3/2/x))/(32*x^4-48*x^3+18*x^2)/exp(3/2/x),x, algorithm="maxima")

[Out]

-5/2*(16*x^2 - 12*x - 9)/(4*x - 3) - 45/(4*x - 3) + 1/2*integrate((2*x^2*e^(x + 3/2/x) - 9*e^x)*e^(-3/2/x - 3*
e^(-3/2/x))/x^2, x)

Giac [F]

\[ \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{18 x^2-48 x^3+32 x^4} \, dx=\int { -\frac {{\left ({\left (144 \, x^{2} - 2 \, {\left (16 \, x^{4} - 24 \, x^{3} + 9 \, x^{2}\right )} e^{\left (\frac {3}{2 \, x}\right )} - 216 \, x + 81\right )} e^{\left ({\left (x e^{\left (\frac {3}{2 \, x}\right )} - 3\right )} e^{\left (-\frac {3}{2 \, x}\right )}\right )} + 160 \, {\left (2 \, x^{4} - 3 \, x^{3}\right )} e^{\left (\frac {3}{2 \, x}\right )}\right )} e^{\left (-\frac {3}{2 \, x}\right )}}{2 \, {\left (16 \, x^{4} - 24 \, x^{3} + 9 \, x^{2}\right )}} \,d x } \]

[In]

integrate((((32*x^4-48*x^3+18*x^2)*exp(3/2/x)-144*x^2+216*x-81)*exp((x*exp(3/2/x)-3)/exp(3/2/x))+(-320*x^4+480
*x^3)*exp(3/2/x))/(32*x^4-48*x^3+18*x^2)/exp(3/2/x),x, algorithm="giac")

[Out]

integrate(-1/2*((144*x^2 - 2*(16*x^4 - 24*x^3 + 9*x^2)*e^(3/2/x) - 216*x + 81)*e^((x*e^(3/2/x) - 3)*e^(-3/2/x)
) + 160*(2*x^4 - 3*x^3)*e^(3/2/x))*e^(-3/2/x)/(16*x^4 - 24*x^3 + 9*x^2), x)

Mupad [B] (verification not implemented)

Time = 9.99 (sec) , antiderivative size = 25, normalized size of antiderivative = 0.89 \[ \int \frac {e^{\left .-\frac {3}{2}\right /x} \left (e^{\left .\frac {3}{2}\right /x} \left (480 x^3-320 x^4\right )+e^{e^{\left .-\frac {3}{2}\right /x} \left (-3+e^{\left .\frac {3}{2}\right /x} x\right )} \left (-81+216 x-144 x^2+e^{\left .\frac {3}{2}\right /x} \left (18 x^2-48 x^3+32 x^4\right )\right )\right )}{18 x^2-48 x^3+32 x^4} \, dx={\mathrm {e}}^{-\frac {3}{{\left ({\mathrm {e}}^{1/x}\right )}^{3/2}}}\,{\mathrm {e}}^x-\frac {45}{8\,\left (x-\frac {3}{4}\right )}-10\,x \]

[In]

int((exp(-3/(2*x))*(exp(exp(-3/(2*x))*(x*exp(3/(2*x)) - 3))*(216*x - 144*x^2 + exp(3/(2*x))*(18*x^2 - 48*x^3 +
 32*x^4) - 81) + exp(3/(2*x))*(480*x^3 - 320*x^4)))/(18*x^2 - 48*x^3 + 32*x^4),x)

[Out]

exp(-3/exp(1/x)^(3/2))*exp(x) - 45/(8*(x - 3/4)) - 10*x