3.872 \(\int \frac{e f-e f x^2}{\left (-a d+b d x-a d x^2\right ) \sqrt{-a+b x+c x^2+b x^3-a x^4}} \, dx\)

Optimal. Leaf size=88 \[ \frac{e f \tanh ^{-1}\left (\frac{-x \left (4 a^2+2 a c+b^2\right )+a b x^2+a b}{2 a \sqrt{2 a+c} \sqrt{-a x^4-a+b x^3+b x+c x^2}}\right )}{a d \sqrt{2 a+c}} \]

[Out]

(e*f*ArcTanh[(a*b - (4*a^2 + b^2 + 2*a*c)*x + a*b*x^2)/(2*a*Sqrt[2*a + c]*Sqrt[-
a + b*x + c*x^2 + b*x^3 - a*x^4])])/(a*Sqrt[2*a + c]*d)

_______________________________________________________________________________________

Rubi [A]  time = 0.555088, antiderivative size = 88, normalized size of antiderivative = 1., number of steps used = 1, number of rules used = 1, integrand size = 57, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.018 \[ \frac{e f \tanh ^{-1}\left (\frac{-x \left (4 a^2+2 a c+b^2\right )+a b x^2+a b}{2 a \sqrt{2 a+c} \sqrt{-a x^4-a+b x^3+b x+c x^2}}\right )}{a d \sqrt{2 a+c}} \]

Antiderivative was successfully verified.

[In]  Int[(e*f - e*f*x^2)/((-(a*d) + b*d*x - a*d*x^2)*Sqrt[-a + b*x + c*x^2 + b*x^3 - a*x^4]),x]

[Out]

(e*f*ArcTanh[(a*b - (4*a^2 + b^2 + 2*a*c)*x + a*b*x^2)/(2*a*Sqrt[2*a + c]*Sqrt[-
a + b*x + c*x^2 + b*x^3 - a*x^4])])/(a*Sqrt[2*a + c]*d)

_______________________________________________________________________________________

Rubi in Sympy [A]  time = 49.3683, size = 78, normalized size = 0.89 \[ - \frac{e f \operatorname{atanh}{\left (\frac{- a b x^{2} - a b + x \left (4 a^{2} + 2 a c + b^{2}\right )}{2 a \sqrt{2 a + c} \sqrt{- a x^{4} - a + b x^{3} + b x + c x^{2}}} \right )}}{a d \sqrt{2 a + c}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate((-e*f*x**2+e*f)/(-a*d*x**2+b*d*x-a*d)/(-a*x**4+b*x**3+c*x**2+b*x-a)**(1/2),x)

[Out]

-e*f*atanh((-a*b*x**2 - a*b + x*(4*a**2 + 2*a*c + b**2))/(2*a*sqrt(2*a + c)*sqrt
(-a*x**4 - a + b*x**3 + b*x + c*x**2)))/(a*d*sqrt(2*a + c))

_______________________________________________________________________________________

Mathematica [C]  time = 6.33964, size = 15147, normalized size = 172.12 \[ \text{Result too large to show} \]

Warning: Unable to verify antiderivative.

[In]  Integrate[(e*f - e*f*x^2)/((-(a*d) + b*d*x - a*d*x^2)*Sqrt[-a + b*x + c*x^2 + b*x^3 - a*x^4]),x]

[Out]

Result too large to show

_______________________________________________________________________________________

Maple [C]  time = 0.174, size = 269221, normalized size = 3059.3 \[ \text{output too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int((-e*f*x^2+e*f)/(-a*d*x^2+b*d*x-a*d)/(-a*x^4+b*x^3+c*x^2+b*x-a)^(1/2),x)

[Out]

result too large to display

_______________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{e f x^{2} - e f}{\sqrt{-a x^{4} + b x^{3} + c x^{2} + b x - a}{\left (a d x^{2} - b d x + a d\right )}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((e*f*x^2 - e*f)/(sqrt(-a*x^4 + b*x^3 + c*x^2 + b*x - a)*(a*d*x^2 - b*d*x + a*d)),x, algorithm="maxima")

[Out]

integrate((e*f*x^2 - e*f)/(sqrt(-a*x^4 + b*x^3 + c*x^2 + b*x - a)*(a*d*x^2 - b*d
*x + a*d)), x)

_______________________________________________________________________________________

Fricas [A]  time = 3.41688, size = 1, normalized size = 0.01 \[ \left [\frac{e f \log \left (-\frac{4 \, \sqrt{-a x^{4} + b x^{3} + c x^{2} + b x - a}{\left (2 \, a^{3} b + a^{2} b c +{\left (2 \, a^{3} b + a^{2} b c\right )} x^{2} -{\left (8 \, a^{4} + 2 \, a^{2} b^{2} + 2 \, a^{2} c^{2} +{\left (8 \, a^{3} + a b^{2}\right )} c\right )} x\right )} -{\left (2 \, a b^{3} x^{3} + 2 \, a b^{3} x +{\left (8 \, a^{4} - a^{2} b^{2} + 4 \, a^{3} c\right )} x^{4} + 8 \, a^{4} - a^{2} b^{2} + 4 \, a^{3} c -{\left (16 \, a^{4} + 10 \, a^{2} b^{2} + b^{4} + 8 \, a^{2} c^{2} + 4 \,{\left (6 \, a^{3} + a b^{2}\right )} c\right )} x^{2}\right )} \sqrt{2 \, a + c}}{a^{2} x^{4} - 2 \, a b x^{3} - 2 \, a b x +{\left (2 \, a^{2} + b^{2}\right )} x^{2} + a^{2}}\right )}{2 \, \sqrt{2 \, a + c} a d}, \frac{e f \arctan \left (\frac{2 \, \sqrt{-a x^{4} + b x^{3} + c x^{2} + b x - a} a \sqrt{-2 \, a - c}}{a b x^{2} + a b -{\left (4 \, a^{2} + b^{2} + 2 \, a c\right )} x}\right )}{a \sqrt{-2 \, a - c} d}\right ] \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((e*f*x^2 - e*f)/(sqrt(-a*x^4 + b*x^3 + c*x^2 + b*x - a)*(a*d*x^2 - b*d*x + a*d)),x, algorithm="fricas")

[Out]

[1/2*e*f*log(-(4*sqrt(-a*x^4 + b*x^3 + c*x^2 + b*x - a)*(2*a^3*b + a^2*b*c + (2*
a^3*b + a^2*b*c)*x^2 - (8*a^4 + 2*a^2*b^2 + 2*a^2*c^2 + (8*a^3 + a*b^2)*c)*x) -
(2*a*b^3*x^3 + 2*a*b^3*x + (8*a^4 - a^2*b^2 + 4*a^3*c)*x^4 + 8*a^4 - a^2*b^2 + 4
*a^3*c - (16*a^4 + 10*a^2*b^2 + b^4 + 8*a^2*c^2 + 4*(6*a^3 + a*b^2)*c)*x^2)*sqrt
(2*a + c))/(a^2*x^4 - 2*a*b*x^3 - 2*a*b*x + (2*a^2 + b^2)*x^2 + a^2))/(sqrt(2*a
+ c)*a*d), e*f*arctan(2*sqrt(-a*x^4 + b*x^3 + c*x^2 + b*x - a)*a*sqrt(-2*a - c)/
(a*b*x^2 + a*b - (4*a^2 + b^2 + 2*a*c)*x))/(a*sqrt(-2*a - c)*d)]

_______________________________________________________________________________________

Sympy [F]  time = 0., size = 0, normalized size = 0. \[ \frac{e f \left (\int \frac{x^{2}}{a x^{2} \sqrt{- a x^{4} - a + b x^{3} + b x + c x^{2}} + a \sqrt{- a x^{4} - a + b x^{3} + b x + c x^{2}} - b x \sqrt{- a x^{4} - a + b x^{3} + b x + c x^{2}}}\, dx + \int \left (- \frac{1}{a x^{2} \sqrt{- a x^{4} - a + b x^{3} + b x + c x^{2}} + a \sqrt{- a x^{4} - a + b x^{3} + b x + c x^{2}} - b x \sqrt{- a x^{4} - a + b x^{3} + b x + c x^{2}}}\right )\, dx\right )}{d} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((-e*f*x**2+e*f)/(-a*d*x**2+b*d*x-a*d)/(-a*x**4+b*x**3+c*x**2+b*x-a)**(1/2),x)

[Out]

e*f*(Integral(x**2/(a*x**2*sqrt(-a*x**4 - a + b*x**3 + b*x + c*x**2) + a*sqrt(-a
*x**4 - a + b*x**3 + b*x + c*x**2) - b*x*sqrt(-a*x**4 - a + b*x**3 + b*x + c*x**
2)), x) + Integral(-1/(a*x**2*sqrt(-a*x**4 - a + b*x**3 + b*x + c*x**2) + a*sqrt
(-a*x**4 - a + b*x**3 + b*x + c*x**2) - b*x*sqrt(-a*x**4 - a + b*x**3 + b*x + c*
x**2)), x))/d

_______________________________________________________________________________________

GIAC/XCAS [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{e f x^{2} - e f}{\sqrt{-a x^{4} + b x^{3} + c x^{2} + b x - a}{\left (a d x^{2} - b d x + a d\right )}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((e*f*x^2 - e*f)/(sqrt(-a*x^4 + b*x^3 + c*x^2 + b*x - a)*(a*d*x^2 - b*d*x + a*d)),x, algorithm="giac")

[Out]

integrate((e*f*x^2 - e*f)/(sqrt(-a*x^4 + b*x^3 + c*x^2 + b*x - a)*(a*d*x^2 - b*d
*x + a*d)), x)