\(\int \frac {e^{\frac {-12+4 x+(-5 x^2-5 e^x x^2-10 x^3) \log (e^{-x} x)}{-3+x}} (15 x+10 x^2-35 x^3+10 x^4+e^x (15 x-20 x^2+5 x^3)+(30 x+85 x^2-20 x^3+e^x (30 x+10 x^2-5 x^3)) \log (e^{-x} x))}{9-6 x+x^2} \, dx\) [3248]

   Optimal result
   Rubi [F]
   Mathematica [B] (warning: unable to verify)
   Maple [A] (verified)
   Fricas [A] (verification not implemented)
   Sympy [F(-1)]
   Maxima [F(-1)]
   Giac [B] (verification not implemented)
   Mupad [B] (verification not implemented)

Optimal result

Integrand size = 130, antiderivative size = 32 \[ \int \frac {e^{\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}} \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{9-6 x+x^2} \, dx=e^{4+\frac {5 x^2 \left (1+e^x+2 x\right ) \log \left (e^{-x} x\right )}{3-x}} \]

[Out]

exp(4+5*(exp(x)+2*x+1)/(-x+3)*x^2*ln(x/exp(x)))

Rubi [F]

\[ \int \frac {e^{\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}} \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{9-6 x+x^2} \, dx=\int \frac {\exp \left (\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}\right ) \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{9-6 x+x^2} \, dx \]

[In]

Int[(E^((-12 + 4*x + (-5*x^2 - 5*E^x*x^2 - 10*x^3)*Log[x/E^x])/(-3 + x))*(15*x + 10*x^2 - 35*x^3 + 10*x^4 + E^
x*(15*x - 20*x^2 + 5*x^3) + (30*x + 85*x^2 - 20*x^3 + E^x*(30*x + 10*x^2 - 5*x^3))*Log[x/E^x]))/(9 - 6*x + x^2
),x]

[Out]

70*E^4*Defer[Int][(x/E^x)^((-5*x^2*(1 + E^x + 2*x))/(-3 + x)), x] - 35*E^4*Log[x/E^x]*Defer[Int][(x/E^x)^((-5*
x^2*(1 + E^x + 2*x))/(-3 + x)), x] + 10*E^4*Defer[Int][E^x/(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x)), x] - 20
*E^4*Log[x/E^x]*Defer[Int][E^x/(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x)), x] + 315*E^4*Log[x/E^x]*Defer[Int][
1/((-3 + x)^2*(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x))), x] + 45*E^4*Log[x/E^x]*Defer[Int][E^x/((-3 + x)^2*(
x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x))), x] + 210*E^4*Defer[Int][1/((-3 + x)*(x/E^x)^((5*x^2*(1 + E^x + 2*x
))/(-3 + x))), x] + 30*E^4*Defer[Int][E^x/((-3 + x)*(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x))), x] - 45*E^4*L
og[x/E^x]*Defer[Int][E^x/((-3 + x)*(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x))), x] + 25*E^4*Defer[Int][x/(x/E^
x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x)), x] - 20*E^4*Log[x/E^x]*Defer[Int][x/(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-
3 + x)), x] + 5*E^4*Defer[Int][(E^x*x)/(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x)), x] - 5*E^4*Log[x/E^x]*Defer
[Int][(E^x*x)/(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x)), x] + 10*E^4*Defer[Int][x^2/(x/E^x)^((5*x^2*(1 + E^x
+ 2*x))/(-3 + x)), x] - 35*E^4*Defer[Int][Defer[Int][(x/E^x)^((-5*x^2*(1 + E^x + 2*x))/(-3 + x)), x], x] + 35*
E^4*Defer[Int][Defer[Int][(x/E^x)^((-5*x^2*(1 + E^x + 2*x))/(-3 + x)), x]/x, x] - 20*E^4*Defer[Int][Defer[Int]
[E^x/(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x)), x], x] + 20*E^4*Defer[Int][Defer[Int][E^x/(x/E^x)^((5*x^2*(1
+ E^x + 2*x))/(-3 + x)), x]/x, x] + 315*E^4*Defer[Int][Defer[Int][1/((-3 + x)^2*(x/E^x)^((5*x^2*(1 + E^x + 2*x
))/(-3 + x))), x], x] - 315*E^4*Defer[Int][Defer[Int][1/((-3 + x)^2*(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x))
), x]/x, x] + 45*E^4*Defer[Int][Defer[Int][E^x/((-3 + x)^2*(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x))), x], x]
 - 45*E^4*Defer[Int][Defer[Int][E^x/((-3 + x)^2*(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x))), x]/x, x] - 45*E^4
*Defer[Int][Defer[Int][E^x/((-3 + x)*(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x))), x], x] + 45*E^4*Defer[Int][D
efer[Int][E^x/((-3 + x)*(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x))), x]/x, x] - 20*E^4*Defer[Int][Defer[Int][x
/(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x)), x], x] + 20*E^4*Defer[Int][Defer[Int][x/(x/E^x)^((5*x^2*(1 + E^x
+ 2*x))/(-3 + x)), x]/x, x] - 5*E^4*Defer[Int][Defer[Int][(E^x*x)/(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x)),
x], x] + 5*E^4*Defer[Int][Defer[Int][(E^x*x)/(x/E^x)^((5*x^2*(1 + E^x + 2*x))/(-3 + x)), x]/x, x]

Rubi steps \begin{align*} \text {integral}& = \int \frac {\exp \left (\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}\right ) \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{(-3+x)^2} \, dx \\ & = \int \frac {5 e^4 x \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \left (\left (1+e^x+2 x\right ) \left (3-4 x+x^2\right )+\left (6+17 x-4 x^2+e^x \left (6+2 x-x^2\right )\right ) \log \left (e^{-x} x\right )\right )}{(3-x)^2} \, dx \\ & = \left (5 e^4\right ) \int \frac {x \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \left (\left (1+e^x+2 x\right ) \left (3-4 x+x^2\right )+\left (6+17 x-4 x^2+e^x \left (6+2 x-x^2\right )\right ) \log \left (e^{-x} x\right )\right )}{(3-x)^2} \, dx \\ & = \left (5 e^4\right ) \int \left (\frac {3 x \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}}}{(-3+x)^2}-\frac {4 x^2 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}}}{(-3+x)^2}+\frac {2 (-1+x) x^2 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}}}{-3+x}+\frac {x^3 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}}}{(-3+x)^2}+\frac {6 x \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \log \left (e^{-x} x\right )}{(-3+x)^2}+\frac {17 x^2 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \log \left (e^{-x} x\right )}{(-3+x)^2}-\frac {4 x^3 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \log \left (e^{-x} x\right )}{(-3+x)^2}-\frac {e^x x \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \left (-3+4 x-x^2-6 \log \left (e^{-x} x\right )-2 x \log \left (e^{-x} x\right )+x^2 \log \left (e^{-x} x\right )\right )}{(-3+x)^2}\right ) \, dx \\ & = \left (5 e^4\right ) \int \frac {x^3 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}}}{(-3+x)^2} \, dx-\left (5 e^4\right ) \int \frac {e^x x \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \left (-3+4 x-x^2-6 \log \left (e^{-x} x\right )-2 x \log \left (e^{-x} x\right )+x^2 \log \left (e^{-x} x\right )\right )}{(-3+x)^2} \, dx+\left (10 e^4\right ) \int \frac {(-1+x) x^2 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}}}{-3+x} \, dx+\left (15 e^4\right ) \int \frac {x \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}}}{(-3+x)^2} \, dx-\left (20 e^4\right ) \int \frac {x^2 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}}}{(-3+x)^2} \, dx-\left (20 e^4\right ) \int \frac {x^3 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \log \left (e^{-x} x\right )}{(-3+x)^2} \, dx+\left (30 e^4\right ) \int \frac {x \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \log \left (e^{-x} x\right )}{(-3+x)^2} \, dx+\left (85 e^4\right ) \int \frac {x^2 \left (e^{-x} x\right )^{-\frac {5 x^2 \left (1+e^x+2 x\right )}{-3+x}} \log \left (e^{-x} x\right )}{(-3+x)^2} \, dx \\ & = \text {Too large to display} \\ \end{align*}

Mathematica [B] (warning: unable to verify)

Leaf count is larger than twice the leaf count of optimal. \(98\) vs. \(2(32)=64\).

Time = 0.41 (sec) , antiderivative size = 98, normalized size of antiderivative = 3.06 \[ \int \frac {e^{\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}} \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{9-6 x+x^2} \, dx=e^{4+\frac {5 x \left (21 (-3+x)+\left (-21+x+e^x x+2 x^2\right ) \log (x)-\left (-21+x+e^x x+2 x^2\right ) \log \left (e^{-x} x\right )\right )}{-3+x}} x^{-\frac {5 \left (-63+\left (1+e^x\right ) x^2+2 x^3\right )}{-3+x}} \left (e^{-x} x\right )^{-\frac {315}{-3+x}} \]

[In]

Integrate[(E^((-12 + 4*x + (-5*x^2 - 5*E^x*x^2 - 10*x^3)*Log[x/E^x])/(-3 + x))*(15*x + 10*x^2 - 35*x^3 + 10*x^
4 + E^x*(15*x - 20*x^2 + 5*x^3) + (30*x + 85*x^2 - 20*x^3 + E^x*(30*x + 10*x^2 - 5*x^3))*Log[x/E^x]))/(9 - 6*x
 + x^2),x]

[Out]

E^(4 + (5*x*(21*(-3 + x) + (-21 + x + E^x*x + 2*x^2)*Log[x] - (-21 + x + E^x*x + 2*x^2)*Log[x/E^x]))/(-3 + x))
/(x^((5*(-63 + (1 + E^x)*x^2 + 2*x^3))/(-3 + x))*(x/E^x)^(315/(-3 + x)))

Maple [A] (verified)

Time = 7.12 (sec) , antiderivative size = 39, normalized size of antiderivative = 1.22

method result size
parallelrisch \({\mathrm e}^{\frac {\left (-5 \,{\mathrm e}^{x} x^{2}-10 x^{3}-5 x^{2}\right ) \ln \left (x \,{\mathrm e}^{-x}\right )+4 x -12}{-3+x}}\) \(39\)
risch \(x^{-\frac {5 \,{\mathrm e}^{x} x^{2}}{-3+x}} x^{-\frac {10 x^{3}}{-3+x}} \left ({\mathrm e}^{x}\right )^{\frac {5 \,{\mathrm e}^{x} x^{2}}{-3+x}} \left ({\mathrm e}^{x}\right )^{\frac {10 x^{3}}{-3+x}} x^{-\frac {5 x^{2}}{-3+x}} \left ({\mathrm e}^{x}\right )^{\frac {5 x^{2}}{-3+x}} {\mathrm e}^{\frac {5 i \pi \,{\mathrm e}^{x} \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right )^{3} x^{2}-5 i \pi \,{\mathrm e}^{x} \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right )^{2} \operatorname {csgn}\left (i x \right ) x^{2}-5 i \pi \,{\mathrm e}^{x} \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right )^{2} \operatorname {csgn}\left (i {\mathrm e}^{-x}\right ) x^{2}+5 i \pi \,{\mathrm e}^{x} \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right ) \operatorname {csgn}\left (i x \right ) \operatorname {csgn}\left (i {\mathrm e}^{-x}\right ) x^{2}+10 i \pi \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right )^{3} x^{3}-10 i \pi \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right )^{2} \operatorname {csgn}\left (i x \right ) x^{3}-10 i \pi \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right )^{2} \operatorname {csgn}\left (i {\mathrm e}^{-x}\right ) x^{3}+10 i \pi \,\operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right ) \operatorname {csgn}\left (i x \right ) \operatorname {csgn}\left (i {\mathrm e}^{-x}\right ) x^{3}+5 i \pi \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right )^{3} x^{2}-5 i \pi \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right )^{2} \operatorname {csgn}\left (i x \right ) x^{2}-5 i \pi \operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right )^{2} \operatorname {csgn}\left (i {\mathrm e}^{-x}\right ) x^{2}+5 i \pi \,\operatorname {csgn}\left (i x \,{\mathrm e}^{-x}\right ) \operatorname {csgn}\left (i x \right ) \operatorname {csgn}\left (i {\mathrm e}^{-x}\right ) x^{2}+8 x -24}{2 x -6}}\) \(390\)

[In]

int((((-5*x^3+10*x^2+30*x)*exp(x)-20*x^3+85*x^2+30*x)*ln(x/exp(x))+(5*x^3-20*x^2+15*x)*exp(x)+10*x^4-35*x^3+10
*x^2+15*x)*exp(((-5*exp(x)*x^2-10*x^3-5*x^2)*ln(x/exp(x))+4*x-12)/(-3+x))/(x^2-6*x+9),x,method=_RETURNVERBOSE)

[Out]

exp(((-5*exp(x)*x^2-10*x^3-5*x^2)*ln(x/exp(x))+4*x-12)/(-3+x))

Fricas [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 37, normalized size of antiderivative = 1.16 \[ \int \frac {e^{\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}} \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{9-6 x+x^2} \, dx=e^{\left (-\frac {5 \, {\left (2 \, x^{3} + x^{2} e^{x} + x^{2}\right )} \log \left (x e^{\left (-x\right )}\right ) - 4 \, x + 12}{x - 3}\right )} \]

[In]

integrate((((-5*x^3+10*x^2+30*x)*exp(x)-20*x^3+85*x^2+30*x)*log(x/exp(x))+(5*x^3-20*x^2+15*x)*exp(x)+10*x^4-35
*x^3+10*x^2+15*x)*exp(((-5*exp(x)*x^2-10*x^3-5*x^2)*log(x/exp(x))+4*x-12)/(-3+x))/(x^2-6*x+9),x, algorithm="fr
icas")

[Out]

e^(-(5*(2*x^3 + x^2*e^x + x^2)*log(x*e^(-x)) - 4*x + 12)/(x - 3))

Sympy [F(-1)]

Timed out. \[ \int \frac {e^{\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}} \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{9-6 x+x^2} \, dx=\text {Timed out} \]

[In]

integrate((((-5*x**3+10*x**2+30*x)*exp(x)-20*x**3+85*x**2+30*x)*ln(x/exp(x))+(5*x**3-20*x**2+15*x)*exp(x)+10*x
**4-35*x**3+10*x**2+15*x)*exp(((-5*exp(x)*x**2-10*x**3-5*x**2)*ln(x/exp(x))+4*x-12)/(-3+x))/(x**2-6*x+9),x)

[Out]

Timed out

Maxima [F(-1)]

Timed out. \[ \int \frac {e^{\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}} \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{9-6 x+x^2} \, dx=\text {Timed out} \]

[In]

integrate((((-5*x^3+10*x^2+30*x)*exp(x)-20*x^3+85*x^2+30*x)*log(x/exp(x))+(5*x^3-20*x^2+15*x)*exp(x)+10*x^4-35
*x^3+10*x^2+15*x)*exp(((-5*exp(x)*x^2-10*x^3-5*x^2)*log(x/exp(x))+4*x-12)/(-3+x))/(x^2-6*x+9),x, algorithm="ma
xima")

[Out]

Timed out

Giac [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 70 vs. \(2 (27) = 54\).

Time = 0.93 (sec) , antiderivative size = 70, normalized size of antiderivative = 2.19 \[ \int \frac {e^{\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}} \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{9-6 x+x^2} \, dx=e^{\left (-\frac {10 \, x^{3} \log \left (x e^{\left (-x\right )}\right )}{x - 3} - \frac {5 \, x^{2} e^{x} \log \left (x e^{\left (-x\right )}\right )}{x - 3} - \frac {5 \, x^{2} \log \left (x e^{\left (-x\right )}\right )}{x - 3} + \frac {4 \, x}{x - 3} - \frac {12}{x - 3}\right )} \]

[In]

integrate((((-5*x^3+10*x^2+30*x)*exp(x)-20*x^3+85*x^2+30*x)*log(x/exp(x))+(5*x^3-20*x^2+15*x)*exp(x)+10*x^4-35
*x^3+10*x^2+15*x)*exp(((-5*exp(x)*x^2-10*x^3-5*x^2)*log(x/exp(x))+4*x-12)/(-3+x))/(x^2-6*x+9),x, algorithm="gi
ac")

[Out]

e^(-10*x^3*log(x*e^(-x))/(x - 3) - 5*x^2*e^x*log(x*e^(-x))/(x - 3) - 5*x^2*log(x*e^(-x))/(x - 3) + 4*x/(x - 3)
 - 12/(x - 3))

Mupad [B] (verification not implemented)

Time = 9.14 (sec) , antiderivative size = 79, normalized size of antiderivative = 2.47 \[ \int \frac {e^{\frac {-12+4 x+\left (-5 x^2-5 e^x x^2-10 x^3\right ) \log \left (e^{-x} x\right )}{-3+x}} \left (15 x+10 x^2-35 x^3+10 x^4+e^x \left (15 x-20 x^2+5 x^3\right )+\left (30 x+85 x^2-20 x^3+e^x \left (30 x+10 x^2-5 x^3\right )\right ) \log \left (e^{-x} x\right )\right )}{9-6 x+x^2} \, dx=\frac {{\mathrm {e}}^{\frac {4\,x}{x-3}}\,{\mathrm {e}}^{\frac {5\,x^3\,{\mathrm {e}}^x}{x-3}}\,{\mathrm {e}}^{\frac {5\,x^3}{x-3}}\,{\mathrm {e}}^{\frac {10\,x^4}{x-3}}\,{\mathrm {e}}^{-\frac {12}{x-3}}}{x^{\frac {5\,\left (x^2\,{\mathrm {e}}^x+x^2+2\,x^3\right )}{x-3}}} \]

[In]

int((exp(-(log(x*exp(-x))*(5*x^2*exp(x) + 5*x^2 + 10*x^3) - 4*x + 12)/(x - 3))*(15*x + log(x*exp(-x))*(30*x +
85*x^2 - 20*x^3 + exp(x)*(30*x + 10*x^2 - 5*x^3)) + 10*x^2 - 35*x^3 + 10*x^4 + exp(x)*(15*x - 20*x^2 + 5*x^3))
)/(x^2 - 6*x + 9),x)

[Out]

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