\(\int \frac {e^{-\frac {2 (5+(-3+x) \log (\frac {6 x}{5}))}{-3+x}} (9 x^2+e^{\frac {2 (5+(-3+x) \log (\frac {6 x}{5}))}{-3+x}} (-360+240 x-40 x^2))}{360-240 x+40 x^2} \, dx\) [7104]

Optimal result

Integrand size = 72, antiderivative size = 18 \[ \int \frac {e^{-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{360-240 x+40 x^2} \, dx=-25+\frac {1}{64} e^{-\frac {10}{-3+x}}-x \]

[Out]

9/400*x^2/exp(5/(-3+x)+ln(6/5*x))^2-x-25

Rubi [A] (verified)

Time = 0.32 (sec) , antiderivative size = 19, normalized size of antiderivative = 1.06, number of steps used = 8, number of rules used = 5, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.069, Rules used = {27, 12, 6820, 14, 2240} \[ \int \frac {e^{-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{360-240 x+40 x^2} \, dx=\frac {1}{64} e^{\frac {10}{3-x}}-x \]

[In]

Int[(9*x^2 + E^((2*(5 + (-3 + x)*Log[(6*x)/5]))/(-3 + x))*(-360 + 240*x - 40*x^2))/(E^((2*(5 + (-3 + x)*Log[(6
*x)/5]))/(-3 + x))*(360 - 240*x + 40*x^2)),x]

[Out]

E^(10/(3 - x))/64 - x

Rule 12

Int[(a_)*(u_), x_Symbol] :> Dist[a, Int[u, x], x] /; FreeQ[a, x] &&  !MatchQ[u, (b_)*(v_) /; FreeQ[b, x]]

Rule 14

Int[(u_)*((c_.)*(x_))^(m_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*u, x], x] /; FreeQ[{c, m}, x] && SumQ[u]
&&  !LinearQ[u, x] &&  !MatchQ[u, (a_) + (b_.)*(v_) /; FreeQ[{a, b}, x] && InverseFunctionQ[v]]

Rule 27

Int[(u_.)*((a_) + (b_.)*(x_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> Int[u*Cancel[(b/2 + c*x)^(2*p)/c^p], x] /; Fr
eeQ[{a, b, c}, x] && EqQ[b^2 - 4*a*c, 0] && IntegerQ[p]

Rule 2240

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*((e_.) + (f_.)*(x_))^(m_.), x_Symbol] :> Simp[(e + f*x)^n*(
F^(a + b*(c + d*x)^n)/(b*f*n*(c + d*x)^n*Log[F])), x] /; FreeQ[{F, a, b, c, d, e, f, n}, x] && EqQ[m, n - 1] &
& EqQ[d*e - c*f, 0]

Rule 6820

Int[u_, x_Symbol] :> With[{v = SimplifyIntegrand[u, x]}, Int[v, x] /; SimplerIntegrandQ[v, u, x]]

Rubi steps \begin{align*} \text {integral}& = \int \frac {\exp \left (-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}\right ) \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{40 (-3+x)^2} \, dx \\ & = \frac {1}{40} \int \frac {\exp \left (-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}\right ) \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{(-3+x)^2} \, dx \\ & = \frac {1}{40} \int \frac {5 \left (5 e^{-\frac {10}{-3+x}}-32 (-3+x)^2\right )}{4 (3-x)^2} \, dx \\ & = \frac {1}{32} \int \frac {5 e^{-\frac {10}{-3+x}}-32 (-3+x)^2}{(3-x)^2} \, dx \\ & = \frac {1}{32} \text {Subst}\left (\int \frac {5 e^{-10/x}-32 x^2}{x^2} \, dx,x,-3+x\right ) \\ & = \frac {1}{32} \text {Subst}\left (\int \left (-32+\frac {5 e^{-10/x}}{x^2}\right ) \, dx,x,-3+x\right ) \\ & = -x+\frac {5}{32} \text {Subst}\left (\int \frac {e^{-10/x}}{x^2} \, dx,x,-3+x\right ) \\ & = \frac {1}{64} e^{\frac {10}{3-x}}-x \\ \end{align*}

Mathematica [A] (verified)

Time = 0.06 (sec) , antiderivative size = 23, normalized size of antiderivative = 1.28 \[ \int \frac {e^{-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{360-240 x+40 x^2} \, dx=\frac {1}{32} \left (\frac {1}{2} e^{\frac {10}{3-x}}-32 x\right ) \]

[In]

Integrate[(9*x^2 + E^((2*(5 + (-3 + x)*Log[(6*x)/5]))/(-3 + x))*(-360 + 240*x - 40*x^2))/(E^((2*(5 + (-3 + x)*
Log[(6*x)/5]))/(-3 + x))*(360 - 240*x + 40*x^2)),x]

[Out]

(E^(10/(3 - x))/2 - 32*x)/32

Maple [A] (verified)

Time = 0.91 (sec) , antiderivative size = 32, normalized size of antiderivative = 1.78

method	result	size
risch	\(-x +\frac {9 x^{2} {\mathrm e}^{-\frac {2 \left (\ln \left (\frac {6 x}{5}\right ) x -3 \ln \left (\frac {6 x}{5}\right )+5\right )}{-3+x}}}{400}\)	\(32\)
default	\(-x +\frac {\left (27 x^{3}-81 x^{2}\right ) {\mathrm e}^{-\frac {2 \left (\left (-3+x \right ) \ln \left (\frac {6 x}{5}\right )+5\right )}{-3+x}}}{-3600+1200 x}\)	\(42\)
parts	\(-x +\frac {\left (27 x^{3}-81 x^{2}\right ) {\mathrm e}^{-\frac {2 \left (\left (-3+x \right ) \ln \left (\frac {6 x}{5}\right )+5\right )}{-3+x}}}{-3600+1200 x}\)	\(42\)
parallelrisch	\(\frac {\left (-10800 \,{\mathrm e}^{\frac {2 \left (-3+x \right ) \ln \left (\frac {6 x}{5}\right )+10}{-3+x}} x^{2}+243 x^{3}+10800 \,{\mathrm e}^{\frac {2 \left (-3+x \right ) \ln \left (\frac {6 x}{5}\right )+10}{-3+x}} x -729 x^{2}+64800 \,{\mathrm e}^{\frac {2 \left (-3+x \right ) \ln \left (\frac {6 x}{5}\right )+10}{-3+x}}\right ) {\mathrm e}^{-\frac {2 \left (\left (-3+x \right ) \ln \left (\frac {6 x}{5}\right )+5\right )}{-3+x}}}{-32400+10800 x}\)	\(105\)

[In]

int(((-40*x^2+240*x-360)*exp(((-3+x)*ln(6/5*x)+5)/(-3+x))^2+9*x^2)/(40*x^2-240*x+360)/exp(((-3+x)*ln(6/5*x)+5)
/(-3+x))^2,x,method=_RETURNVERBOSE)

[Out]

-x+9/400*x^2*exp(-2*(ln(6/5*x)*x-3*ln(6/5*x)+5)/(-3+x))

Fricas [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 47, normalized size of antiderivative = 2.61 \[ \int \frac {e^{-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{360-240 x+40 x^2} \, dx=\frac {1}{400} \, {\left (9 \, x^{2} - 400 \, x e^{\left (\frac {2 \, {\left ({\left (x - 3\right )} \log \left (\frac {6}{5} \, x\right ) + 5\right )}}{x - 3}\right )}\right )} e^{\left (-\frac {2 \, {\left ({\left (x - 3\right )} \log \left (\frac {6}{5} \, x\right ) + 5\right )}}{x - 3}\right )} \]

[In]

integrate(((-40*x^2+240*x-360)*exp(((-3+x)*log(6/5*x)+5)/(-3+x))^2+9*x^2)/(40*x^2-240*x+360)/exp(((-3+x)*log(6
/5*x)+5)/(-3+x))^2,x, algorithm="fricas")

[Out]

1/400*(9*x^2 - 400*x*e^(2*((x - 3)*log(6/5*x) + 5)/(x - 3)))*e^(-2*((x - 3)*log(6/5*x) + 5)/(x - 3))

Sympy [B] (verification not implemented)

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

Time = 0.18 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.44 \[ \int \frac {e^{-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{360-240 x+40 x^2} \, dx=\frac {9 x^{2} e^{- \frac {2 \left (\left (x - 3\right ) \log {\left (\frac {6 x}{5} \right )} + 5\right )}{x - 3}}}{400} - x \]

[In]

integrate(((-40*x**2+240*x-360)*exp(((-3+x)*ln(6/5*x)+5)/(-3+x))**2+9*x**2)/(40*x**2-240*x+360)/exp(((-3+x)*ln
(6/5*x)+5)/(-3+x))**2,x)

[Out]

9*x**2*exp(-2*((x - 3)*log(6*x/5) + 5)/(x - 3))/400 - x

Maxima [A] (verification not implemented)

none

Time = 0.29 (sec) , antiderivative size = 14, normalized size of antiderivative = 0.78 \[ \int \frac {e^{-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{360-240 x+40 x^2} \, dx=-x + \frac {1}{64} \, e^{\left (-\frac {10}{x - 3}\right )} \]

[In]

integrate(((-40*x^2+240*x-360)*exp(((-3+x)*log(6/5*x)+5)/(-3+x))^2+9*x^2)/(40*x^2-240*x+360)/exp(((-3+x)*log(6
/5*x)+5)/(-3+x))^2,x, algorithm="maxima")

[Out]

-x + 1/64*e^(-10/(x - 3))

Giac [F]

\[ \int \frac {e^{-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{360-240 x+40 x^2} \, dx=\int { \frac {{\left (9 \, x^{2} - 40 \, {\left (x^{2} - 6 \, x + 9\right )} e^{\left (\frac {2 \, {\left ({\left (x - 3\right )} \log \left (\frac {6}{5} \, x\right ) + 5\right )}}{x - 3}\right )}\right )} e^{\left (-\frac {2 \, {\left ({\left (x - 3\right )} \log \left (\frac {6}{5} \, x\right ) + 5\right )}}{x - 3}\right )}}{40 \, {\left (x^{2} - 6 \, x + 9\right )}} \,d x } \]

[In]

integrate(((-40*x^2+240*x-360)*exp(((-3+x)*log(6/5*x)+5)/(-3+x))^2+9*x^2)/(40*x^2-240*x+360)/exp(((-3+x)*log(6
/5*x)+5)/(-3+x))^2,x, algorithm="giac")

[Out]

integrate(1/40*(9*x^2 - 40*(x^2 - 6*x + 9)*e^(2*((x - 3)*log(6/5*x) + 5)/(x - 3)))*e^(-2*((x - 3)*log(6/5*x) +
5)/(x - 3))/(x^2 - 6*x + 9), x)

Mupad [F(-1)]

Timed out. \[ \int \frac {e^{-\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (9 x^2+e^{\frac {2 \left (5+(-3+x) \log \left (\frac {6 x}{5}\right )\right )}{-3+x}} \left (-360+240 x-40 x^2\right )\right )}{360-240 x+40 x^2} \, dx=-\int \frac {{\mathrm {e}}^{-\frac {2\,\left (\ln \left (\frac {6\,x}{5}\right )\,\left (x-3\right )+5\right )}{x-3}}\,\left ({\mathrm {e}}^{\frac {2\,\left (\ln \left (\frac {6\,x}{5}\right )\,\left (x-3\right )+5\right )}{x-3}}\,\left (40\,x^2-240\,x+360\right )-9\,x^2\right )}{40\,x^2-240\,x+360} \,d x \]

[In]

int(-(exp(-(2*(log((6*x)/5)*(x - 3) + 5))/(x - 3))*(exp((2*(log((6*x)/5)*(x - 3) + 5))/(x - 3))*(40*x^2 - 240*
x + 360) - 9*x^2))/(40*x^2 - 240*x + 360),x)

[Out]

-int((exp(-(2*(log((6*x)/5)*(x - 3) + 5))/(x - 3))*(exp((2*(log((6*x)/5)*(x - 3) + 5))/(x - 3))*(40*x^2 - 240*
x + 360) - 9*x^2))/(40*x^2 - 240*x + 360), x)