3.12.80 \(\int \frac {(3+4 x) \sqrt {x+2 x^2-2 x^4}}{(1+2 x) (1+2 x+x^3)} \, dx\)

Optimal. Leaf size=87 \[ 2 \sqrt {2} \tan ^{-1}\left (\frac {\sqrt {2} x \sqrt {-2 x^4+2 x^2+x}}{2 x^3-2 x-1}\right )-2 \sqrt {3} \tan ^{-1}\left (\frac {\sqrt {3} x \sqrt {-2 x^4+2 x^2+x}}{2 x^3-2 x-1}\right ) \]

________________________________________________________________________________________

Rubi [F]  time = 3.38, antiderivative size = 0, normalized size of antiderivative = 0.00, number of steps used = 0, number of rules used = 0, integrand size = 0, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.000, Rules used = {} \begin {gather*} \int \frac {(3+4 x) \sqrt {x+2 x^2-2 x^4}}{(1+2 x) \left (1+2 x+x^3\right )} \, dx \end {gather*}

Verification is not applicable to the result.

[In]

Int[((3 + 4*x)*Sqrt[x + 2*x^2 - 2*x^4])/((1 + 2*x)*(1 + 2*x + x^3)),x]

[Out]

((4*I)*Sqrt[x + 2*x^2 - 2*x^4]*Defer[Subst][Defer[Int][Sqrt[1 + 2*x^2 - 2*x^6]/(I - Sqrt[2]*x), x], x, Sqrt[x]
])/(Sqrt[x]*Sqrt[1 + 2*x - 2*x^3]) + ((4*I)*Sqrt[x + 2*x^2 - 2*x^4]*Defer[Subst][Defer[Int][Sqrt[1 + 2*x^2 - 2
*x^6]/(I + Sqrt[2]*x), x], x, Sqrt[x]])/(Sqrt[x]*Sqrt[1 + 2*x - 2*x^3]) - (8*Sqrt[x + 2*x^2 - 2*x^4]*Defer[Sub
st][Defer[Int][Sqrt[1 + 2*x^2 - 2*x^6]/(1 + 2*x^2 + x^6), x], x, Sqrt[x]])/(Sqrt[x]*Sqrt[1 + 2*x - 2*x^3]) + (
6*Sqrt[x + 2*x^2 - 2*x^4]*Defer[Subst][Defer[Int][(x^2*Sqrt[1 + 2*x^2 - 2*x^6])/(1 + 2*x^2 + x^6), x], x, Sqrt
[x]])/(Sqrt[x]*Sqrt[1 + 2*x - 2*x^3]) - (4*Sqrt[x + 2*x^2 - 2*x^4]*Defer[Subst][Defer[Int][(x^4*Sqrt[1 + 2*x^2
 - 2*x^6])/(1 + 2*x^2 + x^6), x], x, Sqrt[x]])/(Sqrt[x]*Sqrt[1 + 2*x - 2*x^3])

Rubi steps

\begin {align*} \int \frac {(3+4 x) \sqrt {x+2 x^2-2 x^4}}{(1+2 x) \left (1+2 x+x^3\right )} \, dx &=\frac {\sqrt {x+2 x^2-2 x^4} \int \frac {\sqrt {x} (3+4 x) \sqrt {1+2 x-2 x^3}}{(1+2 x) \left (1+2 x+x^3\right )} \, dx}{\sqrt {x} \sqrt {1+2 x-2 x^3}}\\ &=\frac {\left (2 \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \frac {x^2 \left (3+4 x^2\right ) \sqrt {1+2 x^2-2 x^6}}{\left (1+2 x^2\right ) \left (1+2 x^2+x^6\right )} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}\\ &=\frac {\left (2 \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \left (\frac {4 \sqrt {1+2 x^2-2 x^6}}{1+2 x^2}+\frac {\left (-4+3 x^2-2 x^4\right ) \sqrt {1+2 x^2-2 x^6}}{1+2 x^2+x^6}\right ) \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}\\ &=\frac {\left (2 \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \frac {\left (-4+3 x^2-2 x^4\right ) \sqrt {1+2 x^2-2 x^6}}{1+2 x^2+x^6} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}+\frac {\left (8 \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \frac {\sqrt {1+2 x^2-2 x^6}}{1+2 x^2} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}\\ &=\frac {\left (2 \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \left (-\frac {4 \sqrt {1+2 x^2-2 x^6}}{1+2 x^2+x^6}+\frac {3 x^2 \sqrt {1+2 x^2-2 x^6}}{1+2 x^2+x^6}-\frac {2 x^4 \sqrt {1+2 x^2-2 x^6}}{1+2 x^2+x^6}\right ) \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}+\frac {\left (8 \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \left (\frac {i \sqrt {1+2 x^2-2 x^6}}{2 \left (i-\sqrt {2} x\right )}+\frac {i \sqrt {1+2 x^2-2 x^6}}{2 \left (i+\sqrt {2} x\right )}\right ) \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}\\ &=\frac {\left (4 i \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \frac {\sqrt {1+2 x^2-2 x^6}}{i-\sqrt {2} x} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}+\frac {\left (4 i \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \frac {\sqrt {1+2 x^2-2 x^6}}{i+\sqrt {2} x} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}-\frac {\left (4 \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \frac {x^4 \sqrt {1+2 x^2-2 x^6}}{1+2 x^2+x^6} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}+\frac {\left (6 \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \frac {x^2 \sqrt {1+2 x^2-2 x^6}}{1+2 x^2+x^6} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}-\frac {\left (8 \sqrt {x+2 x^2-2 x^4}\right ) \operatorname {Subst}\left (\int \frac {\sqrt {1+2 x^2-2 x^6}}{1+2 x^2+x^6} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {1+2 x-2 x^3}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [C]  time = 6.70, size = 18077, normalized size = 207.78 \begin {gather*} \text {Result too large to show} \end {gather*}

Warning: Unable to verify antiderivative.

[In]

Integrate[((3 + 4*x)*Sqrt[x + 2*x^2 - 2*x^4])/((1 + 2*x)*(1 + 2*x + x^3)),x]

[Out]

Result too large to show

________________________________________________________________________________________

IntegrateAlgebraic [A]  time = 0.39, size = 87, normalized size = 1.00 \begin {gather*} 2 \sqrt {2} \tan ^{-1}\left (\frac {\sqrt {2} x \sqrt {x+2 x^2-2 x^4}}{-1-2 x+2 x^3}\right )-2 \sqrt {3} \tan ^{-1}\left (\frac {\sqrt {3} x \sqrt {x+2 x^2-2 x^4}}{-1-2 x+2 x^3}\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

IntegrateAlgebraic[((3 + 4*x)*Sqrt[x + 2*x^2 - 2*x^4])/((1 + 2*x)*(1 + 2*x + x^3)),x]

[Out]

2*Sqrt[2]*ArcTan[(Sqrt[2]*x*Sqrt[x + 2*x^2 - 2*x^4])/(-1 - 2*x + 2*x^3)] - 2*Sqrt[3]*ArcTan[(Sqrt[3]*x*Sqrt[x
+ 2*x^2 - 2*x^4])/(-1 - 2*x + 2*x^3)]

________________________________________________________________________________________

fricas [B]  time = 0.84, size = 168, normalized size = 1.93 \begin {gather*} \frac {2}{5} \, \sqrt {2} \arctan \left (\frac {2 \, \sqrt {2} \sqrt {-2 \, x^{4} + 2 \, x^{2} + x} {\left (4 \, x^{3} - 4 \, x^{2} - x + 1\right )}}{16 \, x^{5} - 16 \, x^{4} - 12 \, x^{3} + 8 \, x^{2} + 4 \, x - 1}\right ) - \frac {1}{5} \, \sqrt {2} \arctan \left (\frac {2 \, \sqrt {2} \sqrt {-2 \, x^{4} + 2 \, x^{2} + x} {\left (4 \, x^{2} + 5 \, x + 2\right )}}{32 \, x^{5} + 80 \, x^{4} + 84 \, x^{3} + 40 \, x^{2} + 6 \, x - 1}\right ) - \sqrt {3} \arctan \left (\frac {2 \, \sqrt {3} \sqrt {-2 \, x^{4} + 2 \, x^{2} + x} x}{5 \, x^{3} - 2 \, x - 1}\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

2/5*sqrt(2)*arctan(2*sqrt(2)*sqrt(-2*x^4 + 2*x^2 + x)*(4*x^3 - 4*x^2 - x + 1)/(16*x^5 - 16*x^4 - 12*x^3 + 8*x^
2 + 4*x - 1)) - 1/5*sqrt(2)*arctan(2*sqrt(2)*sqrt(-2*x^4 + 2*x^2 + x)*(4*x^2 + 5*x + 2)/(32*x^5 + 80*x^4 + 84*
x^3 + 40*x^2 + 6*x - 1)) - sqrt(3)*arctan(2*sqrt(3)*sqrt(-2*x^4 + 2*x^2 + x)*x/(5*x^3 - 2*x - 1))

________________________________________________________________________________________

giac [F]  time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int \frac {\sqrt {-2 \, x^{4} + 2 \, x^{2} + x} {\left (4 \, x + 3\right )}}{{\left (x^{3} + 2 \, x + 1\right )} {\left (2 \, x + 1\right )}}\,{d x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

integrate(sqrt(-2*x^4 + 2*x^2 + x)*(4*x + 3)/((x^3 + 2*x + 1)*(2*x + 1)), x)

________________________________________________________________________________________

maple [C]  time = 6.75, size = 129, normalized size = 1.48

method result size
trager \(\RootOf \left (\textit {\_Z}^{2}+2\right ) \ln \left (-\frac {4 \RootOf \left (\textit {\_Z}^{2}+2\right ) x^{3}+4 \sqrt {-2 x^{4}+2 x^{2}+x}\, x -2 \RootOf \left (\textit {\_Z}^{2}+2\right ) x -\RootOf \left (\textit {\_Z}^{2}+2\right )}{1+2 x}\right )+\RootOf \left (\textit {\_Z}^{2}+3\right ) \ln \left (-\frac {-5 \RootOf \left (\textit {\_Z}^{2}+3\right ) x^{3}+6 \sqrt {-2 x^{4}+2 x^{2}+x}\, x +2 \RootOf \left (\textit {\_Z}^{2}+3\right ) x +\RootOf \left (\textit {\_Z}^{2}+3\right )}{x^{3}+2 x +1}\right )\) \(129\)
default \(\text {Expression too large to display}\) \(6278\)
elliptic \(\text {Expression too large to display}\) \(414320\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

RootOf(_Z^2+2)*ln(-(4*RootOf(_Z^2+2)*x^3+4*(-2*x^4+2*x^2+x)^(1/2)*x-2*RootOf(_Z^2+2)*x-RootOf(_Z^2+2))/(1+2*x)
)+RootOf(_Z^2+3)*ln(-(-5*RootOf(_Z^2+3)*x^3+6*(-2*x^4+2*x^2+x)^(1/2)*x+2*RootOf(_Z^2+3)*x+RootOf(_Z^2+3))/(x^3
+2*x+1))

________________________________________________________________________________________

maxima [F]  time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int \frac {\sqrt {-2 \, x^{4} + 2 \, x^{2} + x} {\left (4 \, x + 3\right )}}{{\left (x^{3} + 2 \, x + 1\right )} {\left (2 \, x + 1\right )}}\,{d x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

integrate(sqrt(-2*x^4 + 2*x^2 + x)*(4*x + 3)/((x^3 + 2*x + 1)*(2*x + 1)), x)

________________________________________________________________________________________

mupad [F]  time = 0.00, size = -1, normalized size = -0.01 \begin {gather*} \int \frac {\left (4\,x+3\right )\,\sqrt {-2\,x^4+2\,x^2+x}}{\left (2\,x+1\right )\,\left (x^3+2\,x+1\right )} \,d x \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

sympy [F(-1)]  time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Timed out} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((3+4*x)*(-2*x**4+2*x**2+x)**(1/2)/(1+2*x)/(x**3+2*x+1),x)

[Out]

Timed out

________________________________________________________________________________________