\(\int \frac {-20+6 x^2+(20-6 x^2) \log (x) \log (4 \log (x))+(-10-3 x^2) \log (x) \log (4 \log (x)) \log (\frac {\log (4 \log (x))}{2 x}) \log (\log ^2(\frac {\log (4 \log (x))}{2 x}))}{(-10 x+3 x^3) \log (x) \log (4 \log (x)) \log (\frac {\log (4 \log (x))}{2 x}) \log (\log ^2(\frac {\log (4 \log (x))}{2 x}))} \, dx\) [7141]

Optimal result

Integrand size = 122, antiderivative size = 32 \[ \int \frac {-20+6 x^2+\left (20-6 x^2\right ) \log (x) \log (4 \log (x))+\left (-10-3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{\left (-10 x+3 x^3\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx=\log \left (\frac {4 \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{-\frac {2}{x}+\frac {3 x}{5}}\right ) \]

[Out]

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

Rubi [A] (verified)

Time = 2.57 (sec) , antiderivative size = 30, normalized size of antiderivative = 0.94, number of steps used = 7, number of rules used = 5, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.041, Rules used = {1607, 6857, 457, 78, 6816} \[ \int \frac {-20+6 x^2+\left (20-6 x^2\right ) \log (x) \log (4 \log (x))+\left (-10-3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{\left (-10 x+3 x^3\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx=-\log \left (10-3 x^2\right )+\log \left (\log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )\right )+\log (x) \]

[In]

Int[(-20 + 6*x^2 + (20 - 6*x^2)*Log[x]*Log[4*Log[x]] + (-10 - 3*x^2)*Log[x]*Log[4*Log[x]]*Log[Log[4*Log[x]]/(2
*x)]*Log[Log[Log[4*Log[x]]/(2*x)]^2])/((-10*x + 3*x^3)*Log[x]*Log[4*Log[x]]*Log[Log[4*Log[x]]/(2*x)]*Log[Log[L
og[4*Log[x]]/(2*x)]^2]),x]

[Out]

Log[x] - Log[10 - 3*x^2] + Log[Log[Log[Log[4*Log[x]]/(2*x)]^2]]

Rule 78

Int[((a_.) + (b_.)*(x_))*((c_) + (d_.)*(x_))^(n_.)*((e_.) + (f_.)*(x_))^(p_.), x_Symbol] :> Int[ExpandIntegran
d[(a + b*x)*(c + d*x)^n*(e + f*x)^p, x], x] /; FreeQ[{a, b, c, d, e, f, n}, x] && NeQ[b*c - a*d, 0] && ((ILtQ[
n, 0] && ILtQ[p, 0]) || EqQ[p, 1] || (IGtQ[p, 0] && ( !IntegerQ[n] || LeQ[9*p + 5*(n + 2), 0] || GeQ[n + p + 1
, 0] || (GeQ[n + p + 2, 0] && RationalQ[a, b, c, d, e, f]))))

Rule 457

Int[(x_)^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_.)*((c_) + (d_.)*(x_)^(n_))^(q_.), x_Symbol] :> Dist[1/n, Subst[Int
[x^(Simplify[(m + 1)/n] - 1)*(a + b*x)^p*(c + d*x)^q, x], x, x^n], x] /; FreeQ[{a, b, c, d, m, n, p, q}, x] &&
NeQ[b*c - a*d, 0] && IntegerQ[Simplify[(m + 1)/n]]

Rule 1607

Int[(u_.)*((a_.)*(x_)^(p_.) + (b_.)*(x_)^(q_.))^(n_.), x_Symbol] :> Int[u*x^(n*p)*(a + b*x^(q - p))^n, x] /; F
reeQ[{a, b, p, q}, x] && IntegerQ[n] && PosQ[q - p]

Rule 6816

Int[(u_)/(y_), x_Symbol] :> With[{q = DerivativeDivides[y, u, x]}, Simp[q*Log[RemoveContent[y, x]], x] /;  !Fa
lseQ[q]]

Rule 6857

Int[(u_)/((a_) + (b_.)*(x_)^(n_)), x_Symbol] :> With[{v = RationalFunctionExpand[u/(a + b*x^n), x]}, Int[v, x]
/; SumQ[v]] /; FreeQ[{a, b}, x] && IGtQ[n, 0]

Rubi steps \begin{align*} \text {integral}& = \int \frac {-20+6 x^2+\left (20-6 x^2\right ) \log (x) \log (4 \log (x))+\left (-10-3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{x \left (-10+3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx \\ & = \int \left (\frac {-10-3 x^2}{x \left (-10+3 x^2\right )}-\frac {2 (-1+\log (x) \log (4 \log (x)))}{x \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}\right ) \, dx \\ & = -\left (2 \int \frac {-1+\log (x) \log (4 \log (x))}{x \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx\right )+\int \frac {-10-3 x^2}{x \left (-10+3 x^2\right )} \, dx \\ & = \log \left (\log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )\right )+\frac {1}{2} \text {Subst}\left (\int \frac {-10-3 x}{x (-10+3 x)} \, dx,x,x^2\right ) \\ & = \log \left (\log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )\right )+\frac {1}{2} \text {Subst}\left (\int \left (\frac {1}{x}-\frac {6}{-10+3 x}\right ) \, dx,x,x^2\right ) \\ & = \log (x)-\log \left (10-3 x^2\right )+\log \left (\log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )\right ) \\ \end{align*}

Mathematica [A] (verified)

Time = 0.11 (sec) , antiderivative size = 30, normalized size of antiderivative = 0.94 \[ \int \frac {-20+6 x^2+\left (20-6 x^2\right ) \log (x) \log (4 \log (x))+\left (-10-3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{\left (-10 x+3 x^3\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx=\log (x)-\log \left (10-3 x^2\right )+\log \left (\log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )\right ) \]

[In]

Integrate[(-20 + 6*x^2 + (20 - 6*x^2)*Log[x]*Log[4*Log[x]] + (-10 - 3*x^2)*Log[x]*Log[4*Log[x]]*Log[Log[4*Log[
x]]/(2*x)]*Log[Log[Log[4*Log[x]]/(2*x)]^2])/((-10*x + 3*x^3)*Log[x]*Log[4*Log[x]]*Log[Log[4*Log[x]]/(2*x)]*Log
[Log[Log[4*Log[x]]/(2*x)]^2]),x]

[Out]

Log[x] - Log[10 - 3*x^2] + Log[Log[Log[Log[4*Log[x]]/(2*x)]^2]]

Maple [A] (verified)

Time = 198.05 (sec) , antiderivative size = 27, normalized size of antiderivative = 0.84

method	result	size
parallelrisch	\(\ln \left (x \right )+\ln \left (\ln \left (\ln \left (\frac {\ln \left (4 \ln \left (x \right )\right )}{2 x}\right )^{2}\right )\right )-\ln \left (x^{2}-\frac {10}{3}\right )\)	\(27\)
risch	\(\text {Expression too large to display}\)	\(892\)

[In]

int(((-3*x^2-10)*ln(x)*ln(4*ln(x))*ln(1/2*ln(4*ln(x))/x)*ln(ln(1/2*ln(4*ln(x))/x)^2)+(-6*x^2+20)*ln(x)*ln(4*ln
(x))+6*x^2-20)/(3*x^3-10*x)/ln(x)/ln(4*ln(x))/ln(1/2*ln(4*ln(x))/x)/ln(ln(1/2*ln(4*ln(x))/x)^2),x,method=_RETU
RNVERBOSE)

[Out]

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

Fricas [A] (verification not implemented)

none

Time = 0.26 (sec) , antiderivative size = 28, normalized size of antiderivative = 0.88 \[ \int \frac {-20+6 x^2+\left (20-6 x^2\right ) \log (x) \log (4 \log (x))+\left (-10-3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{\left (-10 x+3 x^3\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx=-\log \left (3 \, x^{2} - 10\right ) + \log \left (x\right ) + \log \left (\log \left (\log \left (\frac {\log \left (4 \, \log \left (x\right )\right )}{2 \, x}\right )^{2}\right )\right ) \]

[In]

integrate(((-3*x^2-10)*log(x)*log(4*log(x))*log(1/2*log(4*log(x))/x)*log(log(1/2*log(4*log(x))/x)^2)+(-6*x^2+2
0)*log(x)*log(4*log(x))+6*x^2-20)/(3*x^3-10*x)/log(x)/log(4*log(x))/log(1/2*log(4*log(x))/x)/log(log(1/2*log(4
*log(x))/x)^2),x, algorithm="fricas")

[Out]

-log(3*x^2 - 10) + log(x) + log(log(log(1/2*log(4*log(x))/x)^2))

Sympy [A] (verification not implemented)

Time = 0.49 (sec) , antiderivative size = 27, normalized size of antiderivative = 0.84 \[ \int \frac {-20+6 x^2+\left (20-6 x^2\right ) \log (x) \log (4 \log (x))+\left (-10-3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{\left (-10 x+3 x^3\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx=\log {\left (x \right )} - \log {\left (3 x^{2} - 10 \right )} + \log {\left (\log {\left (\log {\left (\frac {\log {\left (4 \log {\left (x \right )} \right )}}{2 x} \right )}^{2} \right )} \right )} \]

[In]

integrate(((-3*x**2-10)*ln(x)*ln(4*ln(x))*ln(1/2*ln(4*ln(x))/x)*ln(ln(1/2*ln(4*ln(x))/x)**2)+(-6*x**2+20)*ln(x
)*ln(4*ln(x))+6*x**2-20)/(3*x**3-10*x)/ln(x)/ln(4*ln(x))/ln(1/2*ln(4*ln(x))/x)/ln(ln(1/2*ln(4*ln(x))/x)**2),x)

[Out]

log(x) - log(3*x**2 - 10) + log(log(log(log(4*log(x))/(2*x))**2))

Maxima [A] (verification not implemented)

none

Time = 0.35 (sec) , antiderivative size = 31, normalized size of antiderivative = 0.97 \[ \int \frac {-20+6 x^2+\left (20-6 x^2\right ) \log (x) \log (4 \log (x))+\left (-10-3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{\left (-10 x+3 x^3\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx=-\log \left (3 \, x^{2} - 10\right ) + \log \left (x\right ) + \log \left (\log \left (\log \left (2\right ) + \log \left (x\right ) - \log \left (2 \, \log \left (2\right ) + \log \left (\log \left (x\right )\right )\right )\right )\right ) \]

[In]

integrate(((-3*x^2-10)*log(x)*log(4*log(x))*log(1/2*log(4*log(x))/x)*log(log(1/2*log(4*log(x))/x)^2)+(-6*x^2+2
0)*log(x)*log(4*log(x))+6*x^2-20)/(3*x^3-10*x)/log(x)/log(4*log(x))/log(1/2*log(4*log(x))/x)/log(log(1/2*log(4
*log(x))/x)^2),x, algorithm="maxima")

[Out]

-log(3*x^2 - 10) + log(x) + log(log(log(2) + log(x) - log(2*log(2) + log(log(x)))))

Giac [F(-1)]

Timed out. \[ \int \frac {-20+6 x^2+\left (20-6 x^2\right ) \log (x) \log (4 \log (x))+\left (-10-3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{\left (-10 x+3 x^3\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx=\text {Timed out} \]

[In]

integrate(((-3*x^2-10)*log(x)*log(4*log(x))*log(1/2*log(4*log(x))/x)*log(log(1/2*log(4*log(x))/x)^2)+(-6*x^2+2
0)*log(x)*log(4*log(x))+6*x^2-20)/(3*x^3-10*x)/log(x)/log(4*log(x))/log(1/2*log(4*log(x))/x)/log(log(1/2*log(4
*log(x))/x)^2),x, algorithm="giac")

[Out]

Timed out

Mupad [B] (verification not implemented)

Time = 16.70 (sec) , antiderivative size = 26, normalized size of antiderivative = 0.81 \[ \int \frac {-20+6 x^2+\left (20-6 x^2\right ) \log (x) \log (4 \log (x))+\left (-10-3 x^2\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )}{\left (-10 x+3 x^3\right ) \log (x) \log (4 \log (x)) \log \left (\frac {\log (4 \log (x))}{2 x}\right ) \log \left (\log ^2\left (\frac {\log (4 \log (x))}{2 x}\right )\right )} \, dx=\ln \left (\ln \left ({\ln \left (\frac {\ln \left (4\,\ln \left (x\right )\right )}{2\,x}\right )}^2\right )\right )-\ln \left (x^2-\frac {10}{3}\right )+\ln \left (x\right ) \]

[In]

int((log(4*log(x))*log(x)*(6*x^2 - 20) - 6*x^2 + log(log(log(4*log(x))/(2*x))^2)*log(log(4*log(x))/(2*x))*log(
4*log(x))*log(x)*(3*x^2 + 10) + 20)/(log(log(log(4*log(x))/(2*x))^2)*log(log(4*log(x))/(2*x))*log(4*log(x))*lo
g(x)*(10*x - 3*x^3)),x)

[Out]

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