3.29.84 \(\int \frac {x^4}{1-x \sqrt {1+x^2} \sqrt {x-\sqrt {1+x^2}}} \, dx\) [2884]

3.29.84.1 Optimal result
3.29.84.2 Mathematica [A] (verified)
3.29.84.3 Rubi [F]
3.29.84.4 Maple [N/A] (verified)
3.29.84.5 Fricas [F(-1)]
3.29.84.6 Sympy [N/A]
3.29.84.7 Maxima [N/A]
3.29.84.8 Giac [N/A]
3.29.84.9 Mupad [N/A]

3.29.84.1 Optimal result

Integrand size = 37, antiderivative size = 311 \[ \int \frac {x^4}{1-x \sqrt {1+x^2} \sqrt {x-\sqrt {1+x^2}}} \, dx=\frac {1}{28 \left (x-\sqrt {1+x^2}\right )^{7/2}}-\frac {1}{4 \left (x-\sqrt {1+x^2}\right )^{3/2}}+\frac {4}{\sqrt {x-\sqrt {1+x^2}}}-\frac {3}{4} \sqrt {x-\sqrt {1+x^2}}+\frac {1}{20} \left (x-\sqrt {1+x^2}\right )^{5/2}+\frac {1}{4 \left (-x+\sqrt {1+x^2}\right )^2}+\frac {3}{2} \log \left (-x+\sqrt {1+x^2}\right )-\text {RootSum}\left [-1+4 \text {$\#$1}^3+\text {$\#$1}^8\&,\frac {-4 \log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right )+3 \log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right ) \text {$\#$1}-\log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right ) \text {$\#$1}^2-\log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right ) \text {$\#$1}^5+\log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right ) \text {$\#$1}^6}{3 \text {$\#$1}+2 \text {$\#$1}^6}\&\right ] \]

output
Unintegrable
 
3.29.84.2 Mathematica [A] (verified)

Time = 1.49 (sec) , antiderivative size = 311, normalized size of antiderivative = 1.00 \[ \int \frac {x^4}{1-x \sqrt {1+x^2} \sqrt {x-\sqrt {1+x^2}}} \, dx=\frac {1}{28 \left (x-\sqrt {1+x^2}\right )^{7/2}}-\frac {1}{4 \left (x-\sqrt {1+x^2}\right )^{3/2}}+\frac {4}{\sqrt {x-\sqrt {1+x^2}}}-\frac {3}{4} \sqrt {x-\sqrt {1+x^2}}+\frac {1}{20} \left (x-\sqrt {1+x^2}\right )^{5/2}+\frac {1}{4 \left (-x+\sqrt {1+x^2}\right )^2}+\frac {3}{2} \log \left (-x+\sqrt {1+x^2}\right )-\text {RootSum}\left [-1+4 \text {$\#$1}^3+\text {$\#$1}^8\&,\frac {-4 \log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right )+3 \log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right ) \text {$\#$1}-\log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right ) \text {$\#$1}^2-\log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right ) \text {$\#$1}^5+\log \left (\sqrt {x-\sqrt {1+x^2}}-\text {$\#$1}\right ) \text {$\#$1}^6}{3 \text {$\#$1}+2 \text {$\#$1}^6}\&\right ] \]

input
Integrate[x^4/(1 - x*Sqrt[1 + x^2]*Sqrt[x - Sqrt[1 + x^2]]),x]
 
output
1/(28*(x - Sqrt[1 + x^2])^(7/2)) - 1/(4*(x - Sqrt[1 + x^2])^(3/2)) + 4/Sqr 
t[x - Sqrt[1 + x^2]] - (3*Sqrt[x - Sqrt[1 + x^2]])/4 + (x - Sqrt[1 + x^2]) 
^(5/2)/20 + 1/(4*(-x + Sqrt[1 + x^2])^2) + (3*Log[-x + Sqrt[1 + x^2]])/2 - 
 RootSum[-1 + 4*#1^3 + #1^8 & , (-4*Log[Sqrt[x - Sqrt[1 + x^2]] - #1] + 3* 
Log[Sqrt[x - Sqrt[1 + x^2]] - #1]*#1 - Log[Sqrt[x - Sqrt[1 + x^2]] - #1]*# 
1^2 - Log[Sqrt[x - Sqrt[1 + x^2]] - #1]*#1^5 + Log[Sqrt[x - Sqrt[1 + x^2]] 
 - #1]*#1^6)/(3*#1 + 2*#1^6) & ]
 
3.29.84.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 {x^4}{1-x \sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}} \, dx\)

\(\Big \downarrow \) 7293

\(\displaystyle \int \left (-\frac {2 \sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}} x^7}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+\frac {\sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}} x^6}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+\frac {2 \sqrt {x-\sqrt {x^2+1}} x^6}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}-\frac {\sqrt {x^2+1} x^6}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}-\frac {\sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}} x^5}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+\frac {4 \sqrt {x-\sqrt {x^2+1}} x^5}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}-\frac {2 \sqrt {x^2+1} x^5}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+\frac {\sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}} x^4}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+\frac {2 \sqrt {x-\sqrt {x^2+1}} x^4}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}-\frac {\sqrt {x^2+1} x^4}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+\frac {2 \sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}} x^3}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+\frac {5 \sqrt {x-\sqrt {x^2+1}} x^3}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+\sqrt {x-\sqrt {x^2+1}} x^3-\frac {2 \sqrt {x^2+1} x^3}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+\sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}} x^2+\frac {\sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}} x^2}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}-\frac {\left (x^6+2 x^5+x^4+3 x^3-1\right ) x}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}+x+\sqrt {x^2+1}-\sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}-\frac {\sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}-\frac {2 \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}-2 \sqrt {x-\sqrt {x^2+1}}+\frac {\sqrt {x^2+1}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}\right )dx\)

\(\Big \downarrow \) 2009

\(\displaystyle \frac {1}{20} \left (x-\sqrt {x^2+1}\right )^{5/2}-\frac {2}{3} \left (x-\sqrt {x^2+1}\right )^{3/2}+\frac {5}{4} \sqrt {x-\sqrt {x^2+1}}+\frac {x^2}{2}+\frac {\text {arcsinh}(x)}{2}-\frac {1}{8} \log \left (x^8+2 x^6+2 x^5+x^4+2 x^3-1\right )+\int \frac {x}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+\frac {3}{4} \int \frac {x^2}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+\frac {1}{2} \int \frac {x^3}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-\frac {7}{4} \int \frac {x^4}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+\frac {1}{2} \int \frac {x^5}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-2 \int \frac {x^6}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+\int \frac {\sqrt {x^2+1}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-2 \int \frac {x^3 \sqrt {x^2+1}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-\int \frac {x^4 \sqrt {x^2+1}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-2 \int \frac {x^5 \sqrt {x^2+1}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-\int \frac {x^6 \sqrt {x^2+1}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-2 \int \frac {\sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+5 \int \frac {x^3 \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+2 \int \frac {x^4 \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+4 \int \frac {x^5 \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+2 \int \frac {x^6 \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-\int \frac {\sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+\int \frac {x^2 \sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+2 \int \frac {x^3 \sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+\int \frac {x^4 \sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-\int \frac {x^5 \sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+\int \frac {x^6 \sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx-2 \int \frac {x^7 \sqrt {x^2+1} \sqrt {x-\sqrt {x^2+1}}}{x^8+2 x^6+2 x^5+x^4+2 x^3-1}dx+\frac {1}{2} x \sqrt {x^2+1}+\frac {2}{\sqrt {x-\sqrt {x^2+1}}}-\frac {1}{4 \left (x-\sqrt {x^2+1}\right )^{3/2}}+\frac {1}{28 \left (x-\sqrt {x^2+1}\right )^{7/2}}\)

input
Int[x^4/(1 - x*Sqrt[1 + x^2]*Sqrt[x - Sqrt[1 + x^2]]),x]
 
output
$Aborted
 

3.29.84.3.1 Defintions of rubi rules used

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

rule 7293
Int[u_, x_Symbol] :> With[{v = ExpandIntegrand[u, x]}, Int[v, x] /; SumQ[v] 
]
 
3.29.84.4 Maple [N/A] (verified)

Not integrable

Time = 0.09 (sec) , antiderivative size = 31, normalized size of antiderivative = 0.10

\[\int \frac {x^{4}}{1-x \sqrt {x^{2}+1}\, \sqrt {x -\sqrt {x^{2}+1}}}d x\]

input
int(x^4/(1-x*(x^2+1)^(1/2)*(x-(x^2+1)^(1/2))^(1/2)),x)
 
output
int(x^4/(1-x*(x^2+1)^(1/2)*(x-(x^2+1)^(1/2))^(1/2)),x)
 
3.29.84.5 Fricas [F(-1)]

Timed out. \[ \int \frac {x^4}{1-x \sqrt {1+x^2} \sqrt {x-\sqrt {1+x^2}}} \, dx=\text {Timed out} \]

input
integrate(x^4/(1-x*(x^2+1)^(1/2)*(x-(x^2+1)^(1/2))^(1/2)),x, algorithm="fr 
icas")
 
output
Timed out
 
3.29.84.6 Sympy [N/A]

Not integrable

Time = 3.19 (sec) , antiderivative size = 31, normalized size of antiderivative = 0.10 \[ \int \frac {x^4}{1-x \sqrt {1+x^2} \sqrt {x-\sqrt {1+x^2}}} \, dx=- \int \frac {x^{4}}{x \sqrt {x - \sqrt {x^{2} + 1}} \sqrt {x^{2} + 1} - 1}\, dx \]

input
integrate(x**4/(1-x*(x**2+1)**(1/2)*(x-(x**2+1)**(1/2))**(1/2)),x)
 
output
-Integral(x**4/(x*sqrt(x - sqrt(x**2 + 1))*sqrt(x**2 + 1) - 1), x)
 
3.29.84.7 Maxima [N/A]

Not integrable

Time = 0.37 (sec) , antiderivative size = 34, normalized size of antiderivative = 0.11 \[ \int \frac {x^4}{1-x \sqrt {1+x^2} \sqrt {x-\sqrt {1+x^2}}} \, dx=\int { -\frac {x^{4}}{\sqrt {x^{2} + 1} \sqrt {x - \sqrt {x^{2} + 1}} x - 1} \,d x } \]

input
integrate(x^4/(1-x*(x^2+1)^(1/2)*(x-(x^2+1)^(1/2))^(1/2)),x, algorithm="ma 
xima")
 
output
-integrate(x^4/(sqrt(x^2 + 1)*sqrt(x - sqrt(x^2 + 1))*x - 1), x)
 
3.29.84.8 Giac [N/A]

Not integrable

Time = 0.90 (sec) , antiderivative size = 33, normalized size of antiderivative = 0.11 \[ \int \frac {x^4}{1-x \sqrt {1+x^2} \sqrt {x-\sqrt {1+x^2}}} \, dx=\int { -\frac {x^{4}}{\sqrt {x^{2} + 1} \sqrt {x - \sqrt {x^{2} + 1}} x - 1} \,d x } \]

input
integrate(x^4/(1-x*(x^2+1)^(1/2)*(x-(x^2+1)^(1/2))^(1/2)),x, algorithm="gi 
ac")
 
output
integrate(-x^4/(sqrt(x^2 + 1)*sqrt(x - sqrt(x^2 + 1))*x - 1), x)
 
3.29.84.9 Mupad [N/A]

Not integrable

Time = 7.32 (sec) , antiderivative size = 34, normalized size of antiderivative = 0.11 \[ \int \frac {x^4}{1-x \sqrt {1+x^2} \sqrt {x-\sqrt {1+x^2}}} \, dx=-\int \frac {x^4}{x\,\sqrt {x^2+1}\,\sqrt {x-\sqrt {x^2+1}}-1} \,d x \]

input
int(-x^4/(x*(x^2 + 1)^(1/2)*(x - (x^2 + 1)^(1/2))^(1/2) - 1),x)
 
output
-int(x^4/(x*(x^2 + 1)^(1/2)*(x - (x^2 + 1)^(1/2))^(1/2) - 1), x)