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

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

________________________________________________________________________________________

Rubi [C]  time = 1.91, antiderivative size = 611, normalized size of antiderivative = 4.66, number of steps used = 27, number of rules used = 8, integrand size = 29, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.276, Rules used = {2056, 6725, 716, 1098, 934, 168, 538, 537} \begin {gather*} \frac {\sqrt {x} \sqrt {-\left (\left (1-\sqrt {5}\right ) x\right )-2} \sqrt {\frac {\left (1+\sqrt {5}\right ) x+2}{\left (1-\sqrt {5}\right ) x+2}} F\left (\sin ^{-1}\left (\frac {\sqrt {2} \sqrt [4]{5} \sqrt {x}}{\sqrt {-\left (\left (1-\sqrt {5}\right ) x\right )-2}}\right )|\frac {1}{10} \left (5-\sqrt {5}\right )\right )}{\sqrt [4]{5} \sqrt {\frac {1}{\left (1-\sqrt {5}\right ) x+2}} \sqrt {x^3-x^2-x}}-\frac {\sqrt {3+\sqrt {5}} \sqrt {x} \sqrt {2 x+\sqrt {5}-1} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \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 )}{2 \sqrt {x^3-x^2-x}}-\frac {\sqrt {3+\sqrt {5}} \sqrt {x} \sqrt {2 x+\sqrt {5}-1} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \Pi \left (-\frac {1}{2} i \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 )}{2 \sqrt {x^3-x^2-x}}-\frac {\sqrt {3+\sqrt {5}} \sqrt {x} \sqrt {2 x+\sqrt {5}-1} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \Pi \left (\frac {1}{2} i \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 )}{2 \sqrt {x^3-x^2-x}}-\frac {\sqrt {3+\sqrt {5}} \sqrt {x} \sqrt {2 x+\sqrt {5}-1} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \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 )}{2 \sqrt {x^3-x^2-x}} \end {gather*}

Warning: Unable to verify antiderivative.

[In]

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

[Out]

(Sqrt[x]*Sqrt[-2 - (1 - Sqrt[5])*x]*Sqrt[(2 + (1 + Sqrt[5])*x)/(2 + (1 - Sqrt[5])*x)]*EllipticF[ArcSin[(Sqrt[2
]*5^(1/4)*Sqrt[x])/Sqrt[-2 - (1 - Sqrt[5])*x]], (5 - Sqrt[5])/10])/(5^(1/4)*Sqrt[(2 + (1 - Sqrt[5])*x)^(-1)]*S
qrt[-x - x^2 + x^3]) - (Sqrt[3 + Sqrt[5]]*Sqrt[x]*Sqrt[-1 + Sqrt[5] + 2*x]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*Ellip
ticPi[(-1 - Sqrt[5])/2, ArcSin[Sqrt[2/(1 + Sqrt[5])]*Sqrt[x]], (-3 - Sqrt[5])/2])/(2*Sqrt[-x - x^2 + x^3]) - (
Sqrt[3 + Sqrt[5]]*Sqrt[x]*Sqrt[-1 + Sqrt[5] + 2*x]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*EllipticPi[(-1/2*I)*(1 + Sqrt
[5]), ArcSin[Sqrt[2/(1 + Sqrt[5])]*Sqrt[x]], (-3 - Sqrt[5])/2])/(2*Sqrt[-x - x^2 + x^3]) - (Sqrt[3 + Sqrt[5]]*
Sqrt[x]*Sqrt[-1 + Sqrt[5] + 2*x]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*EllipticPi[(I/2)*(1 + Sqrt[5]), ArcSin[Sqrt[2/(
1 + Sqrt[5])]*Sqrt[x]], (-3 - Sqrt[5])/2])/(2*Sqrt[-x - x^2 + x^3]) - (Sqrt[3 + Sqrt[5]]*Sqrt[x]*Sqrt[-1 + Sqr
t[5] + 2*x]*Sqrt[1 - (2*x)/(1 + Sqrt[5])]*EllipticPi[(1 + Sqrt[5])/2, ArcSin[Sqrt[2/(1 + Sqrt[5])]*Sqrt[x]], (
-3 - Sqrt[5])/2])/(2*Sqrt[-x - x^2 + x^3])

Rule 168

Int[1/(((a_.) + (b_.)*(x_))*Sqrt[(c_.) + (d_.)*(x_)]*Sqrt[(e_.) + (f_.)*(x_)]*Sqrt[(g_.) + (h_.)*(x_)]), x_Sym
bol] :> Dist[-2, Subst[Int[1/(Simp[b*c - a*d - b*x^2, x]*Sqrt[Simp[(d*e - c*f)/d + (f*x^2)/d, x]]*Sqrt[Simp[(d
*g - c*h)/d + (h*x^2)/d, x]]), x], x, Sqrt[c + d*x]], x] /; FreeQ[{a, b, c, d, e, f, g, h}, x] && GtQ[(d*e - c
*f)/d, 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 716

Int[(x_)^(m_)/Sqrt[(a_) + (b_.)*(x_) + (c_.)*(x_)^2], x_Symbol] :> Dist[2, Subst[Int[x^(2*m + 1)/Sqrt[a + b*x^
2 + c*x^4], x], x, Sqrt[x]], x] /; FreeQ[{a, b, c}, x] && NeQ[b^2 - 4*a*c, 0] && EqQ[m^2, 1/4]

Rule 934

Int[1/(((d_.) + (e_.)*(x_))*Sqrt[(f_.) + (g_.)*(x_)]*Sqrt[(a_.) + (b_.)*(x_) + (c_.)*(x_)^2]), x_Symbol] :> Wi
th[{q = Rt[b^2 - 4*a*c, 2]}, Dist[(Sqrt[b - q + 2*c*x]*Sqrt[b + q + 2*c*x])/Sqrt[a + b*x + c*x^2], Int[1/((d +
e*x)*Sqrt[f + g*x]*Sqrt[b - q + 2*c*x]*Sqrt[b + q + 2*c*x]), x], x]] /; FreeQ[{a, b, c, d, e, f, g}, x] && Ne
Q[e*f - d*g, 0] && NeQ[b^2 - 4*a*c, 0] && NeQ[c*d^2 - b*d*e + a*e^2, 0]

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 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]

Rubi steps

\begin {align*} \int \frac {1+x^4}{\sqrt {-x-x^2+x^3} \left (-1+x^4\right )} \, dx &=\frac {\left (\sqrt {x} \sqrt {-1-x+x^2}\right ) \int \frac {1+x^4}{\sqrt {x} \sqrt {-1-x+x^2} \left (-1+x^4\right )} \, dx}{\sqrt {-x-x^2+x^3}}\\ &=\frac {\left (\sqrt {x} \sqrt {-1-x+x^2}\right ) \int \left (\frac {1}{\sqrt {x} \sqrt {-1-x+x^2}}+\frac {2}{\sqrt {x} \sqrt {-1-x+x^2} \left (-1+x^4\right )}\right ) \, dx}{\sqrt {-x-x^2+x^3}}\\ &=\frac {\left (\sqrt {x} \sqrt {-1-x+x^2}\right ) \int \frac {1}{\sqrt {x} \sqrt {-1-x+x^2}} \, dx}{\sqrt {-x-x^2+x^3}}+\frac {\left (2 \sqrt {x} \sqrt {-1-x+x^2}\right ) \int \frac {1}{\sqrt {x} \sqrt {-1-x+x^2} \left (-1+x^4\right )} \, dx}{\sqrt {-x-x^2+x^3}}\\ &=\frac {\left (2 \sqrt {x} \sqrt {-1-x+x^2}\right ) \int \left (-\frac {1}{2 \sqrt {x} \left (1-x^2\right ) \sqrt {-1-x+x^2}}-\frac {1}{2 \sqrt {x} \left (1+x^2\right ) \sqrt {-1-x+x^2}}\right ) \, dx}{\sqrt {-x-x^2+x^3}}+\frac {\left (2 \sqrt {x} \sqrt {-1-x+x^2}\right ) \operatorname {Subst}\left (\int \frac {1}{\sqrt {-1-x^2+x^4}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x-x^2+x^3}}\\ &=\frac {\sqrt {x} \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} 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 {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3}}-\frac {\left (\sqrt {x} \sqrt {-1-x+x^2}\right ) \int \frac {1}{\sqrt {x} \left (1-x^2\right ) \sqrt {-1-x+x^2}} \, dx}{\sqrt {-x-x^2+x^3}}-\frac {\left (\sqrt {x} \sqrt {-1-x+x^2}\right ) \int \frac {1}{\sqrt {x} \left (1+x^2\right ) \sqrt {-1-x+x^2}} \, dx}{\sqrt {-x-x^2+x^3}}\\ &=\frac {\sqrt {x} \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} 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 {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3}}-\frac {\left (\sqrt {x} \sqrt {-1-x+x^2}\right ) \int \left (\frac {i}{2 (i-x) \sqrt {x} \sqrt {-1-x+x^2}}+\frac {i}{2 \sqrt {x} (i+x) \sqrt {-1-x+x^2}}\right ) \, dx}{\sqrt {-x-x^2+x^3}}-\frac {\left (\sqrt {x} \sqrt {-1-x+x^2}\right ) \int \left (\frac {1}{2 (1-x) \sqrt {x} \sqrt {-1-x+x^2}}+\frac {1}{2 \sqrt {x} (1+x) \sqrt {-1-x+x^2}}\right ) \, dx}{\sqrt {-x-x^2+x^3}}\\ &=\frac {\sqrt {x} \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} 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 {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3}}-\frac {\left (i \sqrt {x} \sqrt {-1-x+x^2}\right ) \int \frac {1}{(i-x) \sqrt {x} \sqrt {-1-x+x^2}} \, dx}{2 \sqrt {-x-x^2+x^3}}-\frac {\left (i \sqrt {x} \sqrt {-1-x+x^2}\right ) \int \frac {1}{\sqrt {x} (i+x) \sqrt {-1-x+x^2}} \, dx}{2 \sqrt {-x-x^2+x^3}}-\frac {\left (\sqrt {x} \sqrt {-1-x+x^2}\right ) \int \frac {1}{(1-x) \sqrt {x} \sqrt {-1-x+x^2}} \, dx}{2 \sqrt {-x-x^2+x^3}}-\frac {\left (\sqrt {x} \sqrt {-1-x+x^2}\right ) \int \frac {1}{\sqrt {x} (1+x) \sqrt {-1-x+x^2}} \, dx}{2 \sqrt {-x-x^2+x^3}}\\ &=\frac {\sqrt {x} \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} 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 {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3}}-\frac {\left (i \sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}\right ) \int \frac {1}{(i-x) \sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}} \, dx}{2 \sqrt {-x-x^2+x^3}}-\frac {\left (i \sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}\right ) \int \frac {1}{\sqrt {x} (i+x) \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}} \, dx}{2 \sqrt {-x-x^2+x^3}}-\frac {\left (\sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}\right ) \int \frac {1}{(1-x) \sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}} \, dx}{2 \sqrt {-x-x^2+x^3}}-\frac {\left (\sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}\right ) \int \frac {1}{\sqrt {x} (1+x) \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}} \, dx}{2 \sqrt {-x-x^2+x^3}}\\ &=\frac {\sqrt {x} \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} 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 {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3}}+\frac {\left (i \sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (-i-x^2\right ) \sqrt {-1-\sqrt {5}+2 x^2} \sqrt {-1+\sqrt {5}+2 x^2}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x-x^2+x^3}}+\frac {\left (i \sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (-i+x^2\right ) \sqrt {-1-\sqrt {5}+2 x^2} \sqrt {-1+\sqrt {5}+2 x^2}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x-x^2+x^3}}+\frac {\left (\sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (-1-x^2\right ) \sqrt {-1-\sqrt {5}+2 x^2} \sqrt {-1+\sqrt {5}+2 x^2}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x-x^2+x^3}}+\frac {\left (\sqrt {x} \sqrt {-1-\sqrt {5}+2 x} \sqrt {-1+\sqrt {5}+2 x}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (-1+x^2\right ) \sqrt {-1-\sqrt {5}+2 x^2} \sqrt {-1+\sqrt {5}+2 x^2}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x-x^2+x^3}}\\ &=\frac {\sqrt {x} \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} 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 {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3}}+\frac {\left (i \sqrt {x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (-i-x^2\right ) \sqrt {-1+\sqrt {5}+2 x^2} \sqrt {1+\frac {2 x^2}{-1-\sqrt {5}}}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x-x^2+x^3}}+\frac {\left (i \sqrt {x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (-i+x^2\right ) \sqrt {-1+\sqrt {5}+2 x^2} \sqrt {1+\frac {2 x^2}{-1-\sqrt {5}}}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x-x^2+x^3}}+\frac {\left (\sqrt {x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (-1-x^2\right ) \sqrt {-1+\sqrt {5}+2 x^2} \sqrt {1+\frac {2 x^2}{-1-\sqrt {5}}}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x-x^2+x^3}}+\frac {\left (\sqrt {x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}}\right ) \operatorname {Subst}\left (\int \frac {1}{\left (-1+x^2\right ) \sqrt {-1+\sqrt {5}+2 x^2} \sqrt {1+\frac {2 x^2}{-1-\sqrt {5}}}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x-x^2+x^3}}\\ &=\frac {\sqrt {x} \sqrt {-2-\left (1-\sqrt {5}\right ) x} \sqrt {\frac {2+\left (1+\sqrt {5}\right ) x}{2+\left (1-\sqrt {5}\right ) x}} 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 {\frac {1}{2+\left (1-\sqrt {5}\right ) x}} \sqrt {-x-x^2+x^3}}-\frac {\sqrt {3+\sqrt {5}} \sqrt {x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \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 )}{2 \sqrt {-x-x^2+x^3}}-\frac {\sqrt {3+\sqrt {5}} \sqrt {x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \Pi \left (-\frac {1}{2} i \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 )}{2 \sqrt {-x-x^2+x^3}}-\frac {\sqrt {3+\sqrt {5}} \sqrt {x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \Pi \left (\frac {1}{2} i \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 )}{2 \sqrt {-x-x^2+x^3}}-\frac {\sqrt {3+\sqrt {5}} \sqrt {x} \sqrt {-1+\sqrt {5}+2 x} \sqrt {1-\frac {2 x}{1+\sqrt {5}}} \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 )}{2 \sqrt {-x-x^2+x^3}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [C]  time = 8.75, size = 1848, normalized size = 14.11

result too large to display

Warning: Unable to verify antiderivative.

[In]

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

[Out]

-(((-1 + x^(-4))*x^(3/2)*(1 + x^4)*(((-4*I)*Sqrt[1 - x^(-2) - x^(-1)]*EllipticF[I*ArcSinh[Sqrt[2/(1 + Sqrt[5])
]/Sqrt[x]], -3/2 - Sqrt[5]/2])/Sqrt[-1 + Sqrt[5]] + ((2*I)*Sqrt[1 - x^(-2) - x^(-1)]*EllipticPi[(-1/2*I)*(1 +
Sqrt[5]), I*ArcSinh[Sqrt[2/(1 + Sqrt[5])]/Sqrt[x]], (-3 - Sqrt[5])/2])/Sqrt[-1 + Sqrt[5]] + ((2*I)*Sqrt[1 - x^
(-2) - x^(-1)]*EllipticPi[(I/2)*(1 + Sqrt[5]), I*ArcSinh[Sqrt[2/(1 + Sqrt[5])]/Sqrt[x]], (-3 - Sqrt[5])/2])/Sq
rt[-1 + Sqrt[5]] + ((2*I)*Sqrt[1 - x^(-2) - x^(-1)]*EllipticPi[(1 + Sqrt[5])/2, I*ArcSinh[Sqrt[2/(1 + Sqrt[5])
]/Sqrt[x]], (-3 - Sqrt[5])/2])/Sqrt[-1 + Sqrt[5]] + ((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 +
Sqrt[5])] - 2/Sqrt[x])^2*Sqrt[(I*Sqrt[2*(1 + Sqrt[5])] + 2/Sqrt[x])/((1 + 2*I)*Sqrt[2] - Sqrt[10] + (2*Sqrt[-1
+ Sqrt[5]])/Sqrt[x] - ((2*I)*Sqrt[1 + Sqrt[5]])/Sqrt[x])]*Sqrt[(I*Sqrt[2*(1 + Sqrt[5])] - 2/Sqrt[x])/(Sqrt[2]
*((-1 + 2*I) + Sqrt[5]) - (2*(Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]]))/Sqrt[x])]*Sqrt[(Sqrt[2]*((-1 - 2*I) +
Sqrt[5]) + (2*(Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]]))/Sqrt[x])/(Sqrt[2]*((-1 + 2*I) + Sqrt[5]) - (2*(Sqrt
[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]]))/Sqrt[x])]*((2 + Sqrt[2*(-1 + Sqrt[5])])*EllipticF[ArcSin[Sqrt[((Sqrt[-1
+ Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] + 2/Sqrt[x]))/((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqr
t[5]])*(Sqrt[2*(-1 + Sqrt[5])] - 2/Sqrt[x]))]], -3/5 - (4*I)/5] - 2*Sqrt[2*(-1 + Sqrt[5])]*EllipticPi[((-2 + S
qrt[2*(-1 + Sqrt[5])])*(Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]]))/((2 + Sqrt[2*(-1 + Sqrt[5])])*(Sqrt[-1 + Sq
rt[5]] - I*Sqrt[1 + Sqrt[5]])), ArcSin[Sqrt[((Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])
] + 2/Sqrt[x]))/((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] - 2/Sqrt[x]))]], -3/5 - (4
*I)/5]))/((-2 + Sqrt[2*(-1 + Sqrt[5])])*(2 + Sqrt[2*(-1 + Sqrt[5])])*(Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]]
)) - ((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] - 2/Sqrt[x])^2*Sqrt[(I*Sqrt[2*(1 + Sq
rt[5])] + 2/Sqrt[x])/((1 + 2*I)*Sqrt[2] - Sqrt[10] + (2*Sqrt[-1 + Sqrt[5]])/Sqrt[x] - ((2*I)*Sqrt[1 + Sqrt[5]]
)/Sqrt[x])]*Sqrt[(I*Sqrt[2*(1 + Sqrt[5])] - 2/Sqrt[x])/(Sqrt[2]*((-1 + 2*I) + Sqrt[5]) - (2*(Sqrt[-1 + Sqrt[5]
] + I*Sqrt[1 + Sqrt[5]]))/Sqrt[x])]*Sqrt[(Sqrt[2]*((-1 - 2*I) + Sqrt[5]) + (2*(Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 +
Sqrt[5]]))/Sqrt[x])/(Sqrt[2]*((-1 + 2*I) + Sqrt[5]) - (2*(Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]]))/Sqrt[x])
]*((-2 + Sqrt[2*(-1 + Sqrt[5])])*EllipticF[ArcSin[Sqrt[((Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1
+ Sqrt[5])] + 2/Sqrt[x]))/((Sqrt[-1 + Sqrt[5]] + I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] - 2/Sqrt[x]))]]
, -3/5 - (4*I)/5] - 2*Sqrt[2*(-1 + Sqrt[5])]*EllipticPi[((2 + Sqrt[2*(-1 + Sqrt[5])])*(Sqrt[-1 + Sqrt[5]] + I*
Sqrt[1 + Sqrt[5]]))/((-2 + Sqrt[2*(-1 + Sqrt[5])])*(Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])), ArcSin[Sqrt[((
Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] + 2/Sqrt[x]))/((Sqrt[-1 + Sqrt[5]] + I*Sqrt[
1 + Sqrt[5]])*(Sqrt[2*(-1 + Sqrt[5])] - 2/Sqrt[x]))]], -3/5 - (4*I)/5]))/((-2 + Sqrt[2*(-1 + Sqrt[5])])*(2 + S
qrt[2*(-1 + Sqrt[5])])*(Sqrt[-1 + Sqrt[5]] - I*Sqrt[1 + Sqrt[5]]))))/(Sqrt[2]*Sqrt[x*(-1 - x + x^2)]*(-x^(-4)
+ x^4)))

________________________________________________________________________________________

IntegrateAlgebraic [A]  time = 0.30, size = 131, normalized size = 1.00 \begin {gather*} -\tan ^{-1}\left (\frac {\sqrt {-x-x^2+x^3}}{-1-x+x^2}\right )-\frac {1}{2} \sqrt {\frac {1}{5}+\frac {2 i}{5}} \tan ^{-1}\left (\frac {\sqrt {1-2 i} \sqrt {-x-x^2+x^3}}{-1-x+x^2}\right )-\frac {1}{2} \sqrt {\frac {1}{5}-\frac {2 i}{5}} \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[(1 + x^4)/(Sqrt[-x - x^2 + x^3]*(-1 + x^4)),x]

[Out]

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

________________________________________________________________________________________

fricas [B]  time = 1.16, size = 2485, normalized size = 18.97

result too large to display

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

1/160*5^(1/4)*(sqrt(5)*sqrt(2) - sqrt(2))*sqrt(sqrt(5) + 5)*log(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/160*5^(1/4)*(sqrt(5)*sqrt(2) - sqrt(2))*sqrt(sqrt(5) + 5)*log(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))*sqr
t(sqrt(5) + 5) + 30*x^2 + 20*sqrt(5)*(x^3 - x^2 - x) + 20*x + 5)/(x^4 + 2*x^2 + 1)) - 1/20*5^(1/4)*sqrt(2)*sqr
t(sqrt(5) + 5)*arctan(-1/200*(100*x^11 + 1300*x^10 - 6700*x^9 - 4400*x^8 + 28400*x^7 + 1400*x^6 - 28400*x^5 -
4400*x^4 + 6700*x^3 + 1300*x^2 + 5*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(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 + 6
9*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 -
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 + 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 + 9
6*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)) + 20*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) - 100*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) - 100*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/20*5^(1/4)*sqrt(2)*sqrt(sqr
t(5) + 5)*arctan(1/200*(100*x^11 + 1300*x^10 - 6700*x^9 - 4400*x^8 + 28400*x^7 + 1400*x^6 - 28400*x^5 - 4400*x
^4 + 6700*x^3 + 1300*x^2 - 5*sqrt(x^3 - x^2 - x)*(5^(3/4)*(sqrt(5)*sqrt(2)*(x^10 - 4*x^9 - 17*x^8 + 56*x^7 + 7
8*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 - 1
0*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(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 - 3
96*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 - 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 + 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)) + 20*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) - 100*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) - 100*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/2*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 {x^{4} + 1}{{\left (x^{4} - 1\right )} \sqrt {x^{3} - x^{2} - x}}\,{d x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

maple [C]  time = 3.09, size = 913, normalized size = 6.97

method	result	size
trager	\(-\frac {\RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right ) \ln \left (\frac {5498560 \RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right ) \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{4} x^{2}-8247840 \RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right ) \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{4} x -5498560 \RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right ) \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{4}+566112 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2} \RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right ) x^{2}-2017612 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2} \RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right ) x -566112 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2} \RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right )+162560 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2} \sqrt {x^{3}-x^{2}-x}+11529 \RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right ) x^{2}-49959 \RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right ) x -11529 \RootOf \left (\textit {\_Z}^{2}+100 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+10\right )-572030 \sqrt {x^{3}-x^{2}-x}}{\left (4 x \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}-8 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+x \right )^{2}}\right )}{20}+\frac {\RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right ) \ln \left (-\frac {27492800 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{5} x^{2}-41239200 x \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{5}-27492800 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{5}+2668000 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{3} x^{2}+1840220 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{3} x -2668000 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{3}+81280 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2} \sqrt {x^{3}-x^{2}-x}+49517 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right ) x^{2}+346619 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right ) x -49517 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )+294143 \sqrt {x^{3}-x^{2}-x}}{\left (20 x \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}-40 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}-3 x -4\right )^{2}}\right )}{2}+5 \ln \left (-\frac {20 x^{2} \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}-40 x \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}-20 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\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 (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+\frac {\ln \left (-\frac {20 x^{2} \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}-40 x \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}-20 \RootOf \left (80 \textit {\_Z}^{4}+8 \textit {\_Z}^{2}+1\right )^{2}+x^{2}-4 \sqrt {x^{3}-x^{2}-x}-2 x -1}{\left (-1+x \right ) \left (1+x \right )}\right )}{4}\)	\(913\)
default	\(\frac {2 \left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \sqrt {-5 \left (x -\frac {1}{2}-\frac {\sqrt {5}}{2}\right ) \sqrt {5}}\, \sqrt {-\frac {x}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \EllipticF \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{5 \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 {\frac {1}{2}-\frac {\sqrt {5}}{2}}{\frac {1}{2}-i-\frac {\sqrt {5}}{2}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right ) \sqrt {5}}{10 \sqrt {x^{3}-x^{2}-x}\, \left (\frac {1}{2}-i-\frac {\sqrt {5}}{2}\right )}-\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 {\frac {1}{2}-\frac {\sqrt {5}}{2}}{\frac {1}{2}-i-\frac {\sqrt {5}}{2}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{10 \sqrt {x^{3}-x^{2}-x}\, \left (\frac {1}{2}-i-\frac {\sqrt {5}}{2}\right )}-\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 {\frac {1}{2}-\frac {\sqrt {5}}{2}}{\frac {1}{2}+i-\frac {\sqrt {5}}{2}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right ) \sqrt {5}}{10 \sqrt {x^{3}-x^{2}-x}\, \left (\frac {1}{2}+i-\frac {\sqrt {5}}{2}\right )}+\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 {\frac {1}{2}-\frac {\sqrt {5}}{2}}{\frac {1}{2}+i-\frac {\sqrt {5}}{2}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{10 \sqrt {x^{3}-x^{2}-x}\, \left (\frac {1}{2}+i-\frac {\sqrt {5}}{2}\right )}-\frac {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \sqrt {-5 \left (x -\frac {1}{2}-\frac {\sqrt {5}}{2}\right ) \sqrt {5}}\, \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 )}{5 \sqrt {x^{3}-x^{2}-x}\, \left (\frac {3}{2}-\frac {\sqrt {5}}{2}\right )}+\frac {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}\, \sqrt {-5 \left (x -\frac {1}{2}-\frac {\sqrt {5}}{2}\right ) \sqrt {5}}\, \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 )}{5 \sqrt {x^{3}-x^{2}-x}\, \left (-\frac {1}{2}-\frac {\sqrt {5}}{2}\right )}\)	\(1009\)
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}}}\, \EllipticF \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right ) \sqrt {5}}{5 \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}}}\, \EllipticF \left (\sqrt {\frac {x -\frac {1}{2}+\frac {\sqrt {5}}{2}}{\frac {\sqrt {5}}{2}-\frac {1}{2}}}, \frac {\sqrt {5}\, \sqrt {\left (\frac {\sqrt {5}}{2}-\frac {1}{2}\right ) \sqrt {5}}}{5}\right )}{5 \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 )}{10 \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 ) \sqrt {5}}{25 \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}}{50 \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 )}{10 \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 ) \sqrt {5}}{25 \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}}{50 \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}}{10 \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 )}{10 \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}}{10 \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 )}{10 \sqrt {x^{3}-x^{2}-x}\, \left (-\frac {1}{2}-\frac {\sqrt {5}}{2}\right )}\)	\(1685\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

-1/20*RootOf(_Z^2+100*RootOf(80*_Z^4+8*_Z^2+1)^2+10)*ln((5498560*RootOf(_Z^2+100*RootOf(80*_Z^4+8*_Z^2+1)^2+10
)*RootOf(80*_Z^4+8*_Z^2+1)^4*x^2-8247840*RootOf(_Z^2+100*RootOf(80*_Z^4+8*_Z^2+1)^2+10)*RootOf(80*_Z^4+8*_Z^2+
1)^4*x-5498560*RootOf(_Z^2+100*RootOf(80*_Z^4+8*_Z^2+1)^2+10)*RootOf(80*_Z^4+8*_Z^2+1)^4+566112*RootOf(80*_Z^4
+8*_Z^2+1)^2*RootOf(_Z^2+100*RootOf(80*_Z^4+8*_Z^2+1)^2+10)*x^2-2017612*RootOf(80*_Z^4+8*_Z^2+1)^2*RootOf(_Z^2
+100*RootOf(80*_Z^4+8*_Z^2+1)^2+10)*x-566112*RootOf(80*_Z^4+8*_Z^2+1)^2*RootOf(_Z^2+100*RootOf(80*_Z^4+8*_Z^2+
1)^2+10)+162560*RootOf(80*_Z^4+8*_Z^2+1)^2*(x^3-x^2-x)^(1/2)+11529*RootOf(_Z^2+100*RootOf(80*_Z^4+8*_Z^2+1)^2+
10)*x^2-49959*RootOf(_Z^2+100*RootOf(80*_Z^4+8*_Z^2+1)^2+10)*x-11529*RootOf(_Z^2+100*RootOf(80*_Z^4+8*_Z^2+1)^
2+10)-572030*(x^3-x^2-x)^(1/2))/(4*x*RootOf(80*_Z^4+8*_Z^2+1)^2-8*RootOf(80*_Z^4+8*_Z^2+1)^2+x)^2)+1/2*RootOf(
80*_Z^4+8*_Z^2+1)*ln(-(27492800*RootOf(80*_Z^4+8*_Z^2+1)^5*x^2-41239200*x*RootOf(80*_Z^4+8*_Z^2+1)^5-27492800*
RootOf(80*_Z^4+8*_Z^2+1)^5+2668000*RootOf(80*_Z^4+8*_Z^2+1)^3*x^2+1840220*RootOf(80*_Z^4+8*_Z^2+1)^3*x-2668000
*RootOf(80*_Z^4+8*_Z^2+1)^3+81280*RootOf(80*_Z^4+8*_Z^2+1)^2*(x^3-x^2-x)^(1/2)+49517*RootOf(80*_Z^4+8*_Z^2+1)*
x^2+346619*RootOf(80*_Z^4+8*_Z^2+1)*x-49517*RootOf(80*_Z^4+8*_Z^2+1)+294143*(x^3-x^2-x)^(1/2))/(20*x*RootOf(80
*_Z^4+8*_Z^2+1)^2-40*RootOf(80*_Z^4+8*_Z^2+1)^2-3*x-4)^2)+5*ln(-(20*x^2*RootOf(80*_Z^4+8*_Z^2+1)^2-40*x*RootOf
(80*_Z^4+8*_Z^2+1)^2-20*RootOf(80*_Z^4+8*_Z^2+1)^2+x^2-4*(x^3-x^2-x)^(1/2)-2*x-1)/(-1+x)/(1+x))*RootOf(80*_Z^4
+8*_Z^2+1)^2+1/4*ln(-(20*x^2*RootOf(80*_Z^4+8*_Z^2+1)^2-40*x*RootOf(80*_Z^4+8*_Z^2+1)^2-20*RootOf(80*_Z^4+8*_Z
^2+1)^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 {x^{4} + 1}{{\left (x^{4} - 1\right )} \sqrt {x^{3} - x^{2} - x}}\,{d x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

mupad [B]  time = 0.85, size = 658, normalized size = 5.02 \begin {gather*} \frac {2\,\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}}}\,\mathrm {F}\left (\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 )\,\sqrt {\frac {\frac {\sqrt {5}}{2}-x+\frac {1}{2}}{\frac {\sqrt {5}}{2}+\frac {1}{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 )}{\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 )}{\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 )}{\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 )}{\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^4 + 1)/((x^4 - 1)*(x^3 - x^2 - x)^(1/2)),x)

[Out]

(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)*ellipticF(asi
n((x/(5^(1/2)/2 + 1/2))^(1/2)), -(5^(1/2)/2 + 1/2)/(5^(1/2)/2 - 1/2))*((5^(1/2)/2 - x + 1/2)/(5^(1/2)/2 + 1/2)
)^(1/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)*elliptic
Pi(- 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)))/(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, asi
n((x/(5^(1/2)/2 + 1/2))^(1/2)), -(5^(1/2)/2 + 1/2)/(5^(1/2)/2 - 1/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)*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)))/(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)))/(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 {x^{4} + 1}{\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**4+1)/(x**3-x**2-x)**(1/2)/(x**4-1),x)

[Out]

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

________________________________________________________________________________________