\(\int \frac {4096-256 x-64 x^2}{4 x^3+x^4+(128 x^2+32 x^3) \log (x)+(1024 x+256 x^2) \log ^2(x)+(-128 x^2-32 x^3+(-2048 x-512 x^2) \log (x)) \log (\frac {5 x^2}{4+x})+(1024 x+256 x^2) \log ^2(\frac {5 x^2}{4+x})} \, dx\) [4904]

Optimal result

Integrand size = 108, antiderivative size = 25 \[ \int \frac {4096-256 x-64 x^2}{4 x^3+x^4+\left (128 x^2+32 x^3\right ) \log (x)+\left (1024 x+256 x^2\right ) \log ^2(x)+\left (-128 x^2-32 x^3+\left (-2048 x-512 x^2\right ) \log (x)\right ) \log \left (\frac {5 x^2}{4+x}\right )+\left (1024 x+256 x^2\right ) \log ^2\left (\frac {5 x^2}{4+x}\right )} \, dx=\frac {4}{\frac {x}{16}+\log (x)-\log \left (\frac {5 x^2}{4+x}\right )} \]

[Out]

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

Rubi [A] (verified)

Time = 0.14 (sec) , antiderivative size = 23, normalized size of antiderivative = 0.92, number of steps used = 3, number of rules used = 3, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.028, Rules used = {6820, 12, 6818} \[ \int \frac {4096-256 x-64 x^2}{4 x^3+x^4+\left (128 x^2+32 x^3\right ) \log (x)+\left (1024 x+256 x^2\right ) \log ^2(x)+\left (-128 x^2-32 x^3+\left (-2048 x-512 x^2\right ) \log (x)\right ) \log \left (\frac {5 x^2}{4+x}\right )+\left (1024 x+256 x^2\right ) \log ^2\left (\frac {5 x^2}{4+x}\right )} \, dx=\frac {64}{-16 \log \left (\frac {5 x^2}{x+4}\right )+x+16 \log (x)} \]

[In]

Int[(4096 - 256*x - 64*x^2)/(4*x^3 + x^4 + (128*x^2 + 32*x^3)*Log[x] + (1024*x + 256*x^2)*Log[x]^2 + (-128*x^2
- 32*x^3 + (-2048*x - 512*x^2)*Log[x])*Log[(5*x^2)/(4 + x)] + (1024*x + 256*x^2)*Log[(5*x^2)/(4 + x)]^2),x]

[Out]

64/(x + 16*Log[x] - 16*Log[(5*x^2)/(4 + 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 6818

Int[(u_)*(y_)^(m_.), x_Symbol] :> With[{q = DerivativeDivides[y, u, x]}, Simp[q*(y^(m + 1)/(m + 1)), x] /;  !F
alseQ[q]] /; FreeQ[m, x] && NeQ[m, -1]

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 {64 \left (64-4 x-x^2\right )}{x (4+x) \left (x+16 \log (x)-16 \log \left (\frac {5 x^2}{4+x}\right )\right )^2} \, dx \\ & = 64 \int \frac {64-4 x-x^2}{x (4+x) \left (x+16 \log (x)-16 \log \left (\frac {5 x^2}{4+x}\right )\right )^2} \, dx \\ & = \frac {64}{x+16 \log (x)-16 \log \left (\frac {5 x^2}{4+x}\right )} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.02 (sec) , antiderivative size = 23, normalized size of antiderivative = 0.92 \[ \int \frac {4096-256 x-64 x^2}{4 x^3+x^4+\left (128 x^2+32 x^3\right ) \log (x)+\left (1024 x+256 x^2\right ) \log ^2(x)+\left (-128 x^2-32 x^3+\left (-2048 x-512 x^2\right ) \log (x)\right ) \log \left (\frac {5 x^2}{4+x}\right )+\left (1024 x+256 x^2\right ) \log ^2\left (\frac {5 x^2}{4+x}\right )} \, dx=\frac {64}{x+16 \log (x)-16 \log \left (\frac {5 x^2}{4+x}\right )} \]

[In]

Integrate[(4096 - 256*x - 64*x^2)/(4*x^3 + x^4 + (128*x^2 + 32*x^3)*Log[x] + (1024*x + 256*x^2)*Log[x]^2 + (-1
28*x^2 - 32*x^3 + (-2048*x - 512*x^2)*Log[x])*Log[(5*x^2)/(4 + x)] + (1024*x + 256*x^2)*Log[(5*x^2)/(4 + x)]^2
),x]

[Out]

64/(x + 16*Log[x] - 16*Log[(5*x^2)/(4 + x)])

Maple [A] (verified)

Time = 1.38 (sec) , antiderivative size = 24, normalized size of antiderivative = 0.96

method	result	size
parallelrisch	\(\frac {64}{-16 \ln \left (\frac {5 x^{2}}{4+x}\right )+x +16 \ln \left (x \right )}\)	\(24\)
default	\(-\frac {64 i}{8 \pi \,\operatorname {csgn}\left (\frac {i}{4+x}\right ) \operatorname {csgn}\left (i x^{2}\right ) \operatorname {csgn}\left (\frac {i x^{2}}{4+x}\right )-8 \pi \,\operatorname {csgn}\left (\frac {i}{4+x}\right ) \operatorname {csgn}\left (\frac {i x^{2}}{4+x}\right )^{2}+8 \pi \operatorname {csgn}\left (i x \right )^{2} \operatorname {csgn}\left (i x^{2}\right )-16 \pi \,\operatorname {csgn}\left (i x \right ) \operatorname {csgn}\left (i x^{2}\right )^{2}+8 \pi \operatorname {csgn}\left (i x^{2}\right )^{3}-8 \pi \,\operatorname {csgn}\left (i x^{2}\right ) \operatorname {csgn}\left (\frac {i x^{2}}{4+x}\right )^{2}+8 \pi \operatorname {csgn}\left (\frac {i x^{2}}{4+x}\right )^{3}+16 i \ln \left (5\right )+16 i \ln \left (x \right )-i x -16 i \ln \left (4+x \right )}\)	\(172\)
risch	\(-\frac {64 i}{8 \pi \,\operatorname {csgn}\left (\frac {i}{4+x}\right ) \operatorname {csgn}\left (i x^{2}\right ) \operatorname {csgn}\left (\frac {i x^{2}}{4+x}\right )-8 \pi \,\operatorname {csgn}\left (\frac {i}{4+x}\right ) \operatorname {csgn}\left (\frac {i x^{2}}{4+x}\right )^{2}+8 \pi \operatorname {csgn}\left (i x \right )^{2} \operatorname {csgn}\left (i x^{2}\right )-16 \pi \,\operatorname {csgn}\left (i x \right ) \operatorname {csgn}\left (i x^{2}\right )^{2}+8 \pi \operatorname {csgn}\left (i x^{2}\right )^{3}-8 \pi \,\operatorname {csgn}\left (i x^{2}\right ) \operatorname {csgn}\left (\frac {i x^{2}}{4+x}\right )^{2}+8 \pi \operatorname {csgn}\left (\frac {i x^{2}}{4+x}\right )^{3}+16 i \ln \left (5\right )+16 i \ln \left (x \right )-i x -16 i \ln \left (4+x \right )}\)	\(172\)

[In]

int((-64*x^2-256*x+4096)/((256*x^2+1024*x)*ln(5*x^2/(4+x))^2+((-512*x^2-2048*x)*ln(x)-32*x^3-128*x^2)*ln(5*x^2
/(4+x))+(256*x^2+1024*x)*ln(x)^2+(32*x^3+128*x^2)*ln(x)+x^4+4*x^3),x,method=_RETURNVERBOSE)

[Out]

64/(-16*ln(5*x^2/(4+x))+x+16*ln(x))

Fricas [A] (verification not implemented)

none

Time = 0.24 (sec) , antiderivative size = 23, normalized size of antiderivative = 0.92 \[ \int \frac {4096-256 x-64 x^2}{4 x^3+x^4+\left (128 x^2+32 x^3\right ) \log (x)+\left (1024 x+256 x^2\right ) \log ^2(x)+\left (-128 x^2-32 x^3+\left (-2048 x-512 x^2\right ) \log (x)\right ) \log \left (\frac {5 x^2}{4+x}\right )+\left (1024 x+256 x^2\right ) \log ^2\left (\frac {5 x^2}{4+x}\right )} \, dx=\frac {64}{x + 16 \, \log \left (x\right ) - 16 \, \log \left (\frac {5 \, x^{2}}{x + 4}\right )} \]

[In]

integrate((-64*x^2-256*x+4096)/((256*x^2+1024*x)*log(5*x^2/(4+x))^2+((-512*x^2-2048*x)*log(x)-32*x^3-128*x^2)*
log(5*x^2/(4+x))+(256*x^2+1024*x)*log(x)^2+(32*x^3+128*x^2)*log(x)+x^4+4*x^3),x, algorithm="fricas")

[Out]

64/(x + 16*log(x) - 16*log(5*x^2/(x + 4)))

Sympy [A] (verification not implemented)

Time = 0.12 (sec) , antiderivative size = 19, normalized size of antiderivative = 0.76 \[ \int \frac {4096-256 x-64 x^2}{4 x^3+x^4+\left (128 x^2+32 x^3\right ) \log (x)+\left (1024 x+256 x^2\right ) \log ^2(x)+\left (-128 x^2-32 x^3+\left (-2048 x-512 x^2\right ) \log (x)\right ) \log \left (\frac {5 x^2}{4+x}\right )+\left (1024 x+256 x^2\right ) \log ^2\left (\frac {5 x^2}{4+x}\right )} \, dx=- \frac {4}{- \frac {x}{16} - \log {\left (x \right )} + \log {\left (\frac {5 x^{2}}{x + 4} \right )}} \]

[In]

integrate((-64*x**2-256*x+4096)/((256*x**2+1024*x)*ln(5*x**2/(4+x))**2+((-512*x**2-2048*x)*ln(x)-32*x**3-128*x
**2)*ln(5*x**2/(4+x))+(256*x**2+1024*x)*ln(x)**2+(32*x**3+128*x**2)*ln(x)+x**4+4*x**3),x)

[Out]

-4/(-x/16 - log(x) + log(5*x**2/(x + 4)))

Maxima [A] (verification not implemented)

none

Time = 0.31 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.80 \[ \int \frac {4096-256 x-64 x^2}{4 x^3+x^4+\left (128 x^2+32 x^3\right ) \log (x)+\left (1024 x+256 x^2\right ) \log ^2(x)+\left (-128 x^2-32 x^3+\left (-2048 x-512 x^2\right ) \log (x)\right ) \log \left (\frac {5 x^2}{4+x}\right )+\left (1024 x+256 x^2\right ) \log ^2\left (\frac {5 x^2}{4+x}\right )} \, dx=\frac {64}{x - 16 \, \log \left (5\right ) + 16 \, \log \left (x + 4\right ) - 16 \, \log \left (x\right )} \]

[In]

integrate((-64*x^2-256*x+4096)/((256*x^2+1024*x)*log(5*x^2/(4+x))^2+((-512*x^2-2048*x)*log(x)-32*x^3-128*x^2)*
log(5*x^2/(4+x))+(256*x^2+1024*x)*log(x)^2+(32*x^3+128*x^2)*log(x)+x^4+4*x^3),x, algorithm="maxima")

[Out]

64/(x - 16*log(5) + 16*log(x + 4) - 16*log(x))

Giac [A] (verification not implemented)

none

Time = 0.34 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.80 \[ \int \frac {4096-256 x-64 x^2}{4 x^3+x^4+\left (128 x^2+32 x^3\right ) \log (x)+\left (1024 x+256 x^2\right ) \log ^2(x)+\left (-128 x^2-32 x^3+\left (-2048 x-512 x^2\right ) \log (x)\right ) \log \left (\frac {5 x^2}{4+x}\right )+\left (1024 x+256 x^2\right ) \log ^2\left (\frac {5 x^2}{4+x}\right )} \, dx=\frac {64}{x - 16 \, \log \left (5\right ) + 16 \, \log \left (x + 4\right ) - 16 \, \log \left (x\right )} \]

[In]

integrate((-64*x^2-256*x+4096)/((256*x^2+1024*x)*log(5*x^2/(4+x))^2+((-512*x^2-2048*x)*log(x)-32*x^3-128*x^2)*
log(5*x^2/(4+x))+(256*x^2+1024*x)*log(x)^2+(32*x^3+128*x^2)*log(x)+x^4+4*x^3),x, algorithm="giac")

[Out]

64/(x - 16*log(5) + 16*log(x + 4) - 16*log(x))

Mupad [B] (verification not implemented)

Time = 11.05 (sec) , antiderivative size = 23, normalized size of antiderivative = 0.92 \[ \int \frac {4096-256 x-64 x^2}{4 x^3+x^4+\left (128 x^2+32 x^3\right ) \log (x)+\left (1024 x+256 x^2\right ) \log ^2(x)+\left (-128 x^2-32 x^3+\left (-2048 x-512 x^2\right ) \log (x)\right ) \log \left (\frac {5 x^2}{4+x}\right )+\left (1024 x+256 x^2\right ) \log ^2\left (\frac {5 x^2}{4+x}\right )} \, dx=\frac {64}{x-16\,\ln \left (\frac {5\,x^2}{x+4}\right )+16\,\ln \left (x\right )} \]

[In]

int(-(256*x + 64*x^2 - 4096)/(log((5*x^2)/(x + 4))^2*(1024*x + 256*x^2) + log(x)*(128*x^2 + 32*x^3) + log(x)^2
*(1024*x + 256*x^2) - log((5*x^2)/(x + 4))*(log(x)*(2048*x + 512*x^2) + 128*x^2 + 32*x^3) + 4*x^3 + x^4),x)

[Out]

64/(x - 16*log((5*x^2)/(x + 4)) + 16*log(x))