3.16.70 \(\int \frac {(-b^2+a x^2) \sqrt {b+\sqrt {b^2+a x^2}}}{b^2+a x^2} \, dx\)

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

________________________________________________________________________________________

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

Verification is not applicable to the result.

[In]

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

[Out]

(2*a*x^3)/(3*(b + Sqrt[b^2 + a*x^2])^(3/2)) + (2*b*x)/Sqrt[b + Sqrt[b^2 + a*x^2]] - b*Defer[Int][Sqrt[b + Sqrt
[b^2 + a*x^2]]/(b - Sqrt[-a]*x), x] - b*Defer[Int][Sqrt[b + Sqrt[b^2 + a*x^2]]/(b + Sqrt[-a]*x), x]

Rubi steps

\begin {align*} \int \frac {\left (-b^2+a x^2\right ) \sqrt {b+\sqrt {b^2+a x^2}}}{b^2+a x^2} \, dx &=\int \left (\sqrt {b+\sqrt {b^2+a x^2}}-\frac {2 b^2 \sqrt {b+\sqrt {b^2+a x^2}}}{b^2+a x^2}\right ) \, dx\\ &=-\left (\left (2 b^2\right ) \int \frac {\sqrt {b+\sqrt {b^2+a x^2}}}{b^2+a x^2} \, dx\right )+\int \sqrt {b+\sqrt {b^2+a x^2}} \, dx\\ &=\frac {2 a x^3}{3 \left (b+\sqrt {b^2+a x^2}\right )^{3/2}}+\frac {2 b x}{\sqrt {b+\sqrt {b^2+a x^2}}}-\left (2 b^2\right ) \int \left (\frac {\sqrt {b+\sqrt {b^2+a x^2}}}{2 b \left (b-\sqrt {-a} x\right )}+\frac {\sqrt {b+\sqrt {b^2+a x^2}}}{2 b \left (b+\sqrt {-a} x\right )}\right ) \, dx\\ &=\frac {2 a x^3}{3 \left (b+\sqrt {b^2+a x^2}\right )^{3/2}}+\frac {2 b x}{\sqrt {b+\sqrt {b^2+a x^2}}}-b \int \frac {\sqrt {b+\sqrt {b^2+a x^2}}}{b-\sqrt {-a} x} \, dx-b \int \frac {\sqrt {b+\sqrt {b^2+a x^2}}}{b+\sqrt {-a} x} \, dx\\ \end {align*}

________________________________________________________________________________________

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

Verification is not applicable to the result.

[In]

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

[Out]

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

________________________________________________________________________________________

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

Antiderivative was successfully verified.

[In]

IntegrateAlgebraic[((-b^2 + a*x^2)*Sqrt[b + Sqrt[b^2 + a*x^2]])/(b^2 + a*x^2),x]

[Out]

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

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

Timed out

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

maple [F]  time = 0.03, size = 0, normalized size = 0.00 \[\int \frac {\left (a \,x^{2}-b^{2}\right ) \sqrt {b +\sqrt {a \,x^{2}+b^{2}}}}{a \,x^{2}+b^{2}}\, dx\]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________