\(\int \frac {e^{\frac {-5+x}{x}} (2 x^2-32 x^3-8 x^5)+(16 x^2-x^3+8 x^4+x^6+e^{\frac {2 (-5+x)}{x}} (-160+10 x-80 x^2-10 x^4)) \log (-16+x-8 x^2-x^4) \log (\frac {1}{4} \log (-16+x-8 x^2-x^4))+(2 x^2-32 x^3-8 x^5+e^{\frac {-5+x}{x}} (-160+10 x-80 x^2-10 x^4) \log (-16+x-8 x^2-x^4) \log (\frac {1}{4} \log (-16+x-8 x^2-x^4))) \log (\log (\frac {1}{4} \log (-16+x-8 x^2-x^4)))}{(16 x^2-x^3+8 x^4+x^6) \log (-16+x-8 x^2-x^4) \log (\frac {1}{4} \log (-16+x-8 x^2-x^4))} \, dx\) [2041]

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

Optimal result

Integrand size = 260, antiderivative size = 35 \[ \int \frac {e^{\frac {-5+x}{x}} \left (2 x^2-32 x^3-8 x^5\right )+\left (16 x^2-x^3+8 x^4+x^6+e^{\frac {2 (-5+x)}{x}} \left (-160+10 x-80 x^2-10 x^4\right )\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )+\left (2 x^2-32 x^3-8 x^5+e^{\frac {-5+x}{x}} \left (-160+10 x-80 x^2-10 x^4\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right ) \log \left (\log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right )}{\left (16 x^2-x^3+8 x^4+x^6\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )} \, dx=-1+x-\left (e^{1-\frac {5}{x}}+\log \left (\log \left (\frac {1}{4} \log \left (x-\left (4+x^2\right )^2\right )\right )\right )\right )^2 \] Output:

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

Mathematica [A] (verified)

Time = 0.15 (sec) , antiderivative size = 68, normalized size of antiderivative = 1.94 \[ \int \frac {e^{\frac {-5+x}{x}} \left (2 x^2-32 x^3-8 x^5\right )+\left (16 x^2-x^3+8 x^4+x^6+e^{\frac {2 (-5+x)}{x}} \left (-160+10 x-80 x^2-10 x^4\right )\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )+\left (2 x^2-32 x^3-8 x^5+e^{\frac {-5+x}{x}} \left (-160+10 x-80 x^2-10 x^4\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right ) \log \left (\log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right )}{\left (16 x^2-x^3+8 x^4+x^6\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )} \, dx=-e^{2-\frac {10}{x}}+x-2 e^{1-\frac {5}{x}} \log \left (\log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right )-\log ^2\left (\log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right ) \] Input:

Integrate[(E^((-5 + x)/x)*(2*x^2 - 32*x^3 - 8*x^5) + (16*x^2 - x^3 + 8*x^4 
 + x^6 + E^((2*(-5 + x))/x)*(-160 + 10*x - 80*x^2 - 10*x^4))*Log[-16 + x - 
 8*x^2 - x^4]*Log[Log[-16 + x - 8*x^2 - x^4]/4] + (2*x^2 - 32*x^3 - 8*x^5 
+ E^((-5 + x)/x)*(-160 + 10*x - 80*x^2 - 10*x^4)*Log[-16 + x - 8*x^2 - x^4 
]*Log[Log[-16 + x - 8*x^2 - x^4]/4])*Log[Log[Log[-16 + x - 8*x^2 - x^4]/4] 
])/((16*x^2 - x^3 + 8*x^4 + x^6)*Log[-16 + x - 8*x^2 - x^4]*Log[Log[-16 + 
x - 8*x^2 - x^4]/4]),x]
 

Output:

-E^(2 - 10/x) + x - 2*E^(1 - 5/x)*Log[Log[Log[-16 + x - 8*x^2 - x^4]/4]] - 
 Log[Log[Log[-16 + x - 8*x^2 - x^4]/4]]^2
 

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 {e^{\frac {x-5}{x}} \left (-8 x^5-32 x^3+2 x^2\right )+\left (x^6+8 x^4-x^3+16 x^2+e^{\frac {2 (x-5)}{x}} \left (-10 x^4-80 x^2+10 x-160\right )\right ) \log \left (-x^4-8 x^2+x-16\right ) \log \left (\frac {1}{4} \log \left (-x^4-8 x^2+x-16\right )\right )+\left (-8 x^5-32 x^3+2 x^2+e^{\frac {x-5}{x}} \left (-10 x^4-80 x^2+10 x-160\right ) \log \left (-x^4-8 x^2+x-16\right ) \log \left (\frac {1}{4} \log \left (-x^4-8 x^2+x-16\right )\right )\right ) \log \left (\log \left (\frac {1}{4} \log \left (-x^4-8 x^2+x-16\right )\right )\right )}{\left (x^6+8 x^4-x^3+16 x^2\right ) \log \left (-x^4-8 x^2+x-16\right ) \log \left (\frac {1}{4} \log \left (-x^4-8 x^2+x-16\right )\right )} \, dx\)

\(\Big \downarrow \) 2026

\(\displaystyle \int \frac {e^{\frac {x-5}{x}} \left (-8 x^5-32 x^3+2 x^2\right )+\left (x^6+8 x^4-x^3+16 x^2+e^{\frac {2 (x-5)}{x}} \left (-10 x^4-80 x^2+10 x-160\right )\right ) \log \left (-x^4-8 x^2+x-16\right ) \log \left (\frac {1}{4} \log \left (-x^4-8 x^2+x-16\right )\right )+\left (-8 x^5-32 x^3+2 x^2+e^{\frac {x-5}{x}} \left (-10 x^4-80 x^2+10 x-160\right ) \log \left (-x^4-8 x^2+x-16\right ) \log \left (\frac {1}{4} \log \left (-x^4-8 x^2+x-16\right )\right )\right ) \log \left (\log \left (\frac {1}{4} \log \left (-x^4-8 x^2+x-16\right )\right )\right )}{x^2 \left (x^4+8 x^2-x+16\right ) \log \left (-x^4-8 x^2+x-16\right ) \log \left (\frac {1}{4} \log \left (-x^4-8 x^2+x-16\right )\right )}dx\)

\(\Big \downarrow \) 7293

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

\(\Big \downarrow \) 2009

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

Input:

Int[(E^((-5 + x)/x)*(2*x^2 - 32*x^3 - 8*x^5) + (16*x^2 - x^3 + 8*x^4 + x^6 
 + E^((2*(-5 + x))/x)*(-160 + 10*x - 80*x^2 - 10*x^4))*Log[-16 + x - 8*x^2 
 - x^4]*Log[Log[-16 + x - 8*x^2 - x^4]/4] + (2*x^2 - 32*x^3 - 8*x^5 + E^(( 
-5 + x)/x)*(-160 + 10*x - 80*x^2 - 10*x^4)*Log[-16 + x - 8*x^2 - x^4]*Log[ 
Log[-16 + x - 8*x^2 - x^4]/4])*Log[Log[Log[-16 + x - 8*x^2 - x^4]/4]])/((1 
6*x^2 - x^3 + 8*x^4 + x^6)*Log[-16 + x - 8*x^2 - x^4]*Log[Log[-16 + x - 8* 
x^2 - x^4]/4]),x]
 

Output:

$Aborted
 
Maple [A] (verified)

Time = 0.09 (sec) , antiderivative size = 64, normalized size of antiderivative = 1.83

\[-{\mathrm e}^{\frac {2 x -10}{x}}-2 \,{\mathrm e}^{\frac {-5+x}{x}} \ln \left (\ln \left (\frac {\ln \left (-x^{4}-8 x^{2}+x -16\right )}{4}\right )\right )-{\ln \left (\ln \left (\frac {\ln \left (-x^{4}-8 x^{2}+x -16\right )}{4}\right )\right )}^{2}+x\]

Input:

int((((-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)*ln(-x^4-8*x^2+x-16)*ln(1/4*l 
n(-x^4-8*x^2+x-16))-8*x^5-32*x^3+2*x^2)*ln(ln(1/4*ln(-x^4-8*x^2+x-16)))+(( 
-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)^2+x^6+8*x^4-x^3+16*x^2)*ln(-x^4-8*x 
^2+x-16)*ln(1/4*ln(-x^4-8*x^2+x-16))+(-8*x^5-32*x^3+2*x^2)*exp((-5+x)/x))/ 
(x^6+8*x^4-x^3+16*x^2)/ln(-x^4-8*x^2+x-16)/ln(1/4*ln(-x^4-8*x^2+x-16)),x)
 

Output:

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

Fricas [A] (verification not implemented)

Time = 0.10 (sec) , antiderivative size = 63, normalized size of antiderivative = 1.80 \[ \int \frac {e^{\frac {-5+x}{x}} \left (2 x^2-32 x^3-8 x^5\right )+\left (16 x^2-x^3+8 x^4+x^6+e^{\frac {2 (-5+x)}{x}} \left (-160+10 x-80 x^2-10 x^4\right )\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )+\left (2 x^2-32 x^3-8 x^5+e^{\frac {-5+x}{x}} \left (-160+10 x-80 x^2-10 x^4\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right ) \log \left (\log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right )}{\left (16 x^2-x^3+8 x^4+x^6\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )} \, dx=-2 \, e^{\left (\frac {x - 5}{x}\right )} \log \left (\log \left (\frac {1}{4} \, \log \left (-x^{4} - 8 \, x^{2} + x - 16\right )\right )\right ) - \log \left (\log \left (\frac {1}{4} \, \log \left (-x^{4} - 8 \, x^{2} + x - 16\right )\right )\right )^{2} + x - e^{\left (\frac {2 \, {\left (x - 5\right )}}{x}\right )} \] Input:

integrate((((-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)*log(-x^4-8*x^2+x-16)*l 
og(1/4*log(-x^4-8*x^2+x-16))-8*x^5-32*x^3+2*x^2)*log(log(1/4*log(-x^4-8*x^ 
2+x-16)))+((-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)^2+x^6+8*x^4-x^3+16*x^2) 
*log(-x^4-8*x^2+x-16)*log(1/4*log(-x^4-8*x^2+x-16))+(-8*x^5-32*x^3+2*x^2)* 
exp((-5+x)/x))/(x^6+8*x^4-x^3+16*x^2)/log(-x^4-8*x^2+x-16)/log(1/4*log(-x^ 
4-8*x^2+x-16)),x, algorithm="fricas")
 

Output:

-2*e^((x - 5)/x)*log(log(1/4*log(-x^4 - 8*x^2 + x - 16))) - log(log(1/4*lo 
g(-x^4 - 8*x^2 + x - 16)))^2 + x - e^(2*(x - 5)/x)
 

Sympy [F(-1)]

Timed out. \[ \int \frac {e^{\frac {-5+x}{x}} \left (2 x^2-32 x^3-8 x^5\right )+\left (16 x^2-x^3+8 x^4+x^6+e^{\frac {2 (-5+x)}{x}} \left (-160+10 x-80 x^2-10 x^4\right )\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )+\left (2 x^2-32 x^3-8 x^5+e^{\frac {-5+x}{x}} \left (-160+10 x-80 x^2-10 x^4\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right ) \log \left (\log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right )}{\left (16 x^2-x^3+8 x^4+x^6\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )} \, dx=\text {Timed out} \] Input:

integrate((((-10*x**4-80*x**2+10*x-160)*exp((-5+x)/x)*ln(-x**4-8*x**2+x-16 
)*ln(1/4*ln(-x**4-8*x**2+x-16))-8*x**5-32*x**3+2*x**2)*ln(ln(1/4*ln(-x**4- 
8*x**2+x-16)))+((-10*x**4-80*x**2+10*x-160)*exp((-5+x)/x)**2+x**6+8*x**4-x 
**3+16*x**2)*ln(-x**4-8*x**2+x-16)*ln(1/4*ln(-x**4-8*x**2+x-16))+(-8*x**5- 
32*x**3+2*x**2)*exp((-5+x)/x))/(x**6+8*x**4-x**3+16*x**2)/ln(-x**4-8*x**2+ 
x-16)/ln(1/4*ln(-x**4-8*x**2+x-16)),x)
 

Output:

Timed out
 

Maxima [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 81 vs. \(2 (32) = 64\).

Time = 0.22 (sec) , antiderivative size = 81, normalized size of antiderivative = 2.31 \[ \int \frac {e^{\frac {-5+x}{x}} \left (2 x^2-32 x^3-8 x^5\right )+\left (16 x^2-x^3+8 x^4+x^6+e^{\frac {2 (-5+x)}{x}} \left (-160+10 x-80 x^2-10 x^4\right )\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )+\left (2 x^2-32 x^3-8 x^5+e^{\frac {-5+x}{x}} \left (-160+10 x-80 x^2-10 x^4\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right ) \log \left (\log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right )}{\left (16 x^2-x^3+8 x^4+x^6\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )} \, dx=-{\left (e^{\frac {10}{x}} \log \left (-2 \, \log \left (2\right ) + \log \left (\log \left (-x^{4} - 8 \, x^{2} + x - 16\right )\right )\right )^{2} - x e^{\frac {10}{x}} + 2 \, e^{\left (\frac {5}{x} + 1\right )} \log \left (-2 \, \log \left (2\right ) + \log \left (\log \left (-x^{4} - 8 \, x^{2} + x - 16\right )\right )\right ) + e^{2}\right )} e^{\left (-\frac {10}{x}\right )} \] Input:

integrate((((-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)*log(-x^4-8*x^2+x-16)*l 
og(1/4*log(-x^4-8*x^2+x-16))-8*x^5-32*x^3+2*x^2)*log(log(1/4*log(-x^4-8*x^ 
2+x-16)))+((-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)^2+x^6+8*x^4-x^3+16*x^2) 
*log(-x^4-8*x^2+x-16)*log(1/4*log(-x^4-8*x^2+x-16))+(-8*x^5-32*x^3+2*x^2)* 
exp((-5+x)/x))/(x^6+8*x^4-x^3+16*x^2)/log(-x^4-8*x^2+x-16)/log(1/4*log(-x^ 
4-8*x^2+x-16)),x, algorithm="maxima")
 

Output:

-(e^(10/x)*log(-2*log(2) + log(log(-x^4 - 8*x^2 + x - 16)))^2 - x*e^(10/x) 
 + 2*e^(5/x + 1)*log(-2*log(2) + log(log(-x^4 - 8*x^2 + x - 16))) + e^2)*e 
^(-10/x)
 

Giac [F]

\[ \int \frac {e^{\frac {-5+x}{x}} \left (2 x^2-32 x^3-8 x^5\right )+\left (16 x^2-x^3+8 x^4+x^6+e^{\frac {2 (-5+x)}{x}} \left (-160+10 x-80 x^2-10 x^4\right )\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )+\left (2 x^2-32 x^3-8 x^5+e^{\frac {-5+x}{x}} \left (-160+10 x-80 x^2-10 x^4\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right ) \log \left (\log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right )}{\left (16 x^2-x^3+8 x^4+x^6\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )} \, dx=\int { \frac {{\left (x^{6} + 8 \, x^{4} - x^{3} + 16 \, x^{2} - 10 \, {\left (x^{4} + 8 \, x^{2} - x + 16\right )} e^{\left (\frac {2 \, {\left (x - 5\right )}}{x}\right )}\right )} \log \left (-x^{4} - 8 \, x^{2} + x - 16\right ) \log \left (\frac {1}{4} \, \log \left (-x^{4} - 8 \, x^{2} + x - 16\right )\right ) - 2 \, {\left (4 \, x^{5} + 16 \, x^{3} - x^{2}\right )} e^{\left (\frac {x - 5}{x}\right )} - 2 \, {\left (4 \, x^{5} + 5 \, {\left (x^{4} + 8 \, x^{2} - x + 16\right )} e^{\left (\frac {x - 5}{x}\right )} \log \left (-x^{4} - 8 \, x^{2} + x - 16\right ) \log \left (\frac {1}{4} \, \log \left (-x^{4} - 8 \, x^{2} + x - 16\right )\right ) + 16 \, x^{3} - x^{2}\right )} \log \left (\log \left (\frac {1}{4} \, \log \left (-x^{4} - 8 \, x^{2} + x - 16\right )\right )\right )}{{\left (x^{6} + 8 \, x^{4} - x^{3} + 16 \, x^{2}\right )} \log \left (-x^{4} - 8 \, x^{2} + x - 16\right ) \log \left (\frac {1}{4} \, \log \left (-x^{4} - 8 \, x^{2} + x - 16\right )\right )} \,d x } \] Input:

integrate((((-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)*log(-x^4-8*x^2+x-16)*l 
og(1/4*log(-x^4-8*x^2+x-16))-8*x^5-32*x^3+2*x^2)*log(log(1/4*log(-x^4-8*x^ 
2+x-16)))+((-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)^2+x^6+8*x^4-x^3+16*x^2) 
*log(-x^4-8*x^2+x-16)*log(1/4*log(-x^4-8*x^2+x-16))+(-8*x^5-32*x^3+2*x^2)* 
exp((-5+x)/x))/(x^6+8*x^4-x^3+16*x^2)/log(-x^4-8*x^2+x-16)/log(1/4*log(-x^ 
4-8*x^2+x-16)),x, algorithm="giac")
 

Output:

integrate(((x^6 + 8*x^4 - x^3 + 16*x^2 - 10*(x^4 + 8*x^2 - x + 16)*e^(2*(x 
 - 5)/x))*log(-x^4 - 8*x^2 + x - 16)*log(1/4*log(-x^4 - 8*x^2 + x - 16)) - 
 2*(4*x^5 + 16*x^3 - x^2)*e^((x - 5)/x) - 2*(4*x^5 + 5*(x^4 + 8*x^2 - x + 
16)*e^((x - 5)/x)*log(-x^4 - 8*x^2 + x - 16)*log(1/4*log(-x^4 - 8*x^2 + x 
- 16)) + 16*x^3 - x^2)*log(log(1/4*log(-x^4 - 8*x^2 + x - 16))))/((x^6 + 8 
*x^4 - x^3 + 16*x^2)*log(-x^4 - 8*x^2 + x - 16)*log(1/4*log(-x^4 - 8*x^2 + 
 x - 16))), x)
 

Mupad [F(-1)]

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

int(-(exp((x - 5)/x)*(32*x^3 - 2*x^2 + 8*x^5) + log(log(log(x - 8*x^2 - x^ 
4 - 16)/4))*(32*x^3 - 2*x^2 + 8*x^5 + exp((x - 5)/x)*log(log(x - 8*x^2 - x 
^4 - 16)/4)*log(x - 8*x^2 - x^4 - 16)*(80*x^2 - 10*x + 10*x^4 + 160)) - lo 
g(log(x - 8*x^2 - x^4 - 16)/4)*log(x - 8*x^2 - x^4 - 16)*(16*x^2 - exp((2* 
(x - 5))/x)*(80*x^2 - 10*x + 10*x^4 + 160) - x^3 + 8*x^4 + x^6))/(log(log( 
x - 8*x^2 - x^4 - 16)/4)*log(x - 8*x^2 - x^4 - 16)*(16*x^2 - x^3 + 8*x^4 + 
 x^6)),x)
 

Output:

int(-(exp((x - 5)/x)*(32*x^3 - 2*x^2 + 8*x^5) + log(log(log(x - 8*x^2 - x^ 
4 - 16)/4))*(32*x^3 - 2*x^2 + 8*x^5 + exp((x - 5)/x)*log(log(x - 8*x^2 - x 
^4 - 16)/4)*log(x - 8*x^2 - x^4 - 16)*(80*x^2 - 10*x + 10*x^4 + 160)) - lo 
g(log(x - 8*x^2 - x^4 - 16)/4)*log(x - 8*x^2 - x^4 - 16)*(16*x^2 - exp((2* 
(x - 5))/x)*(80*x^2 - 10*x + 10*x^4 + 160) - x^3 + 8*x^4 + x^6))/(log(log( 
x - 8*x^2 - x^4 - 16)/4)*log(x - 8*x^2 - x^4 - 16)*(16*x^2 - x^3 + 8*x^4 + 
 x^6)), x)
 

Reduce [B] (verification not implemented)

Time = 0.22 (sec) , antiderivative size = 82, normalized size of antiderivative = 2.34 \[ \int \frac {e^{\frac {-5+x}{x}} \left (2 x^2-32 x^3-8 x^5\right )+\left (16 x^2-x^3+8 x^4+x^6+e^{\frac {2 (-5+x)}{x}} \left (-160+10 x-80 x^2-10 x^4\right )\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )+\left (2 x^2-32 x^3-8 x^5+e^{\frac {-5+x}{x}} \left (-160+10 x-80 x^2-10 x^4\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right ) \log \left (\log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )\right )}{\left (16 x^2-x^3+8 x^4+x^6\right ) \log \left (-16+x-8 x^2-x^4\right ) \log \left (\frac {1}{4} \log \left (-16+x-8 x^2-x^4\right )\right )} \, dx=\frac {-e^{\frac {10}{x}} {\mathrm {log}\left (\mathrm {log}\left (\frac {\mathrm {log}\left (-x^{4}-8 x^{2}+x -16\right )}{4}\right )\right )}^{2}+e^{\frac {10}{x}} x -2 e^{\frac {5}{x}} \mathrm {log}\left (\mathrm {log}\left (\frac {\mathrm {log}\left (-x^{4}-8 x^{2}+x -16\right )}{4}\right )\right ) e -e^{2}}{e^{\frac {10}{x}}} \] Input:

int((((-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)*log(-x^4-8*x^2+x-16)*log(1/4 
*log(-x^4-8*x^2+x-16))-8*x^5-32*x^3+2*x^2)*log(log(1/4*log(-x^4-8*x^2+x-16 
)))+((-10*x^4-80*x^2+10*x-160)*exp((-5+x)/x)^2+x^6+8*x^4-x^3+16*x^2)*log(- 
x^4-8*x^2+x-16)*log(1/4*log(-x^4-8*x^2+x-16))+(-8*x^5-32*x^3+2*x^2)*exp((- 
5+x)/x))/(x^6+8*x^4-x^3+16*x^2)/log(-x^4-8*x^2+x-16)/log(1/4*log(-x^4-8*x^ 
2+x-16)),x)
 

Output:

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