3.14.38 \(\int \frac {-8+(-8-16 x^2) \log (x)+(x^2-8 x^3-2 x^4+e^x (1-x+2 x^2)) \log ^2(x)+(8 x^2 \log (x)+(-e^x x^2+4 x^3+x^4) \log ^2(x)+(-8 \log (x)+(e^x-4 x-x^2) \log ^2(x)) \log (\frac {8+(-e^x+4 x+x^2) \log (x)}{x \log (x)})) \log (x^2-\log (\frac {8+(-e^x+4 x+x^2) \log (x)}{x \log (x)}))}{(8 x^2 \log (x)+(-e^x x^2+4 x^3+x^4) \log ^2(x)+(-8 \log (x)+(e^x-4 x-x^2) \log ^2(x)) \log (\frac {8+(-e^x+4 x+x^2) \log (x)}{x \log (x)})) \log ^2(x^2-\log (\frac {8+(-e^x+4 x+x^2) \log (x)}{x \log (x)}))} \, dx\) [1338]

3.14.38.1 Optimal result
3.14.38.2 Mathematica [A] (verified)
3.14.38.3 Rubi [F]
3.14.38.4 Maple [C] (warning: unable to verify)
3.14.38.5 Fricas [A] (verification not implemented)
3.14.38.6 Sympy [F(-1)]
3.14.38.7 Maxima [A] (verification not implemented)
3.14.38.8 Giac [A] (verification not implemented)
3.14.38.9 Mupad [F(-1)]

3.14.38.1 Optimal result

Integrand size = 275, antiderivative size = 34 \[ \int \frac {-8+\left (-8-16 x^2\right ) \log (x)+\left (x^2-8 x^3-2 x^4+e^x \left (1-x+2 x^2\right )\right ) \log ^2(x)+\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log \left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )}{\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log ^2\left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )} \, dx=5+\frac {x}{\log \left (x^2-\log \left (4-\frac {e^x}{x}+x+\frac {8}{x \log (x)}\right )\right )} \]

output
x/ln(x^2-ln(8/x/ln(x)-exp(x)/x+4+x))+5
 
3.14.38.2 Mathematica [A] (verified)

Time = 0.29 (sec) , antiderivative size = 32, normalized size of antiderivative = 0.94 \[ \int \frac {-8+\left (-8-16 x^2\right ) \log (x)+\left (x^2-8 x^3-2 x^4+e^x \left (1-x+2 x^2\right )\right ) \log ^2(x)+\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log \left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )}{\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log ^2\left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )} \, dx=\frac {x}{\log \left (x^2-\log \left (4-\frac {e^x}{x}+x+\frac {8}{x \log (x)}\right )\right )} \]

input
Integrate[(-8 + (-8 - 16*x^2)*Log[x] + (x^2 - 8*x^3 - 2*x^4 + E^x*(1 - x + 
 2*x^2))*Log[x]^2 + (8*x^2*Log[x] + (-(E^x*x^2) + 4*x^3 + x^4)*Log[x]^2 + 
(-8*Log[x] + (E^x - 4*x - x^2)*Log[x]^2)*Log[(8 + (-E^x + 4*x + x^2)*Log[x 
])/(x*Log[x])])*Log[x^2 - Log[(8 + (-E^x + 4*x + x^2)*Log[x])/(x*Log[x])]] 
)/((8*x^2*Log[x] + (-(E^x*x^2) + 4*x^3 + x^4)*Log[x]^2 + (-8*Log[x] + (E^x 
 - 4*x - x^2)*Log[x]^2)*Log[(8 + (-E^x + 4*x + x^2)*Log[x])/(x*Log[x])])*L 
og[x^2 - Log[(8 + (-E^x + 4*x + x^2)*Log[x])/(x*Log[x])]]^2),x]
 
output
x/Log[x^2 - Log[4 - E^x/x + x + 8/(x*Log[x])]]
 
3.14.38.3 Rubi [F]

Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.

\(\displaystyle \int \frac {\left (-16 x^2-8\right ) \log (x)+\left (-2 x^4-8 x^3+x^2+e^x \left (2 x^2-x+1\right )\right ) \log ^2(x)+\left (\left (\left (-x^2-4 x+e^x\right ) \log ^2(x)-8 \log (x)\right ) \log \left (\frac {\left (x^2+4 x-e^x\right ) \log (x)+8}{x \log (x)}\right )+8 x^2 \log (x)+\left (x^4+4 x^3-e^x x^2\right ) \log ^2(x)\right ) \log \left (x^2-\log \left (\frac {\left (x^2+4 x-e^x\right ) \log (x)+8}{x \log (x)}\right )\right )-8}{\left (\left (\left (-x^2-4 x+e^x\right ) \log ^2(x)-8 \log (x)\right ) \log \left (\frac {\left (x^2+4 x-e^x\right ) \log (x)+8}{x \log (x)}\right )+8 x^2 \log (x)+\left (x^4+4 x^3-e^x x^2\right ) \log ^2(x)\right ) \log ^2\left (x^2-\log \left (\frac {\left (x^2+4 x-e^x\right ) \log (x)+8}{x \log (x)}\right )\right )} \, dx\)

\(\Big \downarrow \) 7292

\(\displaystyle \int \frac {\left (-16 x^2-8\right ) \log (x)+\left (-2 x^4-8 x^3+x^2+e^x \left (2 x^2-x+1\right )\right ) \log ^2(x)+\left (\left (\left (-x^2-4 x+e^x\right ) \log ^2(x)-8 \log (x)\right ) \log \left (\frac {\left (x^2+4 x-e^x\right ) \log (x)+8}{x \log (x)}\right )+8 x^2 \log (x)+\left (x^4+4 x^3-e^x x^2\right ) \log ^2(x)\right ) \log \left (x^2-\log \left (\frac {\left (x^2+4 x-e^x\right ) \log (x)+8}{x \log (x)}\right )\right )-8}{\log (x) \left (x^2 \log (x)+4 x \log (x)-e^x \log (x)+8\right ) \left (x^2-\log \left (x-\frac {e^x}{x}+\frac {8}{x \log (x)}+4\right )\right ) \log ^2\left (x^2-\log \left (\frac {\left (x^2+4 x-e^x\right ) \log (x)+8}{x \log (x)}\right )\right )}dx\)

\(\Big \downarrow \) 7293

\(\displaystyle \int \left (\frac {-2 x^2+x^2 \log \left (x^2-\log \left (x-\frac {e^x}{x}+\frac {8}{x \log (x)}+4\right )\right )-\log \left (x-\frac {e^x}{x}+\frac {8}{x \log (x)}+4\right ) \log \left (x^2-\log \left (x-\frac {e^x}{x}+\frac {8}{x \log (x)}+4\right )\right )+x-1}{\left (x^2-\log \left (x-\frac {e^x}{x}+\frac {8}{x \log (x)}+4\right )\right ) \log ^2\left (x^2-\log \left (x-\frac {e^x}{x}+\frac {8}{x \log (x)}+4\right )\right )}+\frac {x^3 \log ^2(x)+2 x^2 \log ^2(x)-4 x \log ^2(x)+8 x \log (x)+8}{\log (x) \left (x^2 (-\log (x))-4 x \log (x)+e^x \log (x)-8\right ) \left (x^2-\log \left (x-\frac {e^x}{x}+\frac {8}{x \log (x)}+4\right )\right ) \log ^2\left (x^2-\log \left (x-\frac {e^x}{x}+\frac {8}{x \log (x)}+4\right )\right )}\right )dx\)

\(\Big \downarrow \) 2009

\(\displaystyle -\int \frac {1}{\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right ) \log ^2\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right )}dx+\int \frac {x}{\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right ) \log ^2\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right )}dx-2 \int \frac {x^2}{\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right ) \log ^2\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right )}dx+8 \int \frac {1}{\log (x) \left (-\log (x) x^2-4 \log (x) x+e^x \log (x)-8\right ) \left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right ) \log ^2\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right )}dx-8 \int \frac {x}{\left (\log (x) x^2+4 \log (x) x-e^x \log (x)+8\right ) \left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right ) \log ^2\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right )}dx+4 \int \frac {x \log (x)}{\left (\log (x) x^2+4 \log (x) x-e^x \log (x)+8\right ) \left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right ) \log ^2\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right )}dx-2 \int \frac {x^2 \log (x)}{\left (\log (x) x^2+4 \log (x) x-e^x \log (x)+8\right ) \left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right ) \log ^2\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right )}dx+\int \frac {1}{\log \left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right )}dx-\int \frac {x^3 \log (x)}{\left (\log (x) x^2+4 \log (x) x-e^x \log (x)+8\right ) \left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right ) \log ^2\left (x^2-\log \left (x+4-\frac {e^x}{x}+\frac {8}{\log (x) x}\right )\right )}dx\)

input
Int[(-8 + (-8 - 16*x^2)*Log[x] + (x^2 - 8*x^3 - 2*x^4 + E^x*(1 - x + 2*x^2 
))*Log[x]^2 + (8*x^2*Log[x] + (-(E^x*x^2) + 4*x^3 + x^4)*Log[x]^2 + (-8*Lo 
g[x] + (E^x - 4*x - x^2)*Log[x]^2)*Log[(8 + (-E^x + 4*x + x^2)*Log[x])/(x* 
Log[x])])*Log[x^2 - Log[(8 + (-E^x + 4*x + x^2)*Log[x])/(x*Log[x])]])/((8* 
x^2*Log[x] + (-(E^x*x^2) + 4*x^3 + x^4)*Log[x]^2 + (-8*Log[x] + (E^x - 4*x 
 - x^2)*Log[x]^2)*Log[(8 + (-E^x + 4*x + x^2)*Log[x])/(x*Log[x])])*Log[x^2 
 - Log[(8 + (-E^x + 4*x + x^2)*Log[x])/(x*Log[x])]]^2),x]
 
output
$Aborted
 

3.14.38.3.1 Defintions of rubi rules used

rule 2009
Int[u_, x_Symbol] :> Simp[IntSum[u, x], x] /; SumQ[u]
 

rule 7292
Int[u_, x_Symbol] :> With[{v = NormalizeIntegrand[u, x]}, Int[v, x] /; v =! 
= u]
 

rule 7293
Int[u_, x_Symbol] :> With[{v = ExpandIntegrand[u, x]}, Int[v, x] /; SumQ[v] 
]
 
3.14.38.4 Maple [C] (warning: unable to verify)

Result contains higher order function than in optimal. Order 9 vs. order 3.

Time = 0.35 (sec) , antiderivative size = 289, normalized size of antiderivative = 8.50

\[\frac {x}{\ln \left (\ln \left (x \right )+\ln \left (\ln \left (x \right )\right )-\ln \left (x^{2} \ln \left (x \right )-{\mathrm e}^{x} \ln \left (x \right )+4 x \ln \left (x \right )+8\right )-\frac {i \pi \,\operatorname {csgn}\left (\frac {i \left (-x^{2} \ln \left (x \right )+{\mathrm e}^{x} \ln \left (x \right )-4 x \ln \left (x \right )-8\right )}{\ln \left (x \right )}\right ) \left (\operatorname {csgn}\left (\frac {i \left (-x^{2} \ln \left (x \right )+{\mathrm e}^{x} \ln \left (x \right )-4 x \ln \left (x \right )-8\right )}{\ln \left (x \right )}\right )+\operatorname {csgn}\left (\frac {i}{\ln \left (x \right )}\right )\right ) \left (\operatorname {csgn}\left (\frac {i \left (-x^{2} \ln \left (x \right )+{\mathrm e}^{x} \ln \left (x \right )-4 x \ln \left (x \right )-8\right )}{\ln \left (x \right )}\right )-\operatorname {csgn}\left (i \left (-x^{2} \ln \left (x \right )+{\mathrm e}^{x} \ln \left (x \right )-4 x \ln \left (x \right )-8\right )\right )\right )}{2}-\frac {i \pi \,\operatorname {csgn}\left (\frac {i \left (-x^{2} \ln \left (x \right )+{\mathrm e}^{x} \ln \left (x \right )-4 x \ln \left (x \right )-8\right )}{\ln \left (x \right ) x}\right ) \left (\operatorname {csgn}\left (\frac {i \left (-x^{2} \ln \left (x \right )+{\mathrm e}^{x} \ln \left (x \right )-4 x \ln \left (x \right )-8\right )}{\ln \left (x \right ) x}\right )+\operatorname {csgn}\left (\frac {i}{x}\right )\right ) \left (\operatorname {csgn}\left (\frac {i \left (-x^{2} \ln \left (x \right )+{\mathrm e}^{x} \ln \left (x \right )-4 x \ln \left (x \right )-8\right )}{\ln \left (x \right ) x}\right )-\operatorname {csgn}\left (\frac {i \left (-x^{2} \ln \left (x \right )+{\mathrm e}^{x} \ln \left (x \right )-4 x \ln \left (x \right )-8\right )}{\ln \left (x \right )}\right )\right )}{2}+x^{2}\right )}\]

input
int(((((exp(x)-x^2-4*x)*ln(x)^2-8*ln(x))*ln(((-exp(x)+x^2+4*x)*ln(x)+8)/x/ 
ln(x))+(-exp(x)*x^2+x^4+4*x^3)*ln(x)^2+8*x^2*ln(x))*ln(-ln(((-exp(x)+x^2+4 
*x)*ln(x)+8)/x/ln(x))+x^2)+((2*x^2-x+1)*exp(x)-2*x^4-8*x^3+x^2)*ln(x)^2+(- 
16*x^2-8)*ln(x)-8)/(((exp(x)-x^2-4*x)*ln(x)^2-8*ln(x))*ln(((-exp(x)+x^2+4* 
x)*ln(x)+8)/x/ln(x))+(-exp(x)*x^2+x^4+4*x^3)*ln(x)^2+8*x^2*ln(x))/ln(-ln(( 
(-exp(x)+x^2+4*x)*ln(x)+8)/x/ln(x))+x^2)^2,x)
 
output
x/ln(ln(x)+ln(ln(x))-ln(x^2*ln(x)-exp(x)*ln(x)+4*x*ln(x)+8)-1/2*I*Pi*csgn( 
I*(-x^2*ln(x)+exp(x)*ln(x)-4*x*ln(x)-8)/ln(x))*(csgn(I*(-x^2*ln(x)+exp(x)* 
ln(x)-4*x*ln(x)-8)/ln(x))+csgn(I/ln(x)))*(csgn(I*(-x^2*ln(x)+exp(x)*ln(x)- 
4*x*ln(x)-8)/ln(x))-csgn(I*(-x^2*ln(x)+exp(x)*ln(x)-4*x*ln(x)-8)))-1/2*I*P 
i*csgn(I*(-x^2*ln(x)+exp(x)*ln(x)-4*x*ln(x)-8)/ln(x)/x)*(csgn(I*(-x^2*ln(x 
)+exp(x)*ln(x)-4*x*ln(x)-8)/ln(x)/x)+csgn(I/x))*(csgn(I*(-x^2*ln(x)+exp(x) 
*ln(x)-4*x*ln(x)-8)/ln(x)/x)-csgn(I*(-x^2*ln(x)+exp(x)*ln(x)-4*x*ln(x)-8)/ 
ln(x)))+x^2)
 
3.14.38.5 Fricas [A] (verification not implemented)

Time = 0.25 (sec) , antiderivative size = 36, normalized size of antiderivative = 1.06 \[ \int \frac {-8+\left (-8-16 x^2\right ) \log (x)+\left (x^2-8 x^3-2 x^4+e^x \left (1-x+2 x^2\right )\right ) \log ^2(x)+\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log \left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )}{\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log ^2\left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )} \, dx=\frac {x}{\log \left (x^{2} - \log \left (\frac {{\left (x^{2} + 4 \, x - e^{x}\right )} \log \left (x\right ) + 8}{x \log \left (x\right )}\right )\right )} \]

input
integrate(((((exp(x)-x^2-4*x)*log(x)^2-8*log(x))*log(((-exp(x)+x^2+4*x)*lo 
g(x)+8)/x/log(x))+(-exp(x)*x^2+x^4+4*x^3)*log(x)^2+8*x^2*log(x))*log(-log( 
((-exp(x)+x^2+4*x)*log(x)+8)/x/log(x))+x^2)+((2*x^2-x+1)*exp(x)-2*x^4-8*x^ 
3+x^2)*log(x)^2+(-16*x^2-8)*log(x)-8)/(((exp(x)-x^2-4*x)*log(x)^2-8*log(x) 
)*log(((-exp(x)+x^2+4*x)*log(x)+8)/x/log(x))+(-exp(x)*x^2+x^4+4*x^3)*log(x 
)^2+8*x^2*log(x))/log(-log(((-exp(x)+x^2+4*x)*log(x)+8)/x/log(x))+x^2)^2,x 
, algorithm=\
 
output
x/log(x^2 - log(((x^2 + 4*x - e^x)*log(x) + 8)/(x*log(x))))
 
3.14.38.6 Sympy [F(-1)]

Timed out. \[ \int \frac {-8+\left (-8-16 x^2\right ) \log (x)+\left (x^2-8 x^3-2 x^4+e^x \left (1-x+2 x^2\right )\right ) \log ^2(x)+\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log \left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )}{\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log ^2\left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )} \, dx=\text {Timed out} \]

input
integrate(((((exp(x)-x**2-4*x)*ln(x)**2-8*ln(x))*ln(((-exp(x)+x**2+4*x)*ln 
(x)+8)/x/ln(x))+(-exp(x)*x**2+x**4+4*x**3)*ln(x)**2+8*x**2*ln(x))*ln(-ln(( 
(-exp(x)+x**2+4*x)*ln(x)+8)/x/ln(x))+x**2)+((2*x**2-x+1)*exp(x)-2*x**4-8*x 
**3+x**2)*ln(x)**2+(-16*x**2-8)*ln(x)-8)/(((exp(x)-x**2-4*x)*ln(x)**2-8*ln 
(x))*ln(((-exp(x)+x**2+4*x)*ln(x)+8)/x/ln(x))+(-exp(x)*x**2+x**4+4*x**3)*l 
n(x)**2+8*x**2*ln(x))/ln(-ln(((-exp(x)+x**2+4*x)*ln(x)+8)/x/ln(x))+x**2)** 
2,x)
 
output
Timed out
 
3.14.38.7 Maxima [A] (verification not implemented)

Time = 0.37 (sec) , antiderivative size = 33, normalized size of antiderivative = 0.97 \[ \int \frac {-8+\left (-8-16 x^2\right ) \log (x)+\left (x^2-8 x^3-2 x^4+e^x \left (1-x+2 x^2\right )\right ) \log ^2(x)+\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log \left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )}{\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log ^2\left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )} \, dx=\frac {x}{\log \left (x^{2} - \log \left ({\left (x^{2} + 4 \, x - e^{x}\right )} \log \left (x\right ) + 8\right ) + \log \left (x\right ) + \log \left (\log \left (x\right )\right )\right )} \]

input
integrate(((((exp(x)-x^2-4*x)*log(x)^2-8*log(x))*log(((-exp(x)+x^2+4*x)*lo 
g(x)+8)/x/log(x))+(-exp(x)*x^2+x^4+4*x^3)*log(x)^2+8*x^2*log(x))*log(-log( 
((-exp(x)+x^2+4*x)*log(x)+8)/x/log(x))+x^2)+((2*x^2-x+1)*exp(x)-2*x^4-8*x^ 
3+x^2)*log(x)^2+(-16*x^2-8)*log(x)-8)/(((exp(x)-x^2-4*x)*log(x)^2-8*log(x) 
)*log(((-exp(x)+x^2+4*x)*log(x)+8)/x/log(x))+(-exp(x)*x^2+x^4+4*x^3)*log(x 
)^2+8*x^2*log(x))/log(-log(((-exp(x)+x^2+4*x)*log(x)+8)/x/log(x))+x^2)^2,x 
, algorithm=\
 
output
x/log(x^2 - log((x^2 + 4*x - e^x)*log(x) + 8) + log(x) + log(log(x)))
 
3.14.38.8 Giac [A] (verification not implemented)

Time = 1.30 (sec) , antiderivative size = 36, normalized size of antiderivative = 1.06 \[ \int \frac {-8+\left (-8-16 x^2\right ) \log (x)+\left (x^2-8 x^3-2 x^4+e^x \left (1-x+2 x^2\right )\right ) \log ^2(x)+\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log \left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )}{\left (8 x^2 \log (x)+\left (-e^x x^2+4 x^3+x^4\right ) \log ^2(x)+\left (-8 \log (x)+\left (e^x-4 x-x^2\right ) \log ^2(x)\right ) \log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right ) \log ^2\left (x^2-\log \left (\frac {8+\left (-e^x+4 x+x^2\right ) \log (x)}{x \log (x)}\right )\right )} \, dx=\frac {x}{\log \left (x^{2} - \log \left (x^{2} \log \left (x\right ) + 4 \, x \log \left (x\right ) - e^{x} \log \left (x\right ) + 8\right ) + \log \left (x\right ) + \log \left (\log \left (x\right )\right )\right )} \]

input
integrate(((((exp(x)-x^2-4*x)*log(x)^2-8*log(x))*log(((-exp(x)+x^2+4*x)*lo 
g(x)+8)/x/log(x))+(-exp(x)*x^2+x^4+4*x^3)*log(x)^2+8*x^2*log(x))*log(-log( 
((-exp(x)+x^2+4*x)*log(x)+8)/x/log(x))+x^2)+((2*x^2-x+1)*exp(x)-2*x^4-8*x^ 
3+x^2)*log(x)^2+(-16*x^2-8)*log(x)-8)/(((exp(x)-x^2-4*x)*log(x)^2-8*log(x) 
)*log(((-exp(x)+x^2+4*x)*log(x)+8)/x/log(x))+(-exp(x)*x^2+x^4+4*x^3)*log(x 
)^2+8*x^2*log(x))/log(-log(((-exp(x)+x^2+4*x)*log(x)+8)/x/log(x))+x^2)^2,x 
, algorithm=\
 
output
x/log(x^2 - log(x^2*log(x) + 4*x*log(x) - e^x*log(x) + 8) + log(x) + log(l 
og(x)))
 
3.14.38.9 Mupad [F(-1)]

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

input
int((log(x^2 - log((log(x)*(4*x - exp(x) + x^2) + 8)/(x*log(x))))*(8*x^2*l 
og(x) + log(x)^2*(4*x^3 - x^2*exp(x) + x^4) - log((log(x)*(4*x - exp(x) + 
x^2) + 8)/(x*log(x)))*(8*log(x) + log(x)^2*(4*x - exp(x) + x^2))) - log(x) 
*(16*x^2 + 8) + log(x)^2*(exp(x)*(2*x^2 - x + 1) + x^2 - 8*x^3 - 2*x^4) - 
8)/(log(x^2 - log((log(x)*(4*x - exp(x) + x^2) + 8)/(x*log(x))))^2*(8*x^2* 
log(x) + log(x)^2*(4*x^3 - x^2*exp(x) + x^4) - log((log(x)*(4*x - exp(x) + 
 x^2) + 8)/(x*log(x)))*(8*log(x) + log(x)^2*(4*x - exp(x) + x^2)))),x)
 
output
int((log(x^2 - log((log(x)*(4*x - exp(x) + x^2) + 8)/(x*log(x))))*(8*x^2*l 
og(x) + log(x)^2*(4*x^3 - x^2*exp(x) + x^4) - log((log(x)*(4*x - exp(x) + 
x^2) + 8)/(x*log(x)))*(8*log(x) + log(x)^2*(4*x - exp(x) + x^2))) - log(x) 
*(16*x^2 + 8) + log(x)^2*(exp(x)*(2*x^2 - x + 1) + x^2 - 8*x^3 - 2*x^4) - 
8)/(log(x^2 - log((log(x)*(4*x - exp(x) + x^2) + 8)/(x*log(x))))^2*(8*x^2* 
log(x) + log(x)^2*(4*x^3 - x^2*exp(x) + x^4) - log((log(x)*(4*x - exp(x) + 
 x^2) + 8)/(x*log(x)))*(8*log(x) + log(x)^2*(4*x - exp(x) + x^2)))), x)