\(\int \frac {\sqrt {-b^4+a^4 x^4} (b^4+a^4 x^4)}{b^8+a^8 x^8} \, dx\) [2082]

   Optimal result
   Rubi [C] (verified)
   Mathematica [A] (verified)
   Maple [C] (verified)
   Fricas [C] (verification not implemented)
   Sympy [F]
   Maxima [F]
   Giac [F]
   Mupad [F(-1)]

Optimal result

Integrand size = 42, antiderivative size = 150 \[ \int \frac {\sqrt {-b^4+a^4 x^4} \left (b^4+a^4 x^4\right )}{b^8+a^8 x^8} \, dx=-\frac {\arctan \left (\frac {\frac {b^3}{2^{3/4} a}+\frac {a b x^2}{\sqrt [4]{2}}-\frac {a^3 x^4}{2^{3/4} b}}{x \sqrt {-b^4+a^4 x^4}}\right )}{2\ 2^{3/4} a b}-\frac {\text {arctanh}\left (\frac {2^{3/4} a b x \sqrt {-b^4+a^4 x^4}}{-b^4+\sqrt {2} a^2 b^2 x^2+a^4 x^4}\right )}{2\ 2^{3/4} a b} \]

[Out]

-1/4*arctan((1/2*b^3*2^(1/4)/a+1/2*a*b*x^2*2^(3/4)-1/2*a^3*x^4*2^(1/4)/b)/x/(a^4*x^4-b^4)^(1/2))*2^(1/4)/a/b-1
/4*arctanh(2^(3/4)*a*b*x*(a^4*x^4-b^4)^(1/2)/(-b^4+2^(1/2)*a^2*b^2*x^2+a^4*x^4))*2^(1/4)/a/b

Rubi [C] (verified)

Result contains higher order function than in optimal. Order 4 vs. order 3 in optimal.

Time = 0.48 (sec) , antiderivative size = 400, normalized size of antiderivative = 2.67, number of steps used = 18, number of rules used = 7, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.167, Rules used = {6857, 415, 230, 227, 418, 1233, 1232} \[ \int \frac {\sqrt {-b^4+a^4 x^4} \left (b^4+a^4 x^4\right )}{b^8+a^8 x^8} \, dx=-\frac {b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticPi}\left (\frac {a^6}{\left (-a^8\right )^{3/4}},\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {a^4 x^4-b^4}}+\frac {\left (a^4-\sqrt {-a^8}\right ) b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticF}\left (\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a^5 \sqrt {a^4 x^4-b^4}}+\frac {\left (\sqrt {-a^8}+a^4\right ) b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticF}\left (\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a^5 \sqrt {a^4 x^4-b^4}}-\frac {b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticPi}\left (\frac {\sqrt [4]{-a^8}}{a^2},\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {a^4 x^4-b^4}}-\frac {b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticPi}\left (-\frac {\sqrt {-\sqrt {-a^8}}}{a^2},\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {a^4 x^4-b^4}}-\frac {b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticPi}\left (\frac {\sqrt {-\sqrt {-a^8}}}{a^2},\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {a^4 x^4-b^4}} \]

[In]

Int[(Sqrt[-b^4 + a^4*x^4]*(b^4 + a^4*x^4))/(b^8 + a^8*x^8),x]

[Out]

((a^4 - Sqrt[-a^8])*b*Sqrt[1 - (a^4*x^4)/b^4]*EllipticF[ArcSin[(a*x)/b], -1])/(2*a^5*Sqrt[-b^4 + a^4*x^4]) + (
(a^4 + Sqrt[-a^8])*b*Sqrt[1 - (a^4*x^4)/b^4]*EllipticF[ArcSin[(a*x)/b], -1])/(2*a^5*Sqrt[-b^4 + a^4*x^4]) - (b
*Sqrt[1 - (a^4*x^4)/b^4]*EllipticPi[a^6/(-a^8)^(3/4), ArcSin[(a*x)/b], -1])/(2*a*Sqrt[-b^4 + a^4*x^4]) - (b*Sq
rt[1 - (a^4*x^4)/b^4]*EllipticPi[(-a^8)^(1/4)/a^2, ArcSin[(a*x)/b], -1])/(2*a*Sqrt[-b^4 + a^4*x^4]) - (b*Sqrt[
1 - (a^4*x^4)/b^4]*EllipticPi[-(Sqrt[-Sqrt[-a^8]]/a^2), ArcSin[(a*x)/b], -1])/(2*a*Sqrt[-b^4 + a^4*x^4]) - (b*
Sqrt[1 - (a^4*x^4)/b^4]*EllipticPi[Sqrt[-Sqrt[-a^8]]/a^2, ArcSin[(a*x)/b], -1])/(2*a*Sqrt[-b^4 + a^4*x^4])

Rule 227

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

Rule 230

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

Rule 415

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

Rule 418

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

Rule 1232

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

Rule 1233

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

Rule 6857

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*} \text {integral}& = \int \left (-\frac {\sqrt {-a^8} \left (a^4 b^4+\sqrt {-a^8} b^4\right ) \sqrt {-b^4+a^4 x^4}}{2 a^8 b^4 \left (b^4-\sqrt {-a^8} x^4\right )}+\frac {\sqrt {-a^8} \left (a^4 b^4-\sqrt {-a^8} b^4\right ) \sqrt {-b^4+a^4 x^4}}{2 a^8 b^4 \left (b^4+\sqrt {-a^8} x^4\right )}\right ) \, dx \\ & = \frac {\left (a^4+\sqrt {-a^8}\right ) \int \frac {\sqrt {-b^4+a^4 x^4}}{b^4+\sqrt {-a^8} x^4} \, dx}{2 a^4}-\frac {\left (\sqrt {-a^8} \left (a^4 b^4+\sqrt {-a^8} b^4\right )\right ) \int \frac {\sqrt {-b^4+a^4 x^4}}{b^4-\sqrt {-a^8} x^4} \, dx}{2 a^8 b^4} \\ & = \frac {1}{2} \left (1+\frac {a^4}{\sqrt {-a^8}}\right ) \int \frac {1}{\sqrt {-b^4+a^4 x^4}} \, dx+\frac {\left (a^4+\sqrt {-a^8}\right ) \int \frac {1}{\sqrt {-b^4+a^4 x^4}} \, dx}{2 a^4}-b^4 \int \frac {1}{\sqrt {-b^4+a^4 x^4} \left (b^4-\sqrt {-a^8} x^4\right )} \, dx-b^4 \int \frac {1}{\sqrt {-b^4+a^4 x^4} \left (b^4+\sqrt {-a^8} x^4\right )} \, dx \\ & = -\left (\frac {1}{2} \int \frac {1}{\left (1-\frac {\sqrt [4]{-a^8} x^2}{b^2}\right ) \sqrt {-b^4+a^4 x^4}} \, dx\right )-\frac {1}{2} \int \frac {1}{\left (1+\frac {\sqrt [4]{-a^8} x^2}{b^2}\right ) \sqrt {-b^4+a^4 x^4}} \, dx-\frac {1}{2} \int \frac {1}{\left (1-\frac {\sqrt {-\sqrt {-a^8}} x^2}{b^2}\right ) \sqrt {-b^4+a^4 x^4}} \, dx-\frac {1}{2} \int \frac {1}{\left (1+\frac {\sqrt {-\sqrt {-a^8}} x^2}{b^2}\right ) \sqrt {-b^4+a^4 x^4}} \, dx+\frac {\left (\left (1+\frac {a^4}{\sqrt {-a^8}}\right ) \sqrt {1-\frac {a^4 x^4}{b^4}}\right ) \int \frac {1}{\sqrt {1-\frac {a^4 x^4}{b^4}}} \, dx}{2 \sqrt {-b^4+a^4 x^4}}+\frac {\left (\left (a^4+\sqrt {-a^8}\right ) \sqrt {1-\frac {a^4 x^4}{b^4}}\right ) \int \frac {1}{\sqrt {1-\frac {a^4 x^4}{b^4}}} \, dx}{2 a^4 \sqrt {-b^4+a^4 x^4}} \\ & = \frac {\left (1+\frac {a^4}{\sqrt {-a^8}}\right ) b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticF}\left (\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {-b^4+a^4 x^4}}+\frac {\left (a^4+\sqrt {-a^8}\right ) b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticF}\left (\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a^5 \sqrt {-b^4+a^4 x^4}}-\frac {\sqrt {1-\frac {a^4 x^4}{b^4}} \int \frac {1}{\left (1-\frac {\sqrt [4]{-a^8} x^2}{b^2}\right ) \sqrt {1-\frac {a^4 x^4}{b^4}}} \, dx}{2 \sqrt {-b^4+a^4 x^4}}-\frac {\sqrt {1-\frac {a^4 x^4}{b^4}} \int \frac {1}{\left (1+\frac {\sqrt [4]{-a^8} x^2}{b^2}\right ) \sqrt {1-\frac {a^4 x^4}{b^4}}} \, dx}{2 \sqrt {-b^4+a^4 x^4}}-\frac {\sqrt {1-\frac {a^4 x^4}{b^4}} \int \frac {1}{\left (1-\frac {\sqrt {-\sqrt {-a^8}} x^2}{b^2}\right ) \sqrt {1-\frac {a^4 x^4}{b^4}}} \, dx}{2 \sqrt {-b^4+a^4 x^4}}-\frac {\sqrt {1-\frac {a^4 x^4}{b^4}} \int \frac {1}{\left (1+\frac {\sqrt {-\sqrt {-a^8}} x^2}{b^2}\right ) \sqrt {1-\frac {a^4 x^4}{b^4}}} \, dx}{2 \sqrt {-b^4+a^4 x^4}} \\ & = \frac {\left (1+\frac {a^4}{\sqrt {-a^8}}\right ) b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticF}\left (\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {-b^4+a^4 x^4}}+\frac {\left (a^4+\sqrt {-a^8}\right ) b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticF}\left (\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a^5 \sqrt {-b^4+a^4 x^4}}-\frac {b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticPi}\left (\frac {a^6}{\left (-a^8\right )^{3/4}},\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {-b^4+a^4 x^4}}-\frac {b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticPi}\left (\frac {\sqrt [4]{-a^8}}{a^2},\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {-b^4+a^4 x^4}}-\frac {b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticPi}\left (-\frac {\sqrt {-\sqrt {-a^8}}}{a^2},\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {-b^4+a^4 x^4}}-\frac {b \sqrt {1-\frac {a^4 x^4}{b^4}} \operatorname {EllipticPi}\left (\frac {\sqrt {-\sqrt {-a^8}}}{a^2},\arcsin \left (\frac {a x}{b}\right ),-1\right )}{2 a \sqrt {-b^4+a^4 x^4}} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.62 (sec) , antiderivative size = 152, normalized size of antiderivative = 1.01 \[ \int \frac {\sqrt {-b^4+a^4 x^4} \left (b^4+a^4 x^4\right )}{b^8+a^8 x^8} \, dx=\frac {\arctan \left (\frac {a b x}{a b x-\sqrt [4]{2} \sqrt {-b^4+a^4 x^4}}\right )-\arctan \left (\frac {a b x}{a b x+\sqrt [4]{2} \sqrt {-b^4+a^4 x^4}}\right )-\text {arctanh}\left (\frac {-b^4+\sqrt {2} a^2 b^2 x^2+a^4 x^4}{2^{3/4} a b x \sqrt {-b^4+a^4 x^4}}\right )}{2\ 2^{3/4} a b} \]

[In]

Integrate[(Sqrt[-b^4 + a^4*x^4]*(b^4 + a^4*x^4))/(b^8 + a^8*x^8),x]

[Out]

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

Maple [C] (verified)

Result contains higher order function than in optimal. Order 9 vs. order 3.

Time = 0.56 (sec) , antiderivative size = 181, normalized size of antiderivative = 1.21

method result size
pseudoelliptic \(\frac {\left (\munderset {\textit {\_R} =\operatorname {RootOf}\left (16 a^{8} b^{8}+32 i a^{6} b^{6} \textit {\_Z}^{2}+8 b^{4} a^{4} \textit {\_Z}^{4}-8 i a^{2} b^{2} \textit {\_Z}^{6}+\textit {\_Z}^{8}\right )}{\sum }\frac {\left (8 i a^{6} b^{6}-4 \textit {\_R}^{2} a^{4} b^{4}+2 i \textit {\_R}^{4} a^{2} b^{2}-\textit {\_R}^{6}\right ) \ln \left (\frac {\sqrt {a^{4} x^{4}-b^{4}}+\left (-a^{2} x^{2}-i b^{2}\right ) \operatorname {csgn}\left (a^{2}\right )-\textit {\_R} x}{x}\right )}{\textit {\_R} \left (-8 i a^{6} b^{6}-4 \textit {\_R}^{2} a^{4} b^{4}+6 i \textit {\_R}^{4} a^{2} b^{2}-\textit {\_R}^{6}\right )}\right )}{4}\) \(181\)
default \(\frac {\left (\ln \left (\frac {\frac {a^{4} x^{4}-b^{4}}{2 x^{2}}-\frac {\sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}\, \sqrt {a^{4} x^{4}-b^{4}}\, \sqrt {2}}{2 x}+\frac {\sqrt {2}\, \sqrt {a^{4} b^{4}}}{2}}{\frac {a^{4} x^{4}-b^{4}}{2 x^{2}}+\frac {\sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}\, \sqrt {a^{4} x^{4}-b^{4}}\, \sqrt {2}}{2 x}+\frac {\sqrt {2}\, \sqrt {a^{4} b^{4}}}{2}}\right )+2 \arctan \left (\frac {\sqrt {a^{4} x^{4}-b^{4}}\, \sqrt {2}}{\sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}\, x}+1\right )+2 \arctan \left (\frac {\sqrt {a^{4} x^{4}-b^{4}}\, \sqrt {2}}{\sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}\, x}-1\right )\right ) \sqrt {2}}{8 \sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}}\) \(252\)
elliptic \(\frac {\left (\ln \left (\frac {\frac {a^{4} x^{4}-b^{4}}{2 x^{2}}-\frac {\sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}\, \sqrt {a^{4} x^{4}-b^{4}}\, \sqrt {2}}{2 x}+\frac {\sqrt {2}\, \sqrt {a^{4} b^{4}}}{2}}{\frac {a^{4} x^{4}-b^{4}}{2 x^{2}}+\frac {\sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}\, \sqrt {a^{4} x^{4}-b^{4}}\, \sqrt {2}}{2 x}+\frac {\sqrt {2}\, \sqrt {a^{4} b^{4}}}{2}}\right )+2 \arctan \left (\frac {\sqrt {a^{4} x^{4}-b^{4}}\, \sqrt {2}}{\sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}\, x}+1\right )+2 \arctan \left (\frac {\sqrt {a^{4} x^{4}-b^{4}}\, \sqrt {2}}{\sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}\, x}-1\right )\right ) \sqrt {2}}{8 \sqrt {\sqrt {2}\, \sqrt {a^{4} b^{4}}}}\) \(252\)

[In]

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

[Out]

1/4*sum((8*I*a^6*b^6-4*_R^2*a^4*b^4+2*I*_R^4*a^2*b^2-_R^6)*ln(((a^4*x^4-b^4)^(1/2)+(-a^2*x^2-I*b^2)*csgn(a^2)-
_R*x)/x)/_R/(-8*I*a^6*b^6-4*_R^2*a^4*b^4+6*I*_R^4*a^2*b^2-_R^6),_R=RootOf(16*a^8*b^8+32*I*a^6*b^6*_Z^2+8*b^4*a
^4*_Z^4-8*I*a^2*b^2*_Z^6+_Z^8))

Fricas [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 1.15 (sec) , antiderivative size = 651, normalized size of antiderivative = 4.34 \[ \int \frac {\sqrt {-b^4+a^4 x^4} \left (b^4+a^4 x^4\right )}{b^8+a^8 x^8} \, dx=-\frac {1}{8} \, \left (\frac {1}{2}\right )^{\frac {1}{4}} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {1}{4}} \log \left (\frac {4 \, \left (\frac {1}{2}\right )^{\frac {3}{4}} {\left (a^{8} b^{4} x^{6} - a^{4} b^{8} x^{2}\right )} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {3}{4}} + 2 \, {\left (2 \, \sqrt {\frac {1}{2}} a^{4} b^{4} x^{3} \sqrt {-\frac {1}{a^{4} b^{4}}} - a^{4} x^{5} + b^{4} x\right )} \sqrt {a^{4} x^{4} - b^{4}} - \left (\frac {1}{2}\right )^{\frac {1}{4}} {\left (a^{8} x^{8} - 4 \, a^{4} b^{4} x^{4} + b^{8}\right )} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {1}{4}}}{2 \, {\left (a^{8} x^{8} + b^{8}\right )}}\right ) + \frac {1}{8} \, \left (\frac {1}{2}\right )^{\frac {1}{4}} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {1}{4}} \log \left (-\frac {4 \, \left (\frac {1}{2}\right )^{\frac {3}{4}} {\left (a^{8} b^{4} x^{6} - a^{4} b^{8} x^{2}\right )} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {3}{4}} - 2 \, {\left (2 \, \sqrt {\frac {1}{2}} a^{4} b^{4} x^{3} \sqrt {-\frac {1}{a^{4} b^{4}}} - a^{4} x^{5} + b^{4} x\right )} \sqrt {a^{4} x^{4} - b^{4}} - \left (\frac {1}{2}\right )^{\frac {1}{4}} {\left (a^{8} x^{8} - 4 \, a^{4} b^{4} x^{4} + b^{8}\right )} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {1}{4}}}{2 \, {\left (a^{8} x^{8} + b^{8}\right )}}\right ) - \frac {1}{8} i \, \left (\frac {1}{2}\right )^{\frac {1}{4}} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {1}{4}} \log \left (-\frac {4 \, \left (\frac {1}{2}\right )^{\frac {3}{4}} {\left (i \, a^{8} b^{4} x^{6} - i \, a^{4} b^{8} x^{2}\right )} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {3}{4}} + 2 \, {\left (2 \, \sqrt {\frac {1}{2}} a^{4} b^{4} x^{3} \sqrt {-\frac {1}{a^{4} b^{4}}} + a^{4} x^{5} - b^{4} x\right )} \sqrt {a^{4} x^{4} - b^{4}} + \left (\frac {1}{2}\right )^{\frac {1}{4}} {\left (i \, a^{8} x^{8} - 4 i \, a^{4} b^{4} x^{4} + i \, b^{8}\right )} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {1}{4}}}{2 \, {\left (a^{8} x^{8} + b^{8}\right )}}\right ) + \frac {1}{8} i \, \left (\frac {1}{2}\right )^{\frac {1}{4}} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {1}{4}} \log \left (-\frac {4 \, \left (\frac {1}{2}\right )^{\frac {3}{4}} {\left (-i \, a^{8} b^{4} x^{6} + i \, a^{4} b^{8} x^{2}\right )} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {3}{4}} + 2 \, {\left (2 \, \sqrt {\frac {1}{2}} a^{4} b^{4} x^{3} \sqrt {-\frac {1}{a^{4} b^{4}}} + a^{4} x^{5} - b^{4} x\right )} \sqrt {a^{4} x^{4} - b^{4}} + \left (\frac {1}{2}\right )^{\frac {1}{4}} {\left (-i \, a^{8} x^{8} + 4 i \, a^{4} b^{4} x^{4} - i \, b^{8}\right )} \left (-\frac {1}{a^{4} b^{4}}\right )^{\frac {1}{4}}}{2 \, {\left (a^{8} x^{8} + b^{8}\right )}}\right ) \]

[In]

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

[Out]

-1/8*(1/2)^(1/4)*(-1/(a^4*b^4))^(1/4)*log(1/2*(4*(1/2)^(3/4)*(a^8*b^4*x^6 - a^4*b^8*x^2)*(-1/(a^4*b^4))^(3/4)
+ 2*(2*sqrt(1/2)*a^4*b^4*x^3*sqrt(-1/(a^4*b^4)) - a^4*x^5 + b^4*x)*sqrt(a^4*x^4 - b^4) - (1/2)^(1/4)*(a^8*x^8
- 4*a^4*b^4*x^4 + b^8)*(-1/(a^4*b^4))^(1/4))/(a^8*x^8 + b^8)) + 1/8*(1/2)^(1/4)*(-1/(a^4*b^4))^(1/4)*log(-1/2*
(4*(1/2)^(3/4)*(a^8*b^4*x^6 - a^4*b^8*x^2)*(-1/(a^4*b^4))^(3/4) - 2*(2*sqrt(1/2)*a^4*b^4*x^3*sqrt(-1/(a^4*b^4)
) - a^4*x^5 + b^4*x)*sqrt(a^4*x^4 - b^4) - (1/2)^(1/4)*(a^8*x^8 - 4*a^4*b^4*x^4 + b^8)*(-1/(a^4*b^4))^(1/4))/(
a^8*x^8 + b^8)) - 1/8*I*(1/2)^(1/4)*(-1/(a^4*b^4))^(1/4)*log(-1/2*(4*(1/2)^(3/4)*(I*a^8*b^4*x^6 - I*a^4*b^8*x^
2)*(-1/(a^4*b^4))^(3/4) + 2*(2*sqrt(1/2)*a^4*b^4*x^3*sqrt(-1/(a^4*b^4)) + a^4*x^5 - b^4*x)*sqrt(a^4*x^4 - b^4)
 + (1/2)^(1/4)*(I*a^8*x^8 - 4*I*a^4*b^4*x^4 + I*b^8)*(-1/(a^4*b^4))^(1/4))/(a^8*x^8 + b^8)) + 1/8*I*(1/2)^(1/4
)*(-1/(a^4*b^4))^(1/4)*log(-1/2*(4*(1/2)^(3/4)*(-I*a^8*b^4*x^6 + I*a^4*b^8*x^2)*(-1/(a^4*b^4))^(3/4) + 2*(2*sq
rt(1/2)*a^4*b^4*x^3*sqrt(-1/(a^4*b^4)) + a^4*x^5 - b^4*x)*sqrt(a^4*x^4 - b^4) + (1/2)^(1/4)*(-I*a^8*x^8 + 4*I*
a^4*b^4*x^4 - I*b^8)*(-1/(a^4*b^4))^(1/4))/(a^8*x^8 + b^8))

Sympy [F]

\[ \int \frac {\sqrt {-b^4+a^4 x^4} \left (b^4+a^4 x^4\right )}{b^8+a^8 x^8} \, dx=\int \frac {\sqrt {\left (a x - b\right ) \left (a x + b\right ) \left (a^{2} x^{2} + b^{2}\right )} \left (a^{4} x^{4} + b^{4}\right )}{a^{8} x^{8} + b^{8}}\, dx \]

[In]

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

[Out]

Integral(sqrt((a*x - b)*(a*x + b)*(a**2*x**2 + b**2))*(a**4*x**4 + b**4)/(a**8*x**8 + b**8), x)

Maxima [F]

\[ \int \frac {\sqrt {-b^4+a^4 x^4} \left (b^4+a^4 x^4\right )}{b^8+a^8 x^8} \, dx=\int { \frac {{\left (a^{4} x^{4} + b^{4}\right )} \sqrt {a^{4} x^{4} - b^{4}}}{a^{8} x^{8} + b^{8}} \,d x } \]

[In]

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

[Out]

integrate((a^4*x^4 + b^4)*sqrt(a^4*x^4 - b^4)/(a^8*x^8 + b^8), x)

Giac [F]

\[ \int \frac {\sqrt {-b^4+a^4 x^4} \left (b^4+a^4 x^4\right )}{b^8+a^8 x^8} \, dx=\int { \frac {{\left (a^{4} x^{4} + b^{4}\right )} \sqrt {a^{4} x^{4} - b^{4}}}{a^{8} x^{8} + b^{8}} \,d x } \]

[In]

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

[Out]

integrate((a^4*x^4 + b^4)*sqrt(a^4*x^4 - b^4)/(a^8*x^8 + b^8), x)

Mupad [F(-1)]

Timed out. \[ \int \frac {\sqrt {-b^4+a^4 x^4} \left (b^4+a^4 x^4\right )}{b^8+a^8 x^8} \, dx=\int \frac {\left (a^4\,x^4+b^4\right )\,\sqrt {a^4\,x^4-b^4}}{a^8\,x^8+b^8} \,d x \]

[In]

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

[Out]

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