3.281 \(\int (\sqrt{9-4 \sqrt{2}} x-\sqrt{2} \sqrt{1+4 x+2 x^2+x^4}) \, dx\)

Optimal. Leaf size=4030 \[ \text{result too large to display} \]

[Out]

(Sqrt[9 - 4*Sqrt[2]]*x^2)/2 - Sqrt[2]*(-Sqrt[1 + 4*x + 2*x^2 + x^4]/3 + ((1 + x)*Sqrt[1 + 4*x + 2*x^2 + x^4])/
3 + ((4*I)*(-13 + 3*Sqrt[33])^(1/3)*Sqrt[1 + 4*x + 2*x^2 + x^4])/(4*2^(2/3)*(-I + Sqrt[3]) - (2*I)*(-13 + 3*Sq
rt[33])^(1/3) + 2^(1/3)*(I + Sqrt[3])*(-13 + 3*Sqrt[33])^(2/3) + (6*I)*(-13 + 3*Sqrt[33])^(1/3)*x) - (8*2^(2/3
)*Sqrt[3/(-13 + 3*Sqrt[33] + 4*(-26 + 6*Sqrt[33])^(1/3))]*Sqrt[(I*(-19899 + 3445*Sqrt[33] + (-26 + 6*Sqrt[33])
^(2/3)*(-2574 + 466*Sqrt[33]) + (-26 + 6*Sqrt[33])^(1/3)*(-19899 + 3445*Sqrt[33]) + (59697 - 10335*Sqrt[33])*x
))/((-39 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] + 9*Sqrt[33] + (4*I)*(3*I + Sqrt[3])*(-26 + 6*Sqrt[33])^(1/3))*(26
- 6*Sqrt[33] + (-13 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] + 3*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3) + (-4 - (4*I)*Sqr
t[3])*(-26 + 6*Sqrt[33])^(2/3) + 6*(-13 + 3*Sqrt[33])*x))]*Sqrt[1 + 4*x + 2*x^2 + x^4]*EllipticE[ArcSin[Sqrt[2
6 - 6*Sqrt[33] + (-13 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] + 3*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3) + (4*I)*(I + Sq
rt[3])*(-26 + 6*Sqrt[33])^(2/3) + 6*(-13 + 3*Sqrt[33])*x]/(Sqrt[(39 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] - 9*Sqrt
[33] + 4*(3 - I*Sqrt[3])*(-26 + 6*Sqrt[33])^(1/3))/(39 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] - 9*Sqrt[33] + 4*(3 +
 I*Sqrt[3])*(-26 + 6*Sqrt[33])^(1/3))]*Sqrt[26 - 6*Sqrt[33] + (-13 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] + 3*Sqrt[
33])*(-26 + 6*Sqrt[33])^(1/3) + (-4 - (4*I)*Sqrt[3])*(-26 + 6*Sqrt[33])^(2/3) + 6*(-13 + 3*Sqrt[33])*x])], (4*
(21 + (7*I)*Sqrt[3] - (3*I)*Sqrt[11] - 3*Sqrt[33]) + (3 - I*Sqrt[3] - (3*I)*Sqrt[11] + 3*Sqrt[33])*(-26 + 6*Sq
rt[33])^(1/3))/(4*(21 - (7*I)*Sqrt[3] + (3*I)*Sqrt[11] - 3*Sqrt[33]) + (3 + I*Sqrt[3] + (3*I)*Sqrt[11] + 3*Sqr
t[33])*(-26 + 6*Sqrt[33])^(1/3))])/((4*2^(2/3) - (-13 + 3*Sqrt[33])^(1/3) - 2^(1/3)*(-13 + 3*Sqrt[33])^(2/3) +
 3*(-13 + 3*Sqrt[33])^(1/3)*x)*Sqrt[(I*(1 + x))/((104 - 24*Sqrt[33] + (-13 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] +
 3*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3) + (4*I)*(I + Sqrt[3])*(-26 + 6*Sqrt[33])^(2/3))*(26 - 6*Sqrt[33] + (-13
+ (13*I)*Sqrt[3] - (9*I)*Sqrt[11] + 3*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3) + (-4 - (4*I)*Sqrt[3])*(-26 + 6*Sqrt[
33])^(2/3) + 6*(-13 + 3*Sqrt[33])*x))]*Sqrt[26 - 6*Sqrt[33] + (-13 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] + 3*Sqrt[
33])*(-26 + 6*Sqrt[33])^(1/3) + (-4 - (4*I)*Sqrt[3])*(-26 + 6*Sqrt[33])^(2/3) + 6*(-13 + 3*Sqrt[33])*x]*Sqrt[2
6 - 6*Sqrt[33] + (-13 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] + 3*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3) + (4*I)*(I + Sq
rt[3])*(-26 + 6*Sqrt[33])^(2/3) + 6*(-13 + 3*Sqrt[33])*x]) + ((2^(1/3)*(13 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] -
 3*Sqrt[33]) + 4*2^(2/3)*(1 + I*Sqrt[3])*(-13 + 3*Sqrt[33])^(1/3) + 20*(-13 + 3*Sqrt[33])^(2/3))*(4*2^(2/3)*(I
 + Sqrt[3]) + (8*I)*(-13 + 3*Sqrt[33])^(1/3) + 2^(1/3)*(-I + Sqrt[3])*(-13 + 3*Sqrt[33])^(2/3))*Sqrt[(52 - 12*
Sqrt[33] - 2^(1/3)*(-13 + 3*Sqrt[33])^(4/3) + 4*(-26 + 6*Sqrt[33])^(2/3))/(-13 + 3*Sqrt[33] + 4*(-26 + 6*Sqrt[
33])^(1/3))]*Sqrt[((-8*I)*(-13 + 3*Sqrt[33]) + (-43*I - 13*Sqrt[3] + 9*Sqrt[11] + (5*I)*Sqrt[33])*(-26 + 6*Sqr
t[33])^(1/3) + (2*I + 4*Sqrt[3] - (2*I)*Sqrt[33])*(-26 + 6*Sqrt[33])^(2/3) + ((8*I)*(-13 + 3*Sqrt[33]) + (13*I
 - 13*Sqrt[3] + 9*Sqrt[11] - (3*I)*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3) + 4*(I + Sqrt[3])*(-26 + 6*Sqrt[33])^(2/
3))*x)/(1 + x)]*Sqrt[1 + 4*x + 2*x^2 + x^4]*EllipticF[ArcSin[(Sqrt[52 - 12*Sqrt[33] - 2^(1/3)*(-13 + 3*Sqrt[33
])^(4/3) + 4*(-26 + 6*Sqrt[33])^(2/3)]*Sqrt[26 - 6*Sqrt[33] + (-13 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] + 3*Sqrt[
33])*(-26 + 6*Sqrt[33])^(1/3) + (4*I)*(I + Sqrt[3])*(-26 + 6*Sqrt[33])^(2/3) + 6*(-13 + 3*Sqrt[33])*x])/(2^(1/
6)*Sqrt[3]*(-13 + 3*Sqrt[33])^(2/3)*Sqrt[39 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] - 9*Sqrt[33] + 4*(3 - I*Sqrt[3])
*(-26 + 6*Sqrt[33])^(1/3)]*Sqrt[1 + x])], (4*(21*I - 7*Sqrt[3] + 3*Sqrt[11] - (3*I)*Sqrt[33]) + (3*I + Sqrt[3]
 + 3*Sqrt[11] + (3*I)*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3))/(-56*Sqrt[3] + 24*Sqrt[11] + 2*(Sqrt[3] + 3*Sqrt[11]
)*(-26 + 6*Sqrt[33])^(1/3))])/(3*2^(2/3)*3^(3/4)*(-13 + 3*Sqrt[33])^(1/3)*Sqrt[39 + (13*I)*Sqrt[3] - (9*I)*Sqr
t[11] - 9*Sqrt[33] + 4*(3 - I*Sqrt[3])*(-26 + 6*Sqrt[33])^(1/3)]*Sqrt[1 + x]*(4*2^(2/3)*(-I + Sqrt[3]) - (2*I)
*(-13 + 3*Sqrt[33])^(1/3) + 2^(1/3)*(I + Sqrt[3])*(-13 + 3*Sqrt[33])^(2/3) + (6*I)*(-13 + 3*Sqrt[33])^(1/3)*x)
*Sqrt[26 - 6*Sqrt[33] + (-13 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] + 3*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3) + (4*I)*
(I + Sqrt[3])*(-26 + 6*Sqrt[33])^(2/3) + 6*(-13 + 3*Sqrt[33])*x]*Sqrt[(8*(-13 + 3*Sqrt[33]) - (5 - (3*I)*Sqrt[
3] + (3*I)*Sqrt[11] + Sqrt[33])*(-26 + 6*Sqrt[33])^(2/3) + (-26 + 6*Sqrt[33])^(1/3)*(-41 + (15*I)*Sqrt[3] - (3
*I)*Sqrt[11] + 7*Sqrt[33]) + (104 - 24*Sqrt[33] + (-13 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] + 3*Sqrt[33])*(-26 +
6*Sqrt[33])^(1/3) + (4*I)*(I + Sqrt[3])*(-26 + 6*Sqrt[33])^(2/3))*x)/((-39 - (13*I)*Sqrt[3] + (9*I)*Sqrt[11] +
 9*Sqrt[33] + (4*I)*(3*I + Sqrt[3])*(-26 + 6*Sqrt[33])^(1/3))*(1 + x))]) + ((4*2^(2/3) + 2*(-13 + 3*Sqrt[33])^
(1/3) - 2^(1/3)*(-13 + 3*Sqrt[33])^(2/3))*(4*2^(2/3)*(I + Sqrt[3]) - (4*I)*(-13 + 3*Sqrt[33])^(1/3) + 2^(1/3)*
(-I + Sqrt[3])*(-13 + 3*Sqrt[33])^(2/3))*(4*2^(2/3)*(-I + Sqrt[3]) + (4*I)*(-13 + 3*Sqrt[33])^(1/3) + 2^(1/3)*
(I + Sqrt[3])*(-13 + 3*Sqrt[33])^(2/3))*Sqrt[(-39 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] + 9*Sqrt[33] - (4*I)*(-3*I
 + Sqrt[3])*(-26 + 6*Sqrt[33])^(1/3))/(104 - 24*Sqrt[33] + (-13 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] + 3*Sqrt[33]
)*(-26 + 6*Sqrt[33])^(1/3) + (-4 - (4*I)*Sqrt[3])*(-26 + 6*Sqrt[33])^(2/3))]*Sqrt[1 + x]*Sqrt[(104 - 24*Sqrt[3
3] + 2*(1 + (14*I)*Sqrt[3] - (6*I)*Sqrt[11] + Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3) + (-7 - I*Sqrt[3] - (3*I)*Sqr
t[11] + Sqrt[33])*(-26 + 6*Sqrt[33])^(2/3) + 2*(-52 + 12*Sqrt[33] + 2^(1/3)*(-13 + 3*Sqrt[33])^(4/3) - 4*(-26
+ 6*Sqrt[33])^(2/3))*x)/((-39 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] + 9*Sqrt[33] - (4*I)*(-3*I + Sqrt[3])*(-26 + 6
*Sqrt[33])^(1/3))*(1 + x))]*Sqrt[(104 - 24*Sqrt[33] + 2*(1 - (14*I)*Sqrt[3] + (6*I)*Sqrt[11] + Sqrt[33])*(-26
+ 6*Sqrt[33])^(1/3) + (-7 + I*Sqrt[3] + (3*I)*Sqrt[11] + Sqrt[33])*(-26 + 6*Sqrt[33])^(2/3) + 2*(-52 + 12*Sqrt
[33] + 2^(1/3)*(-13 + 3*Sqrt[33])^(4/3) - 4*(-26 + 6*Sqrt[33])^(2/3))*x)/((-39 - (13*I)*Sqrt[3] + (9*I)*Sqrt[1
1] + 9*Sqrt[33] + (4*I)*(3*I + Sqrt[3])*(-26 + 6*Sqrt[33])^(1/3))*(1 + x))]*Sqrt[1 + 4*x + 2*x^2 + x^4]*Ellipt
icPi[(2^(1/3)*(4*2^(1/3)*(-3*I + Sqrt[3]) + (3*I + Sqrt[3])*(-13 + 3*Sqrt[33])^(2/3)))/(4*2^(2/3)*(-I + Sqrt[3
]) - (8*I)*(-13 + 3*Sqrt[33])^(1/3) + 2^(1/3)*(I + Sqrt[3])*(-13 + 3*Sqrt[33])^(2/3)), ArcSin[Sqrt[13 - 3*Sqrt
[33] - 2^(1/3)*(-13 + 3*Sqrt[33])^(4/3) + 4*(-26 + 6*Sqrt[33])^(2/3) + (-39 + 9*Sqrt[33])*x]/(2^(1/6)*Sqrt[3]*
(-13 + 3*Sqrt[33])^(2/3)*Sqrt[(-39 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] + 9*Sqrt[33] - (4*I)*(-3*I + Sqrt[3])*(-2
6 + 6*Sqrt[33])^(1/3))/(104 - 24*Sqrt[33] + (-13 + (13*I)*Sqrt[3] - (9*I)*Sqrt[11] + 3*Sqrt[33])*(-26 + 6*Sqrt
[33])^(1/3) + (-4 - (4*I)*Sqrt[3])*(-26 + 6*Sqrt[33])^(2/3))]*Sqrt[1 + x])], (4*(21 - (7*I)*Sqrt[3] + (3*I)*Sq
rt[11] - 3*Sqrt[33]) + (3 + I*Sqrt[3] + (3*I)*Sqrt[11] + 3*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3))/(4*(21 + (7*I)*
Sqrt[3] - (3*I)*Sqrt[11] - 3*Sqrt[33]) + (3 - I*Sqrt[3] - (3*I)*Sqrt[11] + 3*Sqrt[33])*(-26 + 6*Sqrt[33])^(1/3
))])/(2^(1/6)*Sqrt[3]*(4*2^(2/3)*(I + Sqrt[3]) + (2*I)*(-13 + 3*Sqrt[33])^(1/3) + 2^(1/3)*(-I + Sqrt[3])*(-13
+ 3*Sqrt[33])^(2/3) - (6*I)*(-13 + 3*Sqrt[33])^(1/3)*x)*(4*2^(2/3)*(-I + Sqrt[3]) - (2*I)*(-13 + 3*Sqrt[33])^(
1/3) + 2^(1/3)*(I + Sqrt[3])*(-13 + 3*Sqrt[33])^(2/3) + (6*I)*(-13 + 3*Sqrt[33])^(1/3)*x)*Sqrt[13 - 3*Sqrt[33]
 - 2^(1/3)*(-13 + 3*Sqrt[33])^(4/3) + 4*(-26 + 6*Sqrt[33])^(2/3) + (-39 + 9*Sqrt[33])*x]))

________________________________________________________________________________________

Rubi [F]  time = 0.0250234, antiderivative size = 0, normalized size of antiderivative = 0., number of steps used = 0, number of rules used = 0, integrand size = 0, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0., Rules used = {} \[ \int \left (\sqrt{9-4 \sqrt{2}} x-\sqrt{2} \sqrt{1+4 x+2 x^2+x^4}\right ) \, dx \]

Verification is Not applicable to the result.

[In]

Int[Sqrt[9 - 4*Sqrt[2]]*x - Sqrt[2]*Sqrt[1 + 4*x + 2*x^2 + x^4],x]

[Out]

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

Rubi steps

\begin{align*} \int \left (\sqrt{9-4 \sqrt{2}} x-\sqrt{2} \sqrt{1+4 x+2 x^2+x^4}\right ) \, dx &=\frac{1}{2} \sqrt{9-4 \sqrt{2}} x^2-\sqrt{2} \int \sqrt{1+4 x+2 x^2+x^4} \, dx\\ \end{align*}

Mathematica [C]  time = 6.04772, size = 3168, normalized size = 0.79 \[ \text{Result too large to show} \]

Warning: Unable to verify antiderivative.

[In]

Integrate[Sqrt[9 - 4*Sqrt[2]]*x - Sqrt[2]*Sqrt[1 + 4*x + 2*x^2 + x^4],x]

[Out]

(Sqrt[9 - 4*Sqrt[2]]*x^2)/2 - (Sqrt[2]*x*Sqrt[1 + 4*x + 2*x^2 + x^4])/3 - (2*Sqrt[2]*((6*(x - Root[1 + 3*#1 -
#1^2 + #1^3 & , 1, 0])^2*(-(EllipticF[ArcSin[Sqrt[-(((1 + x)*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 +
 3*#1 - #1^2 + #1^3 & , 3, 0]))/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3
& , 3, 0])))]], ((Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(1 + Root[1 +
 3*#1 - #1^2 + #1^3 & , 3, 0]))/((1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(Root[1 + 3*#1 - #1^2 + #1^3 & ,
1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))]*Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0]) + EllipticPi[(1 + Root
[1 + 3*#1 - #1^2 + #1^3 & , 3, 0])/(-Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] + Root[1 + 3*#1 - #1^2 + #1^3 & , 3
, 0]), ArcSin[Sqrt[-(((1 + x)*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))
/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0])))]], ((Root[1 + 3*#1
 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))
/((1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 +
#1^3 & , 3, 0]))]*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0]))*Sqrt[(x - Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0]
)/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0]))]*(-1 - Root[1 + 3*
#1 - #1^2 + #1^3 & , 3, 0])*Sqrt[(x - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0])/((x - Root[1 + 3*#1 - #1^2 + #1^3
 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))]*Sqrt[-(((1 + x)*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1,
0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 -
 #1^2 + #1^3 & , 3, 0])))])/(Sqrt[1 + 4*x + 2*x^2 + x^4]*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#
1 - #1^2 + #1^3 & , 3, 0])) + (2*EllipticF[ArcSin[Sqrt[((1 + x)*(-Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] + Root
[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #
1^3 & , 3, 0]))]], ((Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(-1 - Root
[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))/((-1 - Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(Root[1 + 3*#1 - #1^2 + #1^3
 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))]*(x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])^2*Sqrt[(x -
Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2
+ #1^3 & , 2, 0]))]*(-1 - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0])*Sqrt[(x - Root[1 + 3*#1 - #1^2 + #1^3 & , 3,
0])/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))]*Sqrt[((1 + x)*(
-Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))/((x - Root[1 + 3*#1 - #1^2 +
#1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))])/(Sqrt[1 + 4*x + 2*x^2 + x^4]*(-Root[1 + 3*#1 -
#1^2 + #1^3 & , 1, 0] + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0])) + ((1 + x)*(x - Root[1 + 3*#1 - #1^2 + #1^3 &
, 2, 0])*(x - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]) + (x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])^2*(1 + Root
[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*Sqrt[(x - Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])/((x - Root[1 + 3*#1 - #1^2
 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0]))]*Sqrt[(x - Root[1 + 3*#1 - #1^2 + #1^3 & , 3,
0])/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))]*Sqrt[-(((1 + x)
*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))/((x - Root[1 + 3*#1 - #1^2 +
 #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0])))]*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0])*((
EllipticE[ArcSin[Sqrt[-(((1 + x)*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0
]))/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0])))]], ((Root[1 + 3
*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0
]))/((1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2
 + #1^3 & , 3, 0]))]*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0]))/(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])
- (EllipticPi[(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0])/(-Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] + Root[1 + 3
*#1 - #1^2 + #1^3 & , 3, 0]), ArcSin[Sqrt[-(((1 + x)*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 -
#1^2 + #1^3 & , 3, 0]))/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0
])))]], ((Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(1 + Root[1 + 3*#1 -
#1^2 + #1^3 & , 3, 0]))/((1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] -
Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))]*(1 - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #
1^3 & , 2, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))/(-Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] + Root[1 + 3*#
1 - #1^2 + #1^3 & , 3, 0]) + (EllipticF[ArcSin[Sqrt[-(((1 + x)*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1
 + 3*#1 - #1^2 + #1^3 & , 3, 0]))/((x - Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(1 + Root[1 + 3*#1 - #1^2 + #1^
3 & , 3, 0])))]], ((Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(1 + Root[1
 + 3*#1 - #1^2 + #1^3 & , 3, 0]))/((1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 2, 0])*(Root[1 + 3*#1 - #1^2 + #1^3 &
, 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))]*(Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] + Root[1 + 3*#1 - #1
^2 + #1^3 & , 1, 0]*(-Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0] - Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]) - Root[1
+ 3*#1 - #1^2 + #1^3 & , 3, 0]))/((1 + Root[1 + 3*#1 - #1^2 + #1^3 & , 1, 0])*(-Root[1 + 3*#1 - #1^2 + #1^3 &
, 1, 0] + Root[1 + 3*#1 - #1^2 + #1^3 & , 3, 0]))))/Sqrt[1 + 4*x + 2*x^2 + x^4]))/3

________________________________________________________________________________________

Maple [A]  time = 0.73, size = 4640, normalized size = 1.2 \begin{align*} \text{output too large to display} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

1/2*x^2*(-1+2*2^(1/2))-2^(1/2)*(1/3*x*(x^4+2*x^2+4*x+1)^(1/2)+4/3*(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33
^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*((1/2*(26+6*33^(1/2))^(1/3
)-4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(1+x)/(1/6*(26
+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))
^(1/3)))/(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2)*(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(
26+6*33^(1/2))^(1/3)-1/3)^2*((-1/3*(26+6*33^(1/2))^(1/3)+8/3/(26+6*33^(1/2))^(1/3)+4/3)*(x-1/6*(26+6*33^(1/2))
^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(1/
6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(
1/2))^(1/3)))/(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2)*((-1/3*(26+6*33^(1/2))^(1/3)+
8/3/(26+6*33^(1/2))^(1/3)+4/3)*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/3+1/2*I*3^(1/2)*(-1/3*
(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(1/6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3-1/2
*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(
1/2))^(1/3)-1/3))^(1/2)/(1/2*(26+6*33^(1/2))^(1/3)-4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))
^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(-1/3*(26+6*33^(1/2))^(1/3)+8/3/(26+6*33^(1/2))^(1/3)+4/3)/((1+x)*(x+1/3*(2
6+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3)*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/3-
1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*3
3^(1/2))^(1/3)-1/3+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))))^(1/2)*EllipticF(((1/
2*(26+6*33^(1/2))^(1/3)-4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^
(1/3)))*(1+x)/(1/6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/
3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2),((-1/2*(26+6
*33^(1/2))^(1/3)+4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))
*(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6
*33^(1/2))^(1/3)))/(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2
))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(-1/2*(26+6*33^(1/2))^(1/3)+4/(26+6*33^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(
26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))))^(1/2))+4*(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))
^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*((1/2*(26+6*33^(1/2))^(1/3)-4/(26
+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(1+x)/(1/6*(26+6*33^(
1/2))^(1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))
)/(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2)*(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33
^(1/2))^(1/3)-1/3)^2*((-1/3*(26+6*33^(1/2))^(1/3)+8/3/(26+6*33^(1/2))^(1/3)+4/3)*(x-1/6*(26+6*33^(1/2))^(1/3)+
4/3/(26+6*33^(1/2))^(1/3)-1/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(1/6*(26+6
*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(
1/3)))/(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2)*((-1/3*(26+6*33^(1/2))^(1/3)+8/3/(26
+6*33^(1/2))^(1/3)+4/3)*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/3+1/2*I*3^(1/2)*(-1/3*(26+6*3
3^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(1/6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3-1/2*I*3^(1
/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(
1/3)-1/3))^(1/2)/(1/2*(26+6*33^(1/2))^(1/3)-4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-
8/3/(26+6*33^(1/2))^(1/3)))/(-1/3*(26+6*33^(1/2))^(1/3)+8/3/(26+6*33^(1/2))^(1/3)+4/3)/((1+x)*(x+1/3*(26+6*33^
(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3)*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/3-1/2*I*3
^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2)
)^(1/3)-1/3+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))))^(1/2)*((-1/3*(26+6*33^(1/2)
)^(1/3)+8/3/(26+6*33^(1/2))^(1/3)+1/3)*EllipticF(((1/2*(26+6*33^(1/2))^(1/3)-4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(
1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(1+x)/(1/6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/
2))^(1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/3*(26+6*33^(1/2))^(1/
3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2),((-1/2*(26+6*33^(1/2))^(1/3)+4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-
1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3
)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(2
6+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(-1/2*(26+6*33^(1/2)
)^(1/3)+4/(26+6*33^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))))^(1/2))+
(-4/3+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))*EllipticPi(((1/2*(26+6*33^(1/2))^(1/3)-4/(26+6*33^(
1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(1+x)/(1/6*(26+6*33^(1/2))^(
1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/
3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2),(1/6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^(
1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(1/2*(26+6*33^(1/2))^(1/3)-4/(2
6+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))),((-1/2*(26+6*33^(1/2
))^(1/3)+4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(-4/3-1
/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2
))^(1/3)))/(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)
-8/3/(26+6*33^(1/2))^(1/3)))/(-1/2*(26+6*33^(1/2))^(1/3)+4/(26+6*33^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^
(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))))^(1/2)))+2/3*((1+x)*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^
(1/3)-1/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(x-1/6*(26+6*33^(1/2))^(1/3)+4
/3/(26+6*33^(1/2))^(1/3)-1/3+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))+(-4/3-1/6*(
26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(
1/3)))*((1/2*(26+6*33^(1/2))^(1/3)-4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6
*33^(1/2))^(1/3)))*(1+x)/(1/6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33
^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2)*(
x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3)^2*((-1/3*(26+6*33^(1/2))^(1/3)+8/3/(26+6*33^(1/2))^
(1/3)+4/3)*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3
)-8/3/(26+6*33^(1/2))^(1/3)))/(1/6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^(1/3)+4/3+1/2*I*3^(1/2)*(-1/3*(26
+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1
/2)*((-1/3*(26+6*33^(1/2))^(1/3)+8/3/(26+6*33^(1/2))^(1/3)+4/3)*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2
))^(1/3)-1/3+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(1/6*(26+6*33^(1/2))^(1/3)-
4/3/(26+6*33^(1/2))^(1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/3*(26
+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2)*((1/2*(26+6*33^(1/2))^(1/3)-4/(26+6*33^(1/2))^(1/3)-1
/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))+(1/6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1
/2))^(1/3)+1/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(-1/3*(26+6*33^(1/2))^(1/
3)+8/3/(26+6*33^(1/2))^(1/3)+1/3)+(-1/3*(26+6*33^(1/2))^(1/3)+8/3/(26+6*33^(1/2))^(1/3)+1/3)^2)/(1/2*(26+6*33^
(1/2))^(1/3)-4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(-1
/3*(26+6*33^(1/2))^(1/3)+8/3/(26+6*33^(1/2))^(1/3)+4/3)*EllipticF(((1/2*(26+6*33^(1/2))^(1/3)-4/(26+6*33^(1/2)
)^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(1+x)/(1/6*(26+6*33^(1/2))^(1/3)
-4/3/(26+6*33^(1/2))^(1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/3*(2
6+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2),((-1/2*(26+6*33^(1/2))^(1/3)+4/(26+6*33^(1/2))^(1/3)
-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26
+6*33^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(-4/3-1/6*(26+6*33^(1
/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(-1
/2*(26+6*33^(1/2))^(1/3)+4/(26+6*33^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))
^(1/3))))^(1/2))+(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))
^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*EllipticE(((1/2*(26+6*33^(1/2))^(1/3)-4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)
*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(1+x)/(1/6*(26+6*33^(1/2))^(1/3)-4/3/(26+6*33^(1/2))^
(1/3)+4/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(x+1/3*(26+6*33^(1/2))^(1/3)-8
/3/(26+6*33^(1/2))^(1/3)-1/3))^(1/2),((-1/2*(26+6*33^(1/2))^(1/3)+4/(26+6*33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*
(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)+1/
2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(-4/3-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*
33^(1/2))^(1/3)-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3)))/(-1/2*(26+6*33^(1/2))^(1
/3)+4/(26+6*33^(1/2))^(1/3)+1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))))^(1/2))/(-1/
3*(26+6*33^(1/2))^(1/3)+8/3/(26+6*33^(1/2))^(1/3)+4/3)))/((1+x)*(x+1/3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2
))^(1/3)-1/3)*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/3-1/2*I*3^(1/2)*(-1/3*(26+6*33^(1/2))^(
1/3)-8/3/(26+6*33^(1/2))^(1/3)))*(x-1/6*(26+6*33^(1/2))^(1/3)+4/3/(26+6*33^(1/2))^(1/3)-1/3+1/2*I*3^(1/2)*(-1/
3*(26+6*33^(1/2))^(1/3)-8/3/(26+6*33^(1/2))^(1/3))))^(1/2))

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

Fricas [F]  time = 0., size = 0, normalized size = 0. \begin{align*}{\rm integral}\left (2 \, \sqrt{2} x - \sqrt{2} \sqrt{x^{4} + 2 \, x^{2} + 4 \, x + 1} - x, x\right ) \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

integral(2*sqrt(2)*x - sqrt(2)*sqrt(x^4 + 2*x^2 + 4*x + 1) - x, x)

________________________________________________________________________________________

Sympy [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \left (x \left (-1 + 2 \sqrt{2}\right ) - \sqrt{2} \sqrt{x^{4} + 2 x^{2} + 4 x + 1}\right )\, dx \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

Integral(x*(-1 + 2*sqrt(2)) - sqrt(2)*sqrt(x**4 + 2*x**2 + 4*x + 1), x)

________________________________________________________________________________________

Giac [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int x{\left (2 \, \sqrt{2} - 1\right )} - \sqrt{2} \sqrt{x^{4} + 2 \, x^{2} + 4 \, x + 1}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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