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

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

________________________________________________________________________________________

Rubi [C]  time = 5.08, antiderivative size = 1650, normalized size of antiderivative = 13.20, number of steps used = 55, number of rules used = 19, integrand size = 24, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.792, Rules used = {2056, 6725, 918, 6733, 1716, 1187, 1098, 1184, 1214, 1456, 540, 421, 419, 538, 537, 1712, 1700, 1698, 205}

result too large to display

Warning: Unable to verify antiderivative.

[In]

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

[Out]

-1/4*(Sqrt[1 - 2*I]*Sqrt[-x - x^2 + x^3]*ArcTan[(Sqrt[1 - 2*I]*Sqrt[x])/Sqrt[-1 - x + x^2]])/(Sqrt[x]*Sqrt[-1
- x + x^2]) - (Sqrt[1 + 2*I]*Sqrt[-x - x^2 + x^3]*ArcTan[(Sqrt[1 + 2*I]*Sqrt[x])/Sqrt[-1 - x + x^2]])/(4*Sqrt[
x]*Sqrt[-1 - x + x^2]) + ((1 + Sqrt[5])*Sqrt[-1 + Sqrt[5] + 2*x]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*Sqrt[-x - x^2 +
x^3]*EllipticF[ArcSin[Sqrt[2/(1 + Sqrt[5])]*Sqrt[x]], (-3 - Sqrt[5])/2])/(2*Sqrt[2]*(1 - Sqrt[5])*Sqrt[x]*(1
+ x - x^2)) + ((1 + Sqrt[5])*Sqrt[-1 + Sqrt[5] + 2*x]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*Sqrt[-x - x^2 + x^3]*Ellip
ticF[ArcSin[Sqrt[2/(1 + Sqrt[5])]*Sqrt[x]], (-3 - Sqrt[5])/2])/(2*Sqrt[2]*(3 + Sqrt[5])*Sqrt[x]*(1 + x - x^2))
- (Sqrt[-2 - (1 - Sqrt[5])*x]*Sqrt[(2 + (1 + Sqrt[5])*x)/(2 + (1 - Sqrt[5])*x)]*Sqrt[-x - x^2 + x^3]*Elliptic
F[ArcSin[(Sqrt[2]*5^(1/4)*Sqrt[x])/Sqrt[-2 - (1 - Sqrt[5])*x]], (5 - Sqrt[5])/10])/(12*5^(1/4)*Sqrt[x]*Sqrt[(2
+ (1 - Sqrt[5])*x)^(-1)]*(1 + x - x^2)) - (Sqrt[-2 - (1 - Sqrt[5])*x]*Sqrt[(2 + (1 + Sqrt[5])*x)/(2 + (1 - Sq
rt[5])*x)]*Sqrt[-x - x^2 + x^3]*EllipticF[ArcSin[(Sqrt[2]*5^(1/4)*Sqrt[x])/Sqrt[-2 - (1 - Sqrt[5])*x]], (5 - S
qrt[5])/10])/(2*5^(1/4)*(1 - Sqrt[5])*Sqrt[x]*Sqrt[(2 + (1 - Sqrt[5])*x)^(-1)]*(1 + x - x^2)) + ((1 - Sqrt[5])
*Sqrt[-2 - (1 - Sqrt[5])*x]*Sqrt[(2 + (1 + Sqrt[5])*x)/(2 + (1 - Sqrt[5])*x)]*Sqrt[-x - x^2 + x^3]*EllipticF[A
rcSin[(Sqrt[2]*5^(1/4)*Sqrt[x])/Sqrt[-2 - (1 - Sqrt[5])*x]], (5 - Sqrt[5])/10])/(4*5^(1/4)*Sqrt[x]*Sqrt[(2 + (
1 - Sqrt[5])*x)^(-1)]*(1 + x - x^2)) + ((1/8 - I/24)*((1 - 2*I) + Sqrt[5])*Sqrt[-2 - (1 - Sqrt[5])*x]*Sqrt[(2
+ (1 + Sqrt[5])*x)/(2 + (1 - Sqrt[5])*x)]*Sqrt[-x - x^2 + x^3]*EllipticF[ArcSin[(Sqrt[2]*5^(1/4)*Sqrt[x])/Sqrt
[-2 - (1 - Sqrt[5])*x]], (5 - Sqrt[5])/10])/(5^(1/4)*Sqrt[x]*Sqrt[(2 + (1 - Sqrt[5])*x)^(-1)]*(1 + x - x^2)) +
((1/8 + I/24)*((1 + 2*I) + Sqrt[5])*Sqrt[-2 - (1 - Sqrt[5])*x]*Sqrt[(2 + (1 + Sqrt[5])*x)/(2 + (1 - Sqrt[5])*
x)]*Sqrt[-x - x^2 + x^3]*EllipticF[ArcSin[(Sqrt[2]*5^(1/4)*Sqrt[x])/Sqrt[-2 - (1 - Sqrt[5])*x]], (5 - Sqrt[5])
/10])/(5^(1/4)*Sqrt[x]*Sqrt[(2 + (1 - Sqrt[5])*x)^(-1)]*(1 + x - x^2)) - (Sqrt[-2 - (1 - Sqrt[5])*x]*Sqrt[(2 +
(1 + Sqrt[5])*x)/(2 + (1 - Sqrt[5])*x)]*Sqrt[-x - x^2 + x^3]*EllipticF[ArcSin[(Sqrt[2]*5^(1/4)*Sqrt[x])/Sqrt[
-2 - (1 - Sqrt[5])*x]], (5 - Sqrt[5])/10])/(2*5^(1/4)*(3 + Sqrt[5])*Sqrt[x]*Sqrt[(2 + (1 - Sqrt[5])*x)^(-1)]*(
1 + x - x^2)) - ((2 + Sqrt[5])*Sqrt[-1 + Sqrt[5] + 2*x]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*Sqrt[-x - x^2 + x^3]*Ell
ipticPi[(-1 - Sqrt[5])/2, ArcSin[Sqrt[2/(1 + Sqrt[5])]*Sqrt[x]], (-3 - Sqrt[5])/2])/(Sqrt[2]*(3 + Sqrt[5])*Sqr
t[x]*(1 + x - x^2)) + (Sqrt[-1 + Sqrt[5] + 2*x]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*Sqrt[-x - x^2 + x^3]*EllipticPi[
(1 + Sqrt[5])/2, ArcSin[Sqrt[2/(1 + Sqrt[5])]*Sqrt[x]], (-3 - Sqrt[5])/2])/(Sqrt[2]*(1 - Sqrt[5])*Sqrt[x]*(1 +
x - x^2))

Rule 205

Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(Rt[a/b, 2]*ArcTan[x/Rt[a/b, 2]])/a, x] /; FreeQ[{a, b}, x]
&& PosQ[a/b]

Rule 419

Int[1/(Sqrt[(a_) + (b_.)*(x_)^2]*Sqrt[(c_) + (d_.)*(x_)^2]), x_Symbol] :> Simp[(1*EllipticF[ArcSin[Rt[-(d/c),
2]*x], (b*c)/(a*d)])/(Sqrt[a]*Sqrt[c]*Rt[-(d/c), 2]), x] /; FreeQ[{a, b, c, d}, x] && NegQ[d/c] && GtQ[c, 0] &
& GtQ[a, 0] &&  !(NegQ[b/a] && SimplerSqrtQ[-(b/a), -(d/c)])

Rule 421

Int[1/(Sqrt[(a_) + (b_.)*(x_)^2]*Sqrt[(c_) + (d_.)*(x_)^2]), x_Symbol] :> Dist[Sqrt[1 + (d*x^2)/c]/Sqrt[c + d*
x^2], Int[1/(Sqrt[a + b*x^2]*Sqrt[1 + (d*x^2)/c]), x], x] /; FreeQ[{a, b, c, d}, x] &&  !GtQ[c, 0]

Rule 537

Int[1/(((a_) + (b_.)*(x_)^2)*Sqrt[(c_) + (d_.)*(x_)^2]*Sqrt[(e_) + (f_.)*(x_)^2]), x_Symbol] :> Simp[(1*Ellipt
icPi[(b*c)/(a*d), ArcSin[Rt[-(d/c), 2]*x], (c*f)/(d*e)])/(a*Sqrt[c]*Sqrt[e]*Rt[-(d/c), 2]), x] /; FreeQ[{a, b,
c, d, e, f}, x] &&  !GtQ[d/c, 0] && GtQ[c, 0] && GtQ[e, 0] &&  !( !GtQ[f/e, 0] && SimplerSqrtQ[-(f/e), -(d/c)
])

Rule 538

Int[1/(((a_) + (b_.)*(x_)^2)*Sqrt[(c_) + (d_.)*(x_)^2]*Sqrt[(e_) + (f_.)*(x_)^2]), x_Symbol] :> Dist[Sqrt[1 +
(d*x^2)/c]/Sqrt[c + d*x^2], Int[1/((a + b*x^2)*Sqrt[1 + (d*x^2)/c]*Sqrt[e + f*x^2]), x], x] /; FreeQ[{a, b, c,
d, e, f}, x] &&  !GtQ[c, 0]

Rule 540

Int[Sqrt[(c_) + (d_.)*(x_)^2]/(((a_) + (b_.)*(x_)^2)*Sqrt[(e_) + (f_.)*(x_)^2]), x_Symbol] :> Dist[d/b, Int[1/
(Sqrt[c + d*x^2]*Sqrt[e + f*x^2]), x], x] + Dist[(b*c - a*d)/b, Int[1/((a + b*x^2)*Sqrt[c + d*x^2]*Sqrt[e + f*
x^2]), x], x] /; FreeQ[{a, b, c, d, e, f}, x] && NegQ[d/c]

Rule 918

Int[((d_.) + (e_.)*(x_))^(m_.)*Sqrt[(f_.) + (g_.)*(x_)]*Sqrt[(a_.) + (b_.)*(x_) + (c_.)*(x_)^2], x_Symbol] :>
Simp[(2*(d + e*x)^(m + 1)*Sqrt[f + g*x]*Sqrt[a + b*x + c*x^2])/(e*(2*m + 5)), x] - Dist[1/(e*(2*m + 5)), Int[(
(d + e*x)^m*Simp[b*d*f - 3*a*e*f + a*d*g + 2*(c*d*f - b*e*f + b*d*g - a*e*g)*x - (c*e*f - 3*c*d*g + b*e*g)*x^2
, x])/(Sqrt[f + g*x]*Sqrt[a + b*x + c*x^2]), x], x] /; FreeQ[{a, b, c, d, e, f, g, m}, x] && NeQ[e*f - d*g, 0]
&& NeQ[b^2 - 4*a*c, 0] && NeQ[c*d^2 - b*d*e + a*e^2, 0] && IntegerQ[2*m] &&  !LtQ[m, -1]

Rule 1098

Int[1/Sqrt[(a_) + (b_.)*(x_)^2 + (c_.)*(x_)^4], x_Symbol] :> With[{q = Rt[b^2 - 4*a*c, 2]}, Simp[(Sqrt[(2*a +
(b - q)*x^2)/(2*a + (b + q)*x^2)]*Sqrt[(2*a + (b + q)*x^2)/q]*EllipticF[ArcSin[x/Sqrt[(2*a + (b + q)*x^2)/(2*q
)]], (b + q)/(2*q)])/(2*Sqrt[a + b*x^2 + c*x^4]*Sqrt[a/(2*a + (b + q)*x^2)]), x]] /; FreeQ[{a, b, c}, x] && Gt
Q[b^2 - 4*a*c, 0] && LtQ[a, 0] && GtQ[c, 0]

Rule 1184

Int[((d_) + (e_.)*(x_)^2)/Sqrt[(a_) + (b_.)*(x_)^2 + (c_.)*(x_)^4], x_Symbol] :> With[{q = Rt[b^2 - 4*a*c, 2]}
, Simp[(e*x*(b + q + 2*c*x^2))/(2*c*Sqrt[a + b*x^2 + c*x^4]), x] - Simp[(e*q*Sqrt[(2*a + (b - q)*x^2)/(2*a + (
b + q)*x^2)]*Sqrt[(2*a + (b + q)*x^2)/q]*EllipticE[ArcSin[x/Sqrt[(2*a + (b + q)*x^2)/(2*q)]], (b + q)/(2*q)])/
(2*c*Sqrt[a + b*x^2 + c*x^4]*Sqrt[a/(2*a + (b + q)*x^2)]), x] /; EqQ[2*c*d - e*(b - q), 0]] /; FreeQ[{a, b, c,
d, e}, x] && GtQ[b^2 - 4*a*c, 0] && LtQ[a, 0] && GtQ[c, 0]

Rule 1187

Int[((d_) + (e_.)*(x_)^2)/Sqrt[(a_) + (b_.)*(x_)^2 + (c_.)*(x_)^4], x_Symbol] :> With[{q = Rt[b^2 - 4*a*c, 2]}
, Dist[(2*c*d - e*(b - q))/(2*c), Int[1/Sqrt[a + b*x^2 + c*x^4], x], x] + Dist[e/(2*c), Int[(b - q + 2*c*x^2)/
Sqrt[a + b*x^2 + c*x^4], x], x] /; NeQ[2*c*d - e*(b - q), 0]] /; FreeQ[{a, b, c, d, e}, x] && GtQ[b^2 - 4*a*c,
0] && LtQ[a, 0] && GtQ[c, 0]

Rule 1214

Int[1/(((d_) + (e_.)*(x_)^2)*Sqrt[(a_) + (b_.)*(x_)^2 + (c_.)*(x_)^4]), x_Symbol] :> With[{q = Rt[b^2 - 4*a*c,
2]}, Dist[(2*c)/(2*c*d - e*(b - q)), Int[1/Sqrt[a + b*x^2 + c*x^4], x], x] - Dist[e/(2*c*d - e*(b - q)), Int[
(b - q + 2*c*x^2)/((d + e*x^2)*Sqrt[a + b*x^2 + c*x^4]), x], x]] /; FreeQ[{a, b, c, d, e}, x] && GtQ[b^2 - 4*a
*c, 0] &&  !LtQ[c, 0]

Rule 1456

Int[((d_) + (e_.)*(x_)^(n_))^(q_.)*((f_) + (g_.)*(x_)^(n_))^(r_.)*((a_) + (b_.)*(x_)^(n_) + (c_.)*(x_)^(n2_))^
(p_), x_Symbol] :> Dist[(a + b*x^n + c*x^(2*n))^FracPart[p]/((d + e*x^n)^FracPart[p]*(a/d + (c*x^n)/e)^FracPar
t[p]), Int[(d + e*x^n)^(p + q)*(f + g*x^n)^r*(a/d + (c*x^n)/e)^p, x], x] /; FreeQ[{a, b, c, d, e, f, g, n, p,
q, r}, x] && EqQ[n2, 2*n] && NeQ[b^2 - 4*a*c, 0] && EqQ[c*d^2 - b*d*e + a*e^2, 0] &&  !IntegerQ[p]

Rule 1698

Int[((A_) + (B_.)*(x_)^2)/(((d_) + (e_.)*(x_)^2)*Sqrt[(a_) + (b_.)*(x_)^2 + (c_.)*(x_)^4]), x_Symbol] :> Dist[
A, Subst[Int[1/(d - (b*d - 2*a*e)*x^2), x], x, x/Sqrt[a + b*x^2 + c*x^4]], x] /; FreeQ[{a, b, c, d, e, A, B},
x] && NeQ[b^2 - 4*a*c, 0] && NeQ[c*d^2 - b*d*e + a*e^2, 0] && EqQ[c*d^2 - a*e^2, 0] && EqQ[B*d + A*e, 0]

Rule 1700

Int[((A_) + (B_.)*(x_)^2)/(((d_) + (e_.)*(x_)^2)*Sqrt[(a_) + (b_.)*(x_)^2 + (c_.)*(x_)^4]), x_Symbol] :> Dist[
(B*d + A*e)/(2*d*e), Int[1/Sqrt[a + b*x^2 + c*x^4], x], x] - Dist[(B*d - A*e)/(2*d*e), Int[(d - e*x^2)/((d + e
*x^2)*Sqrt[a + b*x^2 + c*x^4]), x], x] /; FreeQ[{a, b, c, d, e, A, B}, x] && NeQ[b^2 - 4*a*c, 0] && NeQ[c*d^2
- b*d*e + a*e^2, 0] && EqQ[c*d^2 - a*e^2, 0] && NeQ[B*d + A*e, 0]

Rule 1712

Int[(P4x_)/(((d_) + (e_.)*(x_)^2)*Sqrt[(a_) + (b_.)*(x_)^2 + (c_.)*(x_)^4]), x_Symbol] :> With[{A = Coeff[P4x,
x, 0], B = Coeff[P4x, x, 2], C = Coeff[P4x, x, 4]}, -Dist[C/e^2, Int[(d - e*x^2)/Sqrt[a + b*x^2 + c*x^4], x],
x] + Dist[1/e^2, Int[(C*d^2 + A*e^2 + B*e^2*x^2)/((d + e*x^2)*Sqrt[a + b*x^2 + c*x^4]), x], x]] /; FreeQ[{a,
b, c, d, e}, x] && PolyQ[P4x, x^2, 2] && NeQ[b^2 - 4*a*c, 0] && NeQ[c*d^2 - b*d*e + a*e^2, 0] && EqQ[c*d^2 - a
*e^2, 0]

Rule 1716

Int[(P4x_)/(((d_) + (e_.)*(x_)^2)*Sqrt[(a_) + (b_.)*(x_)^2 + (c_.)*(x_)^4]), x_Symbol] :> With[{A = Coeff[P4x,
x, 0], B = Coeff[P4x, x, 2], C = Coeff[P4x, x, 4]}, -Dist[(e^2)^(-1), Int[(C*d - B*e - C*e*x^2)/Sqrt[a + b*x^
2 + c*x^4], x], x] + Dist[(C*d^2 - B*d*e + A*e^2)/e^2, Int[1/((d + e*x^2)*Sqrt[a + b*x^2 + c*x^4]), x], x]] /;
FreeQ[{a, b, c, d, e}, x] && PolyQ[P4x, x^2, 2] && NeQ[b^2 - 4*a*c, 0] && NeQ[c*d^2 - b*d*e + a*e^2, 0] && Ne
Q[c*d^2 - a*e^2, 0]

Rule 2056

Int[(u_.)*(P_)^(p_.), x_Symbol] :> With[{m = MinimumMonomialExponent[P, x]}, Dist[P^FracPart[p]/(x^(m*FracPart
[p])*Distrib[1/x^m, P]^FracPart[p]), Int[u*x^(m*p)*Distrib[1/x^m, P]^p, x], x]] /; FreeQ[p, x] &&  !IntegerQ[p
] && SumQ[P] && EveryQ[BinomialQ[#1, x] & , P] &&  !PolyQ[P, x, 2]

Rule 6725

Int[(u_)/((a_) + (b_.)*(x_)^(n_)), x_Symbol] :> With[{v = RationalFunctionExpand[u/(a + b*x^n), x]}, Int[v, x]
/; SumQ[v]] /; FreeQ[{a, b}, x] && IGtQ[n, 0]

Rule 6733

Int[(u_)*(x_)^(m_), x_Symbol] :> With[{k = Denominator[m]}, Dist[k, Subst[Int[x^(k*(m + 1) - 1)*(u /. x -> x^k
), x], x, x^(1/k)], x]] /; FractionQ[m]

Rubi steps

\begin {align*} \int \frac {\sqrt {-x-x^2+x^3}}{-1+x^4} \, dx &=\frac {\sqrt {-x-x^2+x^3} \int \frac {\sqrt {x} \sqrt {-1-x+x^2}}{-1+x^4} \, dx}{\sqrt {x} \sqrt {-1-x+x^2}}\\ &=\frac {\sqrt {-x-x^2+x^3} \int \left (-\frac {\sqrt {x} \sqrt {-1-x+x^2}}{2 \left (1-x^2\right )}-\frac {\sqrt {x} \sqrt {-1-x+x^2}}{2 \left (1+x^2\right )}\right ) \, dx}{\sqrt {x} \sqrt {-1-x+x^2}}\\ &=-\frac {\sqrt {-x-x^2+x^3} \int \frac {\sqrt {x} \sqrt {-1-x+x^2}}{1-x^2} \, dx}{2 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-x-x^2+x^3} \int \frac {\sqrt {x} \sqrt {-1-x+x^2}}{1+x^2} \, dx}{2 \sqrt {x} \sqrt {-1-x+x^2}}\\ &=-\frac {\sqrt {-x-x^2+x^3} \int \left (\frac {i \sqrt {x} \sqrt {-1-x+x^2}}{2 (i-x)}+\frac {i \sqrt {x} \sqrt {-1-x+x^2}}{2 (i+x)}\right ) \, dx}{2 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-x-x^2+x^3} \int \left (\frac {\sqrt {x} \sqrt {-1-x+x^2}}{2 (1-x)}+\frac {\sqrt {x} \sqrt {-1-x+x^2}}{2 (1+x)}\right ) \, dx}{2 \sqrt {x} \sqrt {-1-x+x^2}}\\ &=-\frac {\left (i \sqrt {-x-x^2+x^3}\right ) \int \frac {\sqrt {x} \sqrt {-1-x+x^2}}{i-x} \, dx}{4 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\left (i \sqrt {-x-x^2+x^3}\right ) \int \frac {\sqrt {x} \sqrt {-1-x+x^2}}{i+x} \, dx}{4 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-x-x^2+x^3} \int \frac {\sqrt {x} \sqrt {-1-x+x^2}}{1-x} \, dx}{4 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-x-x^2+x^3} \int \frac {\sqrt {x} \sqrt {-1-x+x^2}}{1+x} \, dx}{4 \sqrt {x} \sqrt {-1-x+x^2}}\\ &=-\frac {\left (i \sqrt {-x-x^2+x^3}\right ) \int \frac {-i-(2+2 i) x-(1-3 i) x^2}{(i-x) \sqrt {x} \sqrt {-1-x+x^2}} \, dx}{12 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\left (i \sqrt {-x-x^2+x^3}\right ) \int \frac {-i+(2-2 i) x+(1+3 i) x^2}{\sqrt {x} (i+x) \sqrt {-1-x+x^2}} \, dx}{12 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-x-x^2+x^3} \int \frac {-1-4 x+2 x^2}{(1-x) \sqrt {x} \sqrt {-1-x+x^2}} \, dx}{12 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \int \frac {-1+4 x^2}{\sqrt {x} (1+x) \sqrt {-1-x+x^2}} \, dx}{12 \sqrt {x} \sqrt {-1-x+x^2}}\\ &=-\frac {\left (i \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {-i-(2+2 i) x^2-(1-3 i) x^4}{\left (i-x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\left (i \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {-i+(2-2 i) x^2+(1+3 i) x^4}{\left (i+x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {-1-4 x^2+2 x^4}{\left (1-x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {-1+4 x^4}{\left (1+x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}\\ &=-\frac {\left (i \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {(1-4 i)-(2+2 i) x^2}{\left (i-x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\left (i \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {(-1-4 i)+(2-2 i) x^2}{\left (i+x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {4-4 x^2}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {-2+2 x^2}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {1}{\left (1-x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{2 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {1}{\left (1+x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{2 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\left (\left (\frac {1}{2}-\frac {i}{6}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {i-x^2}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}-\frac {\left (\left (\frac {1}{2}+\frac {i}{6}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {i+x^2}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}\\ &=-\frac {\left (\left (\frac {1}{4}-\frac {i}{12}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {-1-\sqrt {5}+2 x^2}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}+-\frac {\left (\left (\frac {1}{4}+\frac {i}{2}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {i-x^2}{\left (i+x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}--\frac {\left (\left (\frac {1}{12}+\frac {i}{6}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}+\frac {\left (\left (\frac {1}{12}-\frac {i}{6}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {-1-\sqrt {5}+2 x^2}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\left (\left (\frac {1}{4}+\frac {i}{12}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {-1-\sqrt {5}+2 x^2}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}-\frac {\left (\left (\frac {1}{4}-\frac {i}{2}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {i+x^2}{\left (i-x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {-1-\sqrt {5}+2 x^2}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{3 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\left (\left (\frac {1}{4}-\frac {i}{12}\right ) \left ((-1+2 i)-\sqrt {5}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {-1-\sqrt {5}+2 x^2}{\left (1-x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{2 \left (1-\sqrt {5}\right ) \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {1}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\left (1-\sqrt {5}\right ) \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\left (\left (1-\sqrt {5}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{6 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\left (\left (1-\sqrt {5}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{3 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\left (\left (\frac {1}{4}+\frac {i}{12}\right ) \left ((1+2 i)+\sqrt {5}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {-1-\sqrt {5}+2 x^2}{\left (1+x^2\right ) \sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{2 \left (3+\sqrt {5}\right ) \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\sqrt {-x-x^2+x^3} \operatorname {Subst}\left (\int \frac {1}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\left (3+\sqrt {5}\right ) \sqrt {x} \sqrt {-1-x+x^2}}\\ &=-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{12 \sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{2 \sqrt [4]{5} \left (1-\sqrt {5}\right ) \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (1-\sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{4 \sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\left (\frac {1}{24}+\frac {i}{8}\right ) \left ((2+i)+i \sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{\sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (\frac {1}{8}+\frac {i}{24}\right ) \left ((1+2 i)+\sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{\sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{2 \sqrt [4]{5} \left (3+\sqrt {5}\right ) \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (\sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {\sqrt {-1-\sqrt {5}+2 x^2}}{\left (1-x^2\right ) \sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}}} \, dx,x,\sqrt {x}\right )}{4 \left (1-\sqrt {5}\right ) \sqrt {x} \left (-1-x+x^2\right )}-\frac {\left (\sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {\sqrt {-1-\sqrt {5}+2 x^2}}{\sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}} \left (1+x^2\right )} \, dx,x,\sqrt {x}\right )}{4 \left (3+\sqrt {5}\right ) \sqrt {x} \left (-1-x+x^2\right )}+\frac {\left (\left (\frac {1}{2}-\frac {i}{4}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{i-(2-i) x^2} \, dx,x,\frac {\sqrt {x}}{\sqrt {-1-x+x^2}}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}-\frac {\left (\left (\frac {1}{2}+\frac {i}{4}\right ) \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{i+(2+i) x^2} \, dx,x,\frac {\sqrt {x}}{\sqrt {-1-x+x^2}}\right )}{\sqrt {x} \sqrt {-1-x+x^2}}\\ &=-\frac {\sqrt {1-2 i} \sqrt {-x-x^2+x^3} \tan ^{-1}\left (\frac {\sqrt {1-2 i} \sqrt {x}}{\sqrt {-1-x+x^2}}\right )}{4 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {1+2 i} \sqrt {-x-x^2+x^3} \tan ^{-1}\left (\frac {\sqrt {1+2 i} \sqrt {x}}{\sqrt {-1-x+x^2}}\right )}{4 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{12 \sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{2 \sqrt [4]{5} \left (1-\sqrt {5}\right ) \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (1-\sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{4 \sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\left (\frac {1}{24}+\frac {i}{8}\right ) \left ((2+i)+i \sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{\sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (\frac {1}{8}+\frac {i}{24}\right ) \left ((1+2 i)+\sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{\sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{2 \sqrt [4]{5} \left (3+\sqrt {5}\right ) \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (\sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (1-x^2\right ) \sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}} \sqrt {-1-\sqrt {5}+2 x^2}} \, dx,x,\sqrt {x}\right )}{4 \sqrt {x} \left (-1-x+x^2\right )}-\frac {\left (\sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}} \sqrt {-1-\sqrt {5}+2 x^2}} \, dx,x,\sqrt {x}\right )}{2 \left (1-\sqrt {5}\right ) \sqrt {x} \left (-1-x+x^2\right )}-\frac {\left (\sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}} \sqrt {-1-\sqrt {5}+2 x^2}} \, dx,x,\sqrt {x}\right )}{2 \left (3+\sqrt {5}\right ) \sqrt {x} \left (-1-x+x^2\right )}-\frac {\left (\left (-3-\sqrt {5}\right ) \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}} \left (1+x^2\right ) \sqrt {-1-\sqrt {5}+2 x^2}} \, dx,x,\sqrt {x}\right )}{4 \left (3+\sqrt {5}\right ) \sqrt {x} \left (-1-x+x^2\right )}\\ &=-\frac {\sqrt {1-2 i} \sqrt {-x-x^2+x^3} \tan ^{-1}\left (\frac {\sqrt {1-2 i} \sqrt {x}}{\sqrt {-1-x+x^2}}\right )}{4 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {1+2 i} \sqrt {-x-x^2+x^3} \tan ^{-1}\left (\frac {\sqrt {1+2 i} \sqrt {x}}{\sqrt {-1-x+x^2}}\right )}{4 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{12 \sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{2 \sqrt [4]{5} \left (1-\sqrt {5}\right ) \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (1-\sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{4 \sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\left (\frac {1}{24}+\frac {i}{8}\right ) \left ((2+i)+i \sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{\sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (\frac {1}{8}+\frac {i}{24}\right ) \left ((1+2 i)+\sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{\sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{2 \sqrt [4]{5} \left (3+\sqrt {5}\right ) \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (\sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (1-x^2\right ) \sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}} \sqrt {1+\frac {2 x^2}{-1-\sqrt {5}}}} \, dx,x,\sqrt {x}\right )}{4 \sqrt {x} \left (-1-x+x^2\right )}-\frac {\left (\sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}} \sqrt {1+\frac {2 x^2}{-1-\sqrt {5}}}} \, dx,x,\sqrt {x}\right )}{2 \left (1-\sqrt {5}\right ) \sqrt {x} \left (-1-x+x^2\right )}-\frac {\left (\sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}} \sqrt {1+\frac {2 x^2}{-1-\sqrt {5}}}} \, dx,x,\sqrt {x}\right )}{2 \left (3+\sqrt {5}\right ) \sqrt {x} \left (-1-x+x^2\right )}-\frac {\left (\left (-3-\sqrt {5}\right ) \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \sqrt {-x-x^2+x^3}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-\frac {1}{-1-\sqrt {5}}+\frac {x^2}{2}} \left (1+x^2\right ) \sqrt {1+\frac {2 x^2}{-1-\sqrt {5}}}} \, dx,x,\sqrt {x}\right )}{4 \left (3+\sqrt {5}\right ) \sqrt {x} \left (-1-x+x^2\right )}\\ &=-\frac {\sqrt {1-2 i} \sqrt {-x-x^2+x^3} \tan ^{-1}\left (\frac {\sqrt {1-2 i} \sqrt {x}}{\sqrt {-1-x+x^2}}\right )}{4 \sqrt {x} \sqrt {-1-x+x^2}}-\frac {\sqrt {1+2 i} \sqrt {-x-x^2+x^3} \tan ^{-1}\left (\frac {\sqrt {1+2 i} \sqrt {x}}{\sqrt {-1-x+x^2}}\right )}{4 \sqrt {x} \sqrt {-1-x+x^2}}+\frac {\left (1+\sqrt {5}\right ) \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\sqrt {\frac {2}{1+\sqrt {5}}} \sqrt {x}\right )|\frac {1}{2} \left (-3-\sqrt {5}\right )\right )}{2 \sqrt {2} \left (1-\sqrt {5}\right ) \sqrt {x} \left (1+x-x^2\right )}+\frac {\left (1+\sqrt {5}\right ) \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\sqrt {\frac {2}{1+\sqrt {5}}} \sqrt {x}\right )|\frac {1}{2} \left (-3-\sqrt {5}\right )\right )}{2 \sqrt {2} \left (3+\sqrt {5}\right ) \sqrt {x} \left (1+x-x^2\right )}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{12 \sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{2 \sqrt [4]{5} \left (1-\sqrt {5}\right ) \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (1-\sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{4 \sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\left (\frac {1}{24}+\frac {i}{8}\right ) \left ((2+i)+i \sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{\sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}+\frac {\left (\frac {1}{8}+\frac {i}{24}\right ) \left ((1+2 i)+\sqrt {5}\right ) \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{\sqrt [4]{5} \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-2-\left (1-\sqrt {5}\right ) x}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{2 \sqrt [4]{5} \left (3+\sqrt {5}\right ) \sqrt {x} \sqrt {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \left (1+x-x^2\right )}-\frac {\left (1+\sqrt {5}\right ) \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \sqrt {-x-x^2+x^3} \Pi \left (\frac {1}{2} \left (-1-\sqrt {5}\right );\sin ^{-1}\left (\sqrt {\frac {2}{1+\sqrt {5}}} \sqrt {x}\right )|\frac {1}{2} \left (-3-\sqrt {5}\right )\right )}{4 \sqrt {2} \sqrt {x} \left (1+x-x^2\right )}-\frac {\left (1+\sqrt {5}\right ) \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \sqrt {-x-x^2+x^3} \Pi \left (\frac {1}{2} \left (1+\sqrt {5}\right );\sin ^{-1}\left (\sqrt {\frac {2}{1+\sqrt {5}}} \sqrt {x}\right )|\frac {1}{2} \left (-3-\sqrt {5}\right )\right )}{4 \sqrt {2} \sqrt {x} \left (1+x-x^2\right )}\\ \end {align*}

________________________________________________________________________________________

Mathematica [C]  time = 13.09, size = 2469, normalized size = 19.75 \begin {gather*} \text {Result too large to show} \end {gather*}

Warning: Unable to verify antiderivative.

[In]

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

[Out]

(2*(-1 + Sqrt[x])*(1 + Sqrt[x])*(1 + x)*(1 + x^2)*Sqrt[x*(-1 - x + x^2)]*(Sqrt[-1 - x + x^2]/(8*(-1 + Sqrt[x])
) - Sqrt[-1 - x + x^2]/(8*(1 + Sqrt[x])) + Sqrt[-1 - x + x^2]/(4*(1 + x)) - (x*Sqrt[-1 - x + x^2])/(2*(1 + x^2
)))*(((1/2 + I/4)*Sqrt[(-1 + Sqrt[5])/2]*Sqrt[1 - (2*x)/(1 - Sqrt[5])]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*EllipticP
i[(-1/2*I)*(1 - Sqrt[5]), I*ArcSinh[Sqrt[2/(-1 + Sqrt[5])]*Sqrt[x]], (1 - Sqrt[5])/(1 + Sqrt[5])])/Sqrt[-1 - x
+ x^2] - ((1/2 - I/4)*Sqrt[(-1 + Sqrt[5])/2]*Sqrt[1 - (2*x)/(1 - Sqrt[5])]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*Elli
pticPi[(I/2)*(1 - Sqrt[5]), I*ArcSinh[Sqrt[2/(-1 + Sqrt[5])]*Sqrt[x]], (1 - Sqrt[5])/(1 + Sqrt[5])])/Sqrt[-1 -
x + x^2] - ((I/4)*Sqrt[(-1 + Sqrt[5])/2]*Sqrt[1 - (2*x)/(1 - Sqrt[5])]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*Elliptic
Pi[(-1 + Sqrt[5])/2, I*ArcSinh[Sqrt[2/(-1 + Sqrt[5])]*Sqrt[x]], (1 - Sqrt[5])/(1 + Sqrt[5])])/Sqrt[-1 - x + x^
2] + ((I*(I*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[(1 + Sqrt[5])/2])*Sqrt[((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*(
Sqrt[2*(-1 + Sqrt[5])] - (2*I)*Sqrt[x]))/((Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] +
(2*I)*Sqrt[x]))]*((-I)*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[x])^2*Sqrt[(I*(-Sqrt[(1 + Sqrt[5])/2] + Sqrt[x]))/((I*Sq
rt[(-1 + Sqrt[5])/2] + Sqrt[(1 + Sqrt[5])/2])*((-I)*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[x]))]*Sqrt[(I*(Sqrt[(1 + Sqr
t[5])/2] + Sqrt[x]))/((I*Sqrt[(-1 + Sqrt[5])/2] - Sqrt[(1 + Sqrt[5])/2])*((-I)*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[x
]))]*((1 + I*Sqrt[(-1 + Sqrt[5])/2])*EllipticF[ArcSin[Sqrt[((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*(Sqrt[2
*(-1 + Sqrt[5])] - (2*I)*Sqrt[x]))/((Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] + (2*I)
*Sqrt[x]))]], (Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])^2/(Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])^2] - I*S
qrt[2*(-1 + Sqrt[5])]*EllipticPi[((-1 + I*Sqrt[(-1 + Sqrt[5])/2])*(I*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[(1 + Sqrt[5
])/2]))/((-1 - I*Sqrt[(-1 + Sqrt[5])/2])*((-I)*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[(1 + Sqrt[5])/2])), ArcSin[Sqrt[(
(Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] - (2*I)*Sqrt[x]))/((Sqrt[-1 + Sqrt[5]] - I*
Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] + (2*I)*Sqrt[x]))]], (Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])^2/(
Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])^2]))/((-1 - I*Sqrt[(-1 + Sqrt[5])/2])*(1 - I*Sqrt[(-1 + Sqrt[5])/2])
*(I*Sqrt[(-1 + Sqrt[5])/2] - Sqrt[(1 + Sqrt[5])/2])*Sqrt[-1 - x + x^2]) - (I*(I*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[
(1 + Sqrt[5])/2])*Sqrt[((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] - (2*I)*Sqrt[x]))/(
(Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] + (2*I)*Sqrt[x]))]*((-I)*Sqrt[(-1 + Sqrt[5]
)/2] + Sqrt[x])^2*Sqrt[(I*(-Sqrt[(1 + Sqrt[5])/2] + Sqrt[x]))/((I*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[(1 + Sqrt[5])/
2])*((-I)*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[x]))]*Sqrt[(I*(Sqrt[(1 + Sqrt[5])/2] + Sqrt[x]))/((I*Sqrt[(-1 + Sqrt[5
])/2] - Sqrt[(1 + Sqrt[5])/2])*((-I)*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[x]))]*((-1 + I*Sqrt[(-1 + Sqrt[5])/2])*Elli
pticF[ArcSin[Sqrt[((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] - (2*I)*Sqrt[x]))/((Sqrt
[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] + (2*I)*Sqrt[x]))]], (Sqrt[-1 + Sqrt[5]] - I*Sqr
t[1 + Sqrt[5]])^2/(Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])^2] - I*Sqrt[2*(-1 + Sqrt[5])]*EllipticPi[((1 + I*
Sqrt[(-1 + Sqrt[5])/2])*(I*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[(1 + Sqrt[5])/2]))/((1 - I*Sqrt[(-1 + Sqrt[5])/2])*((
-I)*Sqrt[(-1 + Sqrt[5])/2] + Sqrt[(1 + Sqrt[5])/2])), ArcSin[Sqrt[((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*
(Sqrt[2*(-1 + Sqrt[5])] - (2*I)*Sqrt[x]))/((Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])]
+ (2*I)*Sqrt[x]))]], (Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])^2/(Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])^2
]))/((-1 - I*Sqrt[(-1 + Sqrt[5])/2])*(1 - I*Sqrt[(-1 + Sqrt[5])/2])*(I*Sqrt[(-1 + Sqrt[5])/2] - Sqrt[(1 + Sqrt
[5])/2])*Sqrt[-1 - x + x^2]))/4))/(x^(3/2)*(-1 - x + x^2))

________________________________________________________________________________________

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

Antiderivative was successfully verified.

[In]

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

[Out]

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

________________________________________________________________________________________

fricas [B]  time = 1.50, size = 2484, normalized size = 19.87

result too large to display

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

-1/40*5^(3/4)*sqrt(2)*sqrt(sqrt(5) + 5)*arctan(-1/40*(20*x^11 + 260*x^10 - 1340*x^9 - 880*x^8 + 5680*x^7 + 280
*x^6 - 5680*x^5 - 880*x^4 + 1340*x^3 + 260*x^2 + sqrt(x^3 - x^2 - x)*(5^(3/4)*(sqrt(5)*sqrt(2)*(x^10 - 4*x^9 -
17*x^8 + 56*x^7 + 78*x^6 - 136*x^5 - 78*x^4 + 56*x^3 + 17*x^2 - 4*x - 1) - sqrt(2)*(x^10 + 8*x^9 - 57*x^8 - 2
4*x^7 + 294*x^6 + 64*x^5 - 294*x^4 - 24*x^3 + 57*x^2 + 8*x - 1)) + 4*5^(1/4)*(sqrt(5)*sqrt(2)*(3*x^9 + 7*x^8 +
14*x^7 - 81*x^6 - 10*x^5 + 81*x^4 + 14*x^3 - 7*x^2 + 3*x) - 5*sqrt(2)*(x^9 + 9*x^8 - 18*x^7 - 15*x^6 + 26*x^5
+ 15*x^4 - 18*x^3 - 9*x^2 + x)))*sqrt(sqrt(5) + 5) - sqrt(1/5)*(240*x^10 + 160*x^9 - 1680*x^8 - 480*x^7 + 320
0*x^6 + 480*x^5 - 1680*x^4 - 160*x^3 + 240*x^2 + sqrt(x^3 - x^2 - x)*(5^(3/4)*(sqrt(5)*sqrt(2)*(x^10 - 6*x^9 -
25*x^8 + 120*x^7 - 58*x^6 - 196*x^5 + 58*x^4 + 120*x^3 + 25*x^2 - 6*x - 1) - sqrt(2)*(x^10 - 2*x^9 - 17*x^8 +
216*x^7 - 306*x^6 - 396*x^5 + 306*x^4 + 216*x^3 + 17*x^2 - 2*x - 1)) + 4*5^(1/4)*(sqrt(5)*sqrt(2)*(3*x^9 - 3*
x^8 - 56*x^7 + 69*x^6 + 90*x^5 - 69*x^4 - 56*x^3 + 3*x^2 + 3*x) - 5*sqrt(2)*(x^9 + 3*x^8 - 28*x^7 + 11*x^6 + 5
4*x^5 - 11*x^4 - 28*x^3 - 3*x^2 + x)))*sqrt(sqrt(5) + 5) + 4*sqrt(5)*(5*x^11 - 25*x^10 - 105*x^9 + 440*x^8 + 5
0*x^7 - 830*x^6 - 50*x^5 + 440*x^4 + 105*x^3 - 25*x^2 - sqrt(5)*(x^11 + 3*x^10 - 37*x^9 + 96*x^8 - 6*x^7 - 166
*x^6 + 6*x^5 + 96*x^4 + 37*x^3 + 3*x^2 - x) - 5*x) - 80*sqrt(5)*(x^10 + 6*x^9 - 23*x^8 - 2*x^7 + 40*x^6 + 2*x^
5 - 23*x^4 - 6*x^3 + x^2))*sqrt((5*x^4 - 20*x^3 + 5^(1/4)*sqrt(x^3 - x^2 - x)*(sqrt(5)*sqrt(2)*(x^2 - 6*x - 1)
- 5*sqrt(2)*(x^2 - 2*x - 1))*sqrt(sqrt(5) + 5) + 30*x^2 + 20*sqrt(5)*(x^3 - x^2 - x) + 20*x + 5)/(x^4 + 2*x^2
+ 1)) + 4*sqrt(5)*(5*x^11 - 15*x^10 - 15*x^9 + 20*x^8 - 20*x^7 + 70*x^6 + 20*x^5 + 20*x^4 + 15*x^3 - 15*x^2 -
sqrt(5)*(x^11 + 13*x^10 - 67*x^9 - 44*x^8 + 284*x^7 + 14*x^6 - 284*x^5 - 44*x^4 + 67*x^3 + 13*x^2 - x) - 5*x)
- 20*sqrt(5)*(x^11 - 3*x^10 - 3*x^9 + 4*x^8 - 4*x^7 + 14*x^6 + 4*x^5 + 4*x^4 + 3*x^3 - 3*x^2 - x) - 20*x)/(x^
11 - 9*x^10 - 45*x^9 + 180*x^8 + 18*x^7 - 326*x^6 - 18*x^5 + 180*x^4 + 45*x^3 - 9*x^2 - x)) - 1/40*5^(3/4)*sqr
t(2)*sqrt(sqrt(5) + 5)*arctan(1/40*(20*x^11 + 260*x^10 - 1340*x^9 - 880*x^8 + 5680*x^7 + 280*x^6 - 5680*x^5 -
880*x^4 + 1340*x^3 + 260*x^2 - sqrt(x^3 - x^2 - x)*(5^(3/4)*(sqrt(5)*sqrt(2)*(x^10 - 4*x^9 - 17*x^8 + 56*x^7 +
78*x^6 - 136*x^5 - 78*x^4 + 56*x^3 + 17*x^2 - 4*x - 1) - sqrt(2)*(x^10 + 8*x^9 - 57*x^8 - 24*x^7 + 294*x^6 +
64*x^5 - 294*x^4 - 24*x^3 + 57*x^2 + 8*x - 1)) + 4*5^(1/4)*(sqrt(5)*sqrt(2)*(3*x^9 + 7*x^8 + 14*x^7 - 81*x^6 -
10*x^5 + 81*x^4 + 14*x^3 - 7*x^2 + 3*x) - 5*sqrt(2)*(x^9 + 9*x^8 - 18*x^7 - 15*x^6 + 26*x^5 + 15*x^4 - 18*x^3
- 9*x^2 + x)))*sqrt(sqrt(5) + 5) - sqrt(1/5)*(240*x^10 + 160*x^9 - 1680*x^8 - 480*x^7 + 3200*x^6 + 480*x^5 -
1680*x^4 - 160*x^3 + 240*x^2 - sqrt(x^3 - x^2 - x)*(5^(3/4)*(sqrt(5)*sqrt(2)*(x^10 - 6*x^9 - 25*x^8 + 120*x^7
- 58*x^6 - 196*x^5 + 58*x^4 + 120*x^3 + 25*x^2 - 6*x - 1) - sqrt(2)*(x^10 - 2*x^9 - 17*x^8 + 216*x^7 - 306*x^6
- 396*x^5 + 306*x^4 + 216*x^3 + 17*x^2 - 2*x - 1)) + 4*5^(1/4)*(sqrt(5)*sqrt(2)*(3*x^9 - 3*x^8 - 56*x^7 + 69*
x^6 + 90*x^5 - 69*x^4 - 56*x^3 + 3*x^2 + 3*x) - 5*sqrt(2)*(x^9 + 3*x^8 - 28*x^7 + 11*x^6 + 54*x^5 - 11*x^4 - 2
8*x^3 - 3*x^2 + x)))*sqrt(sqrt(5) + 5) + 4*sqrt(5)*(5*x^11 - 25*x^10 - 105*x^9 + 440*x^8 + 50*x^7 - 830*x^6 -
50*x^5 + 440*x^4 + 105*x^3 - 25*x^2 - sqrt(5)*(x^11 + 3*x^10 - 37*x^9 + 96*x^8 - 6*x^7 - 166*x^6 + 6*x^5 + 96*
x^4 + 37*x^3 + 3*x^2 - x) - 5*x) - 80*sqrt(5)*(x^10 + 6*x^9 - 23*x^8 - 2*x^7 + 40*x^6 + 2*x^5 - 23*x^4 - 6*x^3
+ x^2))*sqrt((5*x^4 - 20*x^3 - 5^(1/4)*sqrt(x^3 - x^2 - x)*(sqrt(5)*sqrt(2)*(x^2 - 6*x - 1) - 5*sqrt(2)*(x^2
- 2*x - 1))*sqrt(sqrt(5) + 5) + 30*x^2 + 20*sqrt(5)*(x^3 - x^2 - x) + 20*x + 5)/(x^4 + 2*x^2 + 1)) + 4*sqrt(5)
*(5*x^11 - 15*x^10 - 15*x^9 + 20*x^8 - 20*x^7 + 70*x^6 + 20*x^5 + 20*x^4 + 15*x^3 - 15*x^2 - sqrt(5)*(x^11 + 1
3*x^10 - 67*x^9 - 44*x^8 + 284*x^7 + 14*x^6 - 284*x^5 - 44*x^4 + 67*x^3 + 13*x^2 - x) - 5*x) - 20*sqrt(5)*(x^1
1 - 3*x^10 - 3*x^9 + 4*x^8 - 4*x^7 + 14*x^6 + 4*x^5 + 4*x^4 + 3*x^3 - 3*x^2 - x) - 20*x)/(x^11 - 9*x^10 - 45*x
^9 + 180*x^8 + 18*x^7 - 326*x^6 - 18*x^5 + 180*x^4 + 45*x^3 - 9*x^2 - x)) + 1/320*5^(1/4)*(sqrt(5)*sqrt(2) - 5
*sqrt(2))*sqrt(sqrt(5) + 5)*log(1/5*(5*x^4 - 20*x^3 + 5^(1/4)*sqrt(x^3 - x^2 - x)*(sqrt(5)*sqrt(2)*(x^2 - 6*x
- 1) - 5*sqrt(2)*(x^2 - 2*x - 1))*sqrt(sqrt(5) + 5) + 30*x^2 + 20*sqrt(5)*(x^3 - x^2 - x) + 20*x + 5)/(x^4 + 2
*x^2 + 1)) - 1/320*5^(1/4)*(sqrt(5)*sqrt(2) - 5*sqrt(2))*sqrt(sqrt(5) + 5)*log(1/5*(5*x^4 - 20*x^3 - 5^(1/4)*s
qrt(x^3 - x^2 - x)*(sqrt(5)*sqrt(2)*(x^2 - 6*x - 1) - 5*sqrt(2)*(x^2 - 2*x - 1))*sqrt(sqrt(5) + 5) + 30*x^2 +
20*sqrt(5)*(x^3 - x^2 - x) + 20*x + 5)/(x^4 + 2*x^2 + 1)) - 1/4*arctan(1/2*(x^2 - 2*x - 1)/sqrt(x^3 - x^2 - x)
)

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

maple [C]  time = 3.32, size = 917, normalized size = 7.34

method	result	size
trager	\(-\frac {\RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right ) \ln \left (\frac {3935232 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{5} x^{2}-5902848 x \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{5}-3935232 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{5}-1338592 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{3} x^{2}+962592 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{3} x +65024 \sqrt {x^{3}-x^{2}-x}\, \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+1338592 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{3}-160080 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right ) x^{2}+693680 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right ) x -286015 \sqrt {x^{3}-x^{2}-x}+160080 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )}{\left (16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2} x -32 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+5 x \right )^{2}}\right )}{2}-\frac {\RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right ) \ln \left (-\frac {-983808 \RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right ) \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{4} x^{2}+1475712 \RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right ) \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{4} x +983808 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{4} \RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right )-580600 \RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right ) \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2} x^{2}+609576 \RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right ) \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2} x +65024 \sqrt {x^{3}-x^{2}-x}\, \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+580600 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2} \RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right )-17183 \RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right ) x^{2}-120281 \RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right ) x +294143 \sqrt {x^{3}-x^{2}-x}+17183 \RootOf \left (\textit {\_Z}^{2}+16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}+2\right )}{\left (16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2} x -32 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}-3 x -4\right )^{2}}\right )}{8}-2 \ln \left (\frac {-16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2} x^{2}+32 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2} x +16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}-x^{2}+4 \sqrt {x^{3}-x^{2}-x}+2 x +1}{\left (-1+x \right ) \left (1+x \right )}\right ) \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}-\frac {\ln \left (\frac {-16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2} x^{2}+32 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2} x +16 \RootOf \left (256 \textit {\_Z}^{4}+32 \textit {\_Z}^{2}+5\right )^{2}-x^{2}+4 \sqrt {x^{3}-x^{2}-x}+2 x +1}{\left (-1+x \right ) \left (1+x \right )}\right )}{8}\)	\(917\)
elliptic	\(\frac {\sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, -\frac {i \sqrt {5}}{5}+\frac {1}{2}-\frac {\sqrt {5}}{10}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{10 \sqrt {x^{3}-x^{2}-x}}+\frac {i \sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, -\frac {i \sqrt {5}}{5}+\frac {1}{2}-\frac {\sqrt {5}}{10}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{20 \sqrt {x^{3}-x^{2}-x}}-\frac {i \sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, -\frac {i \sqrt {5}}{5}+\frac {1}{2}-\frac {\sqrt {5}}{10}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right ) \sqrt {5}}{20 \sqrt {x^{3}-x^{2}-x}}+\frac {\sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {i \sqrt {5}}{5}+\frac {1}{2}-\frac {\sqrt {5}}{10}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{10 \sqrt {x^{3}-x^{2}-x}}-\frac {i \sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {i \sqrt {5}}{5}+\frac {1}{2}-\frac {\sqrt {5}}{10}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{20 \sqrt {x^{3}-x^{2}-x}}+\frac {i \sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {i \sqrt {5}}{5}+\frac {1}{2}-\frac {\sqrt {5}}{10}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right ) \sqrt {5}}{20 \sqrt {x^{3}-x^{2}-x}}+\frac {\sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {\frac {1}{2}-\frac {\sqrt {5}}{2}}{\frac {3}{2}-\frac {\sqrt {5}}{2}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right ) \sqrt {5}}{20 \sqrt {x^{3}-x^{2}-x}\, \left (\frac {3}{2}-\frac {\sqrt {5}}{2}\right )}-\frac {\sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {\frac {1}{2}-\frac {\sqrt {5}}{2}}{\frac {3}{2}-\frac {\sqrt {5}}{2}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{20 \sqrt {x^{3}-x^{2}-x}\, \left (\frac {3}{2}-\frac {\sqrt {5}}{2}\right )}-\frac {\sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {\frac {1}{2}-\frac {\sqrt {5}}{2}}{-\frac {1}{2}-\frac {\sqrt {5}}{2}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right ) \sqrt {5}}{20 \sqrt {x^{3}-x^{2}-x}\, \left (-\frac {1}{2}-\frac {\sqrt {5}}{2}\right )}+\frac {\sqrt {\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}-\frac {1}{2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )}+\frac {\sqrt {5}}{\sqrt {5}-1}}\, \sqrt {-5 x \sqrt {5}+\frac {5 \sqrt {5}}{2}+\frac {25}{2}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticPi \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {\frac {1}{2}-\frac {\sqrt {5}}{2}}{-\frac {1}{2}-\frac {\sqrt {5}}{2}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{20 \sqrt {x^{3}-x^{2}-x}\, \left (-\frac {1}{2}-\frac {\sqrt {5}}{2}\right )}\)	\(1430\)
default	\(\text {Expression too large to display}\)	\(2289\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

-1/2*RootOf(256*_Z^4+32*_Z^2+5)*ln((3935232*RootOf(256*_Z^4+32*_Z^2+5)^5*x^2-5902848*x*RootOf(256*_Z^4+32*_Z^2
+5)^5-3935232*RootOf(256*_Z^4+32*_Z^2+5)^5-1338592*RootOf(256*_Z^4+32*_Z^2+5)^3*x^2+962592*RootOf(256*_Z^4+32*
_Z^2+5)^3*x+65024*(x^3-x^2-x)^(1/2)*RootOf(256*_Z^4+32*_Z^2+5)^2+1338592*RootOf(256*_Z^4+32*_Z^2+5)^3-160080*R
ootOf(256*_Z^4+32*_Z^2+5)*x^2+693680*RootOf(256*_Z^4+32*_Z^2+5)*x-286015*(x^3-x^2-x)^(1/2)+160080*RootOf(256*_
Z^4+32*_Z^2+5))/(16*RootOf(256*_Z^4+32*_Z^2+5)^2*x-32*RootOf(256*_Z^4+32*_Z^2+5)^2+5*x)^2)-1/8*RootOf(_Z^2+16*
RootOf(256*_Z^4+32*_Z^2+5)^2+2)*ln(-(-983808*RootOf(_Z^2+16*RootOf(256*_Z^4+32*_Z^2+5)^2+2)*RootOf(256*_Z^4+32
*_Z^2+5)^4*x^2+1475712*RootOf(_Z^2+16*RootOf(256*_Z^4+32*_Z^2+5)^2+2)*RootOf(256*_Z^4+32*_Z^2+5)^4*x+983808*Ro
otOf(256*_Z^4+32*_Z^2+5)^4*RootOf(_Z^2+16*RootOf(256*_Z^4+32*_Z^2+5)^2+2)-580600*RootOf(_Z^2+16*RootOf(256*_Z^
4+32*_Z^2+5)^2+2)*RootOf(256*_Z^4+32*_Z^2+5)^2*x^2+609576*RootOf(_Z^2+16*RootOf(256*_Z^4+32*_Z^2+5)^2+2)*RootO
f(256*_Z^4+32*_Z^2+5)^2*x+65024*(x^3-x^2-x)^(1/2)*RootOf(256*_Z^4+32*_Z^2+5)^2+580600*RootOf(256*_Z^4+32*_Z^2+
5)^2*RootOf(_Z^2+16*RootOf(256*_Z^4+32*_Z^2+5)^2+2)-17183*RootOf(_Z^2+16*RootOf(256*_Z^4+32*_Z^2+5)^2+2)*x^2-1
20281*RootOf(_Z^2+16*RootOf(256*_Z^4+32*_Z^2+5)^2+2)*x+294143*(x^3-x^2-x)^(1/2)+17183*RootOf(_Z^2+16*RootOf(25
6*_Z^4+32*_Z^2+5)^2+2))/(16*RootOf(256*_Z^4+32*_Z^2+5)^2*x-32*RootOf(256*_Z^4+32*_Z^2+5)^2-3*x-4)^2)-2*ln((-16
*RootOf(256*_Z^4+32*_Z^2+5)^2*x^2+32*RootOf(256*_Z^4+32*_Z^2+5)^2*x+16*RootOf(256*_Z^4+32*_Z^2+5)^2-x^2+4*(x^3
-x^2-x)^(1/2)+2*x+1)/(-1+x)/(1+x))*RootOf(256*_Z^4+32*_Z^2+5)^2-1/8*ln((-16*RootOf(256*_Z^4+32*_Z^2+5)^2*x^2+3
2*RootOf(256*_Z^4+32*_Z^2+5)^2*x+16*RootOf(256*_Z^4+32*_Z^2+5)^2-x^2+4*(x^3-x^2-x)^(1/2)+2*x+1)/(-1+x)/(1+x))

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

mupad [B]  time = 0.07, size = 537, normalized size = 4.30 \begin {gather*} \frac {\left (\frac {\sqrt {5}}{2}+\frac {1}{2}\right )\,\sqrt {\frac {x}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\,\sqrt {\frac {x+\frac {\sqrt {5}}{2}-\frac {1}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\,\sqrt {\frac {\frac {\sqrt {5}}{2}-x+\frac {1}{2}}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\,\Pi \left (-\frac {\sqrt {5}}{2}-\frac {1}{2};\mathrm {asin}\left (\sqrt {\frac {x}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\right )\middle |-\frac {\frac {\sqrt {5}}{2}+\frac {1}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}\right )}{2\,\sqrt {x^3-x^2-\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )\,\left (\frac {\sqrt {5}}{2}+\frac {1}{2}\right )\,x}}+\frac {\left (\frac {\sqrt {5}}{2}+\frac {1}{2}\right )\,\sqrt {\frac {x}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\,\sqrt {\frac {x+\frac {\sqrt {5}}{2}-\frac {1}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\,\sqrt {\frac {\frac {\sqrt {5}}{2}-x+\frac {1}{2}}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\,\Pi \left (\frac {\sqrt {5}}{2}+\frac {1}{2};\mathrm {asin}\left (\sqrt {\frac {x}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\right )\middle |-\frac {\frac {\sqrt {5}}{2}+\frac {1}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}\right )}{2\,\sqrt {x^3-x^2-\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )\,\left (\frac {\sqrt {5}}{2}+\frac {1}{2}\right )\,x}}+\frac {\left (\frac {\sqrt {5}}{2}+\frac {1}{2}\right )\,\sqrt {\frac {x}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\,\sqrt {\frac {x+\frac {\sqrt {5}}{2}-\frac {1}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\,\sqrt {\frac {\frac {\sqrt {5}}{2}-x+\frac {1}{2}}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\,\Pi \left (-\frac {\sqrt {5}\,1{}\mathrm {i}}{2}-\frac {1}{2}{}\mathrm {i};\mathrm {asin}\left (\sqrt {\frac {x}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\right )\middle |-\frac {\frac {\sqrt {5}}{2}+\frac {1}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}\right )\,\left (-\frac {1}{2}+1{}\mathrm {i}\right )}{\sqrt {x^3-x^2-\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )\,\left (\frac {\sqrt {5}}{2}+\frac {1}{2}\right )\,x}}+\frac {\left (\frac {\sqrt {5}}{2}+\frac {1}{2}\right )\,\sqrt {\frac {x}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\,\sqrt {\frac {x+\frac {\sqrt {5}}{2}-\frac {1}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\,\sqrt {\frac {\frac {\sqrt {5}}{2}-x+\frac {1}{2}}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\,\Pi \left (\frac {\sqrt {5}\,1{}\mathrm {i}}{2}+\frac {1}{2}{}\mathrm {i};\mathrm {asin}\left (\sqrt {\frac {x}{\frac {\sqrt {5}}{2}+\frac {1}{2}}}\right )\middle |-\frac {\frac {\sqrt {5}}{2}+\frac {1}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}\right )\,\left (-\frac {1}{2}-\mathrm {i}\right )}{\sqrt {x^3-x^2-\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right )\,\left (\frac {\sqrt {5}}{2}+\frac {1}{2}\right )\,x}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

((5^(1/2)/2 + 1/2)*(x/(5^(1/2)/2 + 1/2))^(1/2)*((x + 5^(1/2)/2 - 1/2)/(5^(1/2)/2 - 1/2))^(1/2)*((5^(1/2)/2 - x
+ 1/2)/(5^(1/2)/2 + 1/2))^(1/2)*ellipticPi(- 5^(1/2)/2 - 1/2, asin((x/(5^(1/2)/2 + 1/2))^(1/2)), -(5^(1/2)/2
+ 1/2)/(5^(1/2)/2 - 1/2)))/(2*(x^3 - x^2 - x*(5^(1/2)/2 - 1/2)*(5^(1/2)/2 + 1/2))^(1/2)) + ((5^(1/2)/2 + 1/2)*
(x/(5^(1/2)/2 + 1/2))^(1/2)*((x + 5^(1/2)/2 - 1/2)/(5^(1/2)/2 - 1/2))^(1/2)*((5^(1/2)/2 - x + 1/2)/(5^(1/2)/2
+ 1/2))^(1/2)*ellipticPi(5^(1/2)/2 + 1/2, asin((x/(5^(1/2)/2 + 1/2))^(1/2)), -(5^(1/2)/2 + 1/2)/(5^(1/2)/2 - 1
/2)))/(2*(x^3 - x^2 - x*(5^(1/2)/2 - 1/2)*(5^(1/2)/2 + 1/2))^(1/2)) - ((5^(1/2)/2 + 1/2)*(x/(5^(1/2)/2 + 1/2))
^(1/2)*((x + 5^(1/2)/2 - 1/2)/(5^(1/2)/2 - 1/2))^(1/2)*((5^(1/2)/2 - x + 1/2)/(5^(1/2)/2 + 1/2))^(1/2)*ellipti
cPi(- (5^(1/2)*1i)/2 - 1i/2, asin((x/(5^(1/2)/2 + 1/2))^(1/2)), -(5^(1/2)/2 + 1/2)/(5^(1/2)/2 - 1/2))*(1/2 - 1
i))/(x^3 - x^2 - x*(5^(1/2)/2 - 1/2)*(5^(1/2)/2 + 1/2))^(1/2) - ((5^(1/2)/2 + 1/2)*(x/(5^(1/2)/2 + 1/2))^(1/2)
*((x + 5^(1/2)/2 - 1/2)/(5^(1/2)/2 - 1/2))^(1/2)*((5^(1/2)/2 - x + 1/2)/(5^(1/2)/2 + 1/2))^(1/2)*ellipticPi((5
^(1/2)*1i)/2 + 1i/2, asin((x/(5^(1/2)/2 + 1/2))^(1/2)), -(5^(1/2)/2 + 1/2)/(5^(1/2)/2 - 1/2))*(1/2 + 1i))/(x^3
- x^2 - x*(5^(1/2)/2 - 1/2)*(5^(1/2)/2 + 1/2))^(1/2)

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________