\(\int \frac {-3 x+3 x^2-3 \log (x)+(-3 x^2-3 x \log (x)) \log (\log (x))+(3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+(-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+(-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx\) [697]

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

Optimal result

Integrand size = 191, antiderivative size = 24 \[ \int \frac {-3 x+3 x^2-3 \log (x)+\left (-3 x^2-3 x \log (x)\right ) \log (\log (x))+\left (3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+\left (-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+\left (-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))\right ) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx=\frac {3 x}{\log (x) (x+\log (3 (\log (x)+x (-1+\log (\log (x))))))} \]

[Out]

3*x/ln(x)/(x+ln(3*ln(x)+3*(ln(ln(x))-1)*x))

Rubi [F]

\[ \int \frac {-3 x+3 x^2-3 \log (x)+\left (-3 x^2-3 x \log (x)\right ) \log (\log (x))+\left (3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+\left (-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+\left (-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))\right ) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx=\int \frac {-3 x+3 x^2-3 \log (x)+\left (-3 x^2-3 x \log (x)\right ) \log (\log (x))+\left (3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+\left (-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+\left (-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))\right ) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx \]

[In]

Int[(-3*x + 3*x^2 - 3*Log[x] + (-3*x^2 - 3*x*Log[x])*Log[Log[x]] + (3*x + (-3 - 3*x)*Log[x] + 3*Log[x]^2 + (-3
*x + 3*x*Log[x])*Log[Log[x]])*Log[-3*x + 3*Log[x] + 3*x*Log[Log[x]]])/(-(x^3*Log[x]^2) + x^2*Log[x]^3 + x^3*Lo
g[x]^2*Log[Log[x]] + (-2*x^2*Log[x]^2 + 2*x*Log[x]^3 + 2*x^2*Log[x]^2*Log[Log[x]])*Log[-3*x + 3*Log[x] + 3*x*L
og[Log[x]]] + (-(x*Log[x]^2) + Log[x]^3 + x*Log[x]^2*Log[Log[x]])*Log[-3*x + 3*Log[x] + 3*x*Log[Log[x]]]^2),x]

[Out]

-3*Defer[Int][x/((-x + Log[x] + x*Log[Log[x]])*(x + Log[3*(Log[x] + x*(-1 + Log[Log[x]]))])^2), x] - 3*Defer[I
nt][x/(Log[x]^2*(-x + Log[x] + x*Log[Log[x]])*(x + Log[3*(Log[x] + x*(-1 + Log[Log[x]]))])^2), x] - 3*Defer[In
t][1/(Log[x]*(-x + Log[x] + x*Log[Log[x]])*(x + Log[3*(Log[x] + x*(-1 + Log[Log[x]]))])^2), x] + 3*Defer[Int][
x/(Log[x]*(-x + Log[x] + x*Log[Log[x]])*(x + Log[3*(Log[x] + x*(-1 + Log[Log[x]]))])^2), x] + 3*Defer[Int][x^2
/(Log[x]*(-x + Log[x] + x*Log[Log[x]])*(x + Log[3*(Log[x] + x*(-1 + Log[Log[x]]))])^2), x] - 3*Defer[Int][(x*L
og[Log[x]])/(Log[x]*(-x + Log[x] + x*Log[Log[x]])*(x + Log[3*(Log[x] + x*(-1 + Log[Log[x]]))])^2), x] - 3*Defe
r[Int][(x^2*Log[Log[x]])/(Log[x]*(-x + Log[x] + x*Log[Log[x]])*(x + Log[3*(Log[x] + x*(-1 + Log[Log[x]]))])^2)
, x] - 3*Defer[Int][1/(Log[x]^2*(x + Log[3*(Log[x] + x*(-1 + Log[Log[x]]))])), x] + 3*Defer[Int][1/(Log[x]*(x
+ Log[3*(Log[x] + x*(-1 + Log[Log[x]]))])), x]

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

Mathematica [A] (verified)

Time = 0.11 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.00 \[ \int \frac {-3 x+3 x^2-3 \log (x)+\left (-3 x^2-3 x \log (x)\right ) \log (\log (x))+\left (3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+\left (-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+\left (-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))\right ) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx=\frac {3 x}{\log (x) (x+\log (3 (\log (x)+x (-1+\log (\log (x))))))} \]

[In]

Integrate[(-3*x + 3*x^2 - 3*Log[x] + (-3*x^2 - 3*x*Log[x])*Log[Log[x]] + (3*x + (-3 - 3*x)*Log[x] + 3*Log[x]^2
 + (-3*x + 3*x*Log[x])*Log[Log[x]])*Log[-3*x + 3*Log[x] + 3*x*Log[Log[x]]])/(-(x^3*Log[x]^2) + x^2*Log[x]^3 +
x^3*Log[x]^2*Log[Log[x]] + (-2*x^2*Log[x]^2 + 2*x*Log[x]^3 + 2*x^2*Log[x]^2*Log[Log[x]])*Log[-3*x + 3*Log[x] +
 3*x*Log[Log[x]]] + (-(x*Log[x]^2) + Log[x]^3 + x*Log[x]^2*Log[Log[x]])*Log[-3*x + 3*Log[x] + 3*x*Log[Log[x]]]
^2),x]

[Out]

(3*x)/(Log[x]*(x + Log[3*(Log[x] + x*(-1 + Log[Log[x]]))]))

Maple [A] (verified)

Time = 25.33 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.08

method result size
default \(\frac {3 x}{\ln \left (x \right ) \left (\ln \left (3\right )+x +\ln \left (x \ln \left (\ln \left (x \right )\right )+\ln \left (x \right )-x \right )\right )}\) \(26\)
risch \(\frac {3 x}{\ln \left (x \right ) \left (\ln \left (3 x \ln \left (\ln \left (x \right )\right )+3 \ln \left (x \right )-3 x \right )+x \right )}\) \(27\)
parallelrisch \(\frac {3 x}{\ln \left (x \right ) \left (\ln \left (3 x \ln \left (\ln \left (x \right )\right )+3 \ln \left (x \right )-3 x \right )+x \right )}\) \(27\)

[In]

int((((3*x*ln(x)-3*x)*ln(ln(x))+3*ln(x)^2+(-3*x-3)*ln(x)+3*x)*ln(3*x*ln(ln(x))+3*ln(x)-3*x)+(-3*x*ln(x)-3*x^2)
*ln(ln(x))-3*ln(x)+3*x^2-3*x)/((x*ln(x)^2*ln(ln(x))+ln(x)^3-x*ln(x)^2)*ln(3*x*ln(ln(x))+3*ln(x)-3*x)^2+(2*x^2*
ln(x)^2*ln(ln(x))+2*x*ln(x)^3-2*x^2*ln(x)^2)*ln(3*x*ln(ln(x))+3*ln(x)-3*x)+x^3*ln(x)^2*ln(ln(x))+x^2*ln(x)^3-x
^3*ln(x)^2),x,method=_RETURNVERBOSE)

[Out]

3*x/ln(x)/(ln(3)+x+ln(x*ln(ln(x))+ln(x)-x))

Fricas [A] (verification not implemented)

none

Time = 0.24 (sec) , antiderivative size = 28, normalized size of antiderivative = 1.17 \[ \int \frac {-3 x+3 x^2-3 \log (x)+\left (-3 x^2-3 x \log (x)\right ) \log (\log (x))+\left (3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+\left (-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+\left (-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))\right ) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx=\frac {3 \, x}{x \log \left (x\right ) + \log \left (3 \, x \log \left (\log \left (x\right )\right ) - 3 \, x + 3 \, \log \left (x\right )\right ) \log \left (x\right )} \]

[In]

integrate((((3*x*log(x)-3*x)*log(log(x))+3*log(x)^2+(-3*x-3)*log(x)+3*x)*log(3*x*log(log(x))+3*log(x)-3*x)+(-3
*x*log(x)-3*x^2)*log(log(x))-3*log(x)+3*x^2-3*x)/((x*log(x)^2*log(log(x))+log(x)^3-x*log(x)^2)*log(3*x*log(log
(x))+3*log(x)-3*x)^2+(2*x^2*log(x)^2*log(log(x))+2*x*log(x)^3-2*x^2*log(x)^2)*log(3*x*log(log(x))+3*log(x)-3*x
)+x^3*log(x)^2*log(log(x))+x^2*log(x)^3-x^3*log(x)^2),x, algorithm="fricas")

[Out]

3*x/(x*log(x) + log(3*x*log(log(x)) - 3*x + 3*log(x))*log(x))

Sympy [A] (verification not implemented)

Time = 0.36 (sec) , antiderivative size = 29, normalized size of antiderivative = 1.21 \[ \int \frac {-3 x+3 x^2-3 \log (x)+\left (-3 x^2-3 x \log (x)\right ) \log (\log (x))+\left (3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+\left (-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+\left (-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))\right ) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx=\frac {3 x}{x \log {\left (x \right )} + \log {\left (x \right )} \log {\left (3 x \log {\left (\log {\left (x \right )} \right )} - 3 x + 3 \log {\left (x \right )} \right )}} \]

[In]

integrate((((3*x*ln(x)-3*x)*ln(ln(x))+3*ln(x)**2+(-3*x-3)*ln(x)+3*x)*ln(3*x*ln(ln(x))+3*ln(x)-3*x)+(-3*x*ln(x)
-3*x**2)*ln(ln(x))-3*ln(x)+3*x**2-3*x)/((x*ln(x)**2*ln(ln(x))+ln(x)**3-x*ln(x)**2)*ln(3*x*ln(ln(x))+3*ln(x)-3*
x)**2+(2*x**2*ln(x)**2*ln(ln(x))+2*x*ln(x)**3-2*x**2*ln(x)**2)*ln(3*x*ln(ln(x))+3*ln(x)-3*x)+x**3*ln(x)**2*ln(
ln(x))+x**2*ln(x)**3-x**3*ln(x)**2),x)

[Out]

3*x/(x*log(x) + log(x)*log(3*x*log(log(x)) - 3*x + 3*log(x)))

Maxima [A] (verification not implemented)

none

Time = 0.37 (sec) , antiderivative size = 28, normalized size of antiderivative = 1.17 \[ \int \frac {-3 x+3 x^2-3 \log (x)+\left (-3 x^2-3 x \log (x)\right ) \log (\log (x))+\left (3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+\left (-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+\left (-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))\right ) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx=\frac {3 \, x}{{\left (x + \log \left (3\right )\right )} \log \left (x\right ) + \log \left (x \log \left (\log \left (x\right )\right ) - x + \log \left (x\right )\right ) \log \left (x\right )} \]

[In]

integrate((((3*x*log(x)-3*x)*log(log(x))+3*log(x)^2+(-3*x-3)*log(x)+3*x)*log(3*x*log(log(x))+3*log(x)-3*x)+(-3
*x*log(x)-3*x^2)*log(log(x))-3*log(x)+3*x^2-3*x)/((x*log(x)^2*log(log(x))+log(x)^3-x*log(x)^2)*log(3*x*log(log
(x))+3*log(x)-3*x)^2+(2*x^2*log(x)^2*log(log(x))+2*x*log(x)^3-2*x^2*log(x)^2)*log(3*x*log(log(x))+3*log(x)-3*x
)+x^3*log(x)^2*log(log(x))+x^2*log(x)^3-x^3*log(x)^2),x, algorithm="maxima")

[Out]

3*x/((x + log(3))*log(x) + log(x*log(log(x)) - x + log(x))*log(x))

Giac [A] (verification not implemented)

none

Time = 0.75 (sec) , antiderivative size = 28, normalized size of antiderivative = 1.17 \[ \int \frac {-3 x+3 x^2-3 \log (x)+\left (-3 x^2-3 x \log (x)\right ) \log (\log (x))+\left (3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+\left (-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+\left (-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))\right ) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx=\frac {3 \, x}{x \log \left (x\right ) + \log \left (3 \, x \log \left (\log \left (x\right )\right ) - 3 \, x + 3 \, \log \left (x\right )\right ) \log \left (x\right )} \]

[In]

integrate((((3*x*log(x)-3*x)*log(log(x))+3*log(x)^2+(-3*x-3)*log(x)+3*x)*log(3*x*log(log(x))+3*log(x)-3*x)+(-3
*x*log(x)-3*x^2)*log(log(x))-3*log(x)+3*x^2-3*x)/((x*log(x)^2*log(log(x))+log(x)^3-x*log(x)^2)*log(3*x*log(log
(x))+3*log(x)-3*x)^2+(2*x^2*log(x)^2*log(log(x))+2*x*log(x)^3-2*x^2*log(x)^2)*log(3*x*log(log(x))+3*log(x)-3*x
)+x^3*log(x)^2*log(log(x))+x^2*log(x)^3-x^3*log(x)^2),x, algorithm="giac")

[Out]

3*x/(x*log(x) + log(3*x*log(log(x)) - 3*x + 3*log(x))*log(x))

Mupad [F(-1)]

Timed out. \[ \int \frac {-3 x+3 x^2-3 \log (x)+\left (-3 x^2-3 x \log (x)\right ) \log (\log (x))+\left (3 x+(-3-3 x) \log (x)+3 \log ^2(x)+(-3 x+3 x \log (x)) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))}{-x^3 \log ^2(x)+x^2 \log ^3(x)+x^3 \log ^2(x) \log (\log (x))+\left (-2 x^2 \log ^2(x)+2 x \log ^3(x)+2 x^2 \log ^2(x) \log (\log (x))\right ) \log (-3 x+3 \log (x)+3 x \log (\log (x)))+\left (-x \log ^2(x)+\log ^3(x)+x \log ^2(x) \log (\log (x))\right ) \log ^2(-3 x+3 \log (x)+3 x \log (\log (x)))} \, dx=\int -\frac {3\,x+3\,\ln \left (x\right )+\ln \left (\ln \left (x\right )\right )\,\left (3\,x\,\ln \left (x\right )+3\,x^2\right )-\ln \left (3\,\ln \left (x\right )-3\,x+3\,x\,\ln \left (\ln \left (x\right )\right )\right )\,\left (3\,x+3\,{\ln \left (x\right )}^2-\ln \left (x\right )\,\left (3\,x+3\right )-\ln \left (\ln \left (x\right )\right )\,\left (3\,x-3\,x\,\ln \left (x\right )\right )\right )-3\,x^2}{\ln \left (3\,\ln \left (x\right )-3\,x+3\,x\,\ln \left (\ln \left (x\right )\right )\right )\,\left (2\,x\,{\ln \left (x\right )}^3-2\,x^2\,{\ln \left (x\right )}^2+2\,x^2\,\ln \left (\ln \left (x\right )\right )\,{\ln \left (x\right )}^2\right )+x^2\,{\ln \left (x\right )}^3-x^3\,{\ln \left (x\right )}^2+{\ln \left (3\,\ln \left (x\right )-3\,x+3\,x\,\ln \left (\ln \left (x\right )\right )\right )}^2\,\left ({\ln \left (x\right )}^3-x\,{\ln \left (x\right )}^2+x\,\ln \left (\ln \left (x\right )\right )\,{\ln \left (x\right )}^2\right )+x^3\,\ln \left (\ln \left (x\right )\right )\,{\ln \left (x\right )}^2} \,d x \]

[In]

int(-(3*x + 3*log(x) + log(log(x))*(3*x*log(x) + 3*x^2) - log(3*log(x) - 3*x + 3*x*log(log(x)))*(3*x + 3*log(x
)^2 - log(x)*(3*x + 3) - log(log(x))*(3*x - 3*x*log(x))) - 3*x^2)/(log(3*log(x) - 3*x + 3*x*log(log(x)))*(2*x*
log(x)^3 - 2*x^2*log(x)^2 + 2*x^2*log(log(x))*log(x)^2) + x^2*log(x)^3 - x^3*log(x)^2 + log(3*log(x) - 3*x + 3
*x*log(log(x)))^2*(log(x)^3 - x*log(x)^2 + x*log(log(x))*log(x)^2) + x^3*log(log(x))*log(x)^2),x)

[Out]

int(-(3*x + 3*log(x) + log(log(x))*(3*x*log(x) + 3*x^2) - log(3*log(x) - 3*x + 3*x*log(log(x)))*(3*x + 3*log(x
)^2 - log(x)*(3*x + 3) - log(log(x))*(3*x - 3*x*log(x))) - 3*x^2)/(log(3*log(x) - 3*x + 3*x*log(log(x)))*(2*x*
log(x)^3 - 2*x^2*log(x)^2 + 2*x^2*log(log(x))*log(x)^2) + x^2*log(x)^3 - x^3*log(x)^2 + log(3*log(x) - 3*x + 3
*x*log(log(x)))^2*(log(x)^3 - x*log(x)^2 + x*log(log(x))*log(x)^2) + x^3*log(log(x))*log(x)^2), x)