3.17.82 \(\int \frac {-((2 a-3 b) b)+2 (a-2 b) x+x^2}{\sqrt [4]{(-a+x) (-b+x)^2} (-a^3-b^2 d+(3 a^2+2 b d) x-(3 a+d) x^2+x^3)} \, dx\)

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

________________________________________________________________________________________

Rubi [F]  time = 7.25, 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 {-((2 a-3 b) b)+2 (a-2 b) x+x^2}{\sqrt [4]{(-a+x) (-b+x)^2} \left (-a^3-b^2 d+\left (3 a^2+2 b d\right ) x-(3 a+d) x^2+x^3\right )} \, dx \end {gather*}

Verification is not applicable to the result.

[In]

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

[Out]

(4*a*(-a + x)^(1/4)*Sqrt[-b + x]*Defer[Subst][Defer[Int][(x^2*Sqrt[a - b + x^4])/(-(a^2*(1 + (b*(-2*a + b))/a^
2)*d) - 2*a*(1 - b/a)*d*x^4 - d*x^8 + x^12), x], x, (-a + x)^(1/4)])/(-((a - x)*(b - x)^2))^(1/4) + (4*(-a + x
)^(1/4)*Sqrt[-b + x]*Defer[Subst][Defer[Int][(x^6*Sqrt[a - b + x^4])/(-(a^2*(1 + (b*(-2*a + b))/a^2)*d) - 2*a*
(1 - b/a)*d*x^4 - d*x^8 + x^12), x], x, (-a + x)^(1/4)])/(-((a - x)*(b - x)^2))^(1/4) - (4*(2*a - 3*b)*(-a + x
)^(1/4)*Sqrt[-b + x]*Defer[Subst][Defer[Int][(x^2*Sqrt[a - b + x^4])/(a^2*(1 + b^2/a^2)*d - 2*b*d*x^4 + x^8*(d
 - x^4) + 2*a*d*(-b + x^4)), x], x, (-a + x)^(1/4)])/(-((a - x)*(b - x)^2))^(1/4)

Rubi steps

\begin {align*} \int \frac {-((2 a-3 b) b)+2 (a-2 b) x+x^2}{\sqrt [4]{(-a+x) (-b+x)^2} \left (-a^3-b^2 d+\left (3 a^2+2 b d\right ) x-(3 a+d) x^2+x^3\right )} \, dx &=\frac {\left (\sqrt [4]{-a+x} \sqrt {-b+x}\right ) \int \frac {-((2 a-3 b) b)+2 (a-2 b) x+x^2}{\sqrt [4]{-a+x} \sqrt {-b+x} \left (-a^3-b^2 d+\left (3 a^2+2 b d\right ) x-(3 a+d) x^2+x^3\right )} \, dx}{\sqrt [4]{(-a+x) (-b+x)^2}}\\ &=\frac {\left (\sqrt [4]{-a+x} \sqrt {-b+x}\right ) \int \frac {(2 a-3 b+x) \sqrt {-b+x}}{\sqrt [4]{-a+x} \left (-a^3-b^2 d+\left (3 a^2+2 b d\right ) x-(3 a+d) x^2+x^3\right )} \, dx}{\sqrt [4]{(-a+x) (-b+x)^2}}\\ &=\frac {\left (\sqrt [4]{-a+x} \sqrt {-b+x}\right ) \int \left (\frac {3 \left (1-\frac {2 a}{3 b}\right ) b \sqrt {-b+x}}{\sqrt [4]{-a+x} \left (a^3+b^2 d-\left (3 a^2+2 b d\right ) x+(3 a+d) x^2-x^3\right )}+\frac {x \sqrt {-b+x}}{\sqrt [4]{-a+x} \left (-a^3-b^2 d+\left (3 a^2+2 b d\right ) x-(3 a+d) x^2+x^3\right )}\right ) \, dx}{\sqrt [4]{(-a+x) (-b+x)^2}}\\ &=\frac {\left (\sqrt [4]{-a+x} \sqrt {-b+x}\right ) \int \frac {x \sqrt {-b+x}}{\sqrt [4]{-a+x} \left (-a^3-b^2 d+\left (3 a^2+2 b d\right ) x-(3 a+d) x^2+x^3\right )} \, dx}{\sqrt [4]{(-a+x) (-b+x)^2}}+\frac {\left ((-2 a+3 b) \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \int \frac {\sqrt {-b+x}}{\sqrt [4]{-a+x} \left (a^3+b^2 d-\left (3 a^2+2 b d\right ) x+(3 a+d) x^2-x^3\right )} \, dx}{\sqrt [4]{(-a+x) (-b+x)^2}}\\ &=\frac {\left (4 \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \operatorname {Subst}\left (\int \frac {x^2 \left (a+x^4\right ) \sqrt {a-b+x^4}}{-a^2 d-b^2 d+2 b d x^4-d x^8+x^{12}+2 a d \left (b-x^4\right )} \, dx,x,\sqrt [4]{-a+x}\right )}{\sqrt [4]{(-a+x) (-b+x)^2}}+\frac {\left (4 (-2 a+3 b) \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \operatorname {Subst}\left (\int \frac {x^2 \sqrt {a-b+x^4}}{a^2 d+b^2 d-2 b d x^4+x^8 \left (d-x^4\right )+2 a d \left (-b+x^4\right )} \, dx,x,\sqrt [4]{-a+x}\right )}{\sqrt [4]{(-a+x) (-b+x)^2}}\\ &=\frac {\left (4 \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \operatorname {Subst}\left (\int \frac {x^2 \left (-a-x^4\right ) \sqrt {a-b+x^4}}{a^2 \left (1+\frac {b^2}{a^2}\right ) d-2 b d x^4+d x^8-x^{12}-2 a d \left (b-x^4\right )} \, dx,x,\sqrt [4]{-a+x}\right )}{\sqrt [4]{(-a+x) (-b+x)^2}}+\frac {\left (4 (-2 a+3 b) \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \operatorname {Subst}\left (\int \frac {x^2 \sqrt {a-b+x^4}}{a^2 \left (1+\frac {b^2}{a^2}\right ) d-2 b d x^4+x^8 \left (d-x^4\right )+2 a d \left (-b+x^4\right )} \, dx,x,\sqrt [4]{-a+x}\right )}{\sqrt [4]{(-a+x) (-b+x)^2}}\\ &=\frac {\left (4 \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \operatorname {Subst}\left (\int \left (\frac {a x^2 \sqrt {a-b+x^4}}{-a^2 \left (1+\frac {b (-2 a+b)}{a^2}\right ) d-2 a \left (1-\frac {b}{a}\right ) d x^4-d x^8+x^{12}}+\frac {x^6 \sqrt {a-b+x^4}}{-a^2 \left (1+\frac {b (-2 a+b)}{a^2}\right ) d-2 a \left (1-\frac {b}{a}\right ) d x^4-d x^8+x^{12}}\right ) \, dx,x,\sqrt [4]{-a+x}\right )}{\sqrt [4]{(-a+x) (-b+x)^2}}+\frac {\left (4 (-2 a+3 b) \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \operatorname {Subst}\left (\int \frac {x^2 \sqrt {a-b+x^4}}{a^2 \left (1+\frac {b^2}{a^2}\right ) d-2 b d x^4+x^8 \left (d-x^4\right )+2 a d \left (-b+x^4\right )} \, dx,x,\sqrt [4]{-a+x}\right )}{\sqrt [4]{(-a+x) (-b+x)^2}}\\ &=\frac {\left (4 \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \operatorname {Subst}\left (\int \frac {x^6 \sqrt {a-b+x^4}}{-a^2 \left (1+\frac {b (-2 a+b)}{a^2}\right ) d-2 a \left (1-\frac {b}{a}\right ) d x^4-d x^8+x^{12}} \, dx,x,\sqrt [4]{-a+x}\right )}{\sqrt [4]{(-a+x) (-b+x)^2}}+\frac {\left (4 a \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \operatorname {Subst}\left (\int \frac {x^2 \sqrt {a-b+x^4}}{-a^2 \left (1+\frac {b (-2 a+b)}{a^2}\right ) d-2 a \left (1-\frac {b}{a}\right ) d x^4-d x^8+x^{12}} \, dx,x,\sqrt [4]{-a+x}\right )}{\sqrt [4]{(-a+x) (-b+x)^2}}+\frac {\left (4 (-2 a+3 b) \sqrt [4]{-a+x} \sqrt {-b+x}\right ) \operatorname {Subst}\left (\int \frac {x^2 \sqrt {a-b+x^4}}{a^2 \left (1+\frac {b^2}{a^2}\right ) d-2 b d x^4+x^8 \left (d-x^4\right )+2 a d \left (-b+x^4\right )} \, dx,x,\sqrt [4]{-a+x}\right )}{\sqrt [4]{(-a+x) (-b+x)^2}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [C]  time = 7.34, size = 2458, normalized size = 21.75 \begin {gather*} \text {Result too large to show} \end {gather*}

Warning: Unable to verify antiderivative.

[In]

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

[Out]

((-2*I)*(a - b)*(a - x)^(3/4)*Sqrt[(b - x)/(a - x)]*((-(EllipticPi[-(1/(Sqrt[a - b]*Sqrt[Root[1 + d*#1 + (-2*a
*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]])), I*ArcSinh[Sqrt[-Sqrt[a - b]]/(a - x)^(1/4)], -1]*
Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 1]]*(1 - 4*(a - b)*Root[1 + d*
#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2] + 3*(a - b)^2*Root[1 + d*#1 + (-2*a*d + 2*b
*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]^2)*(Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d
+ b^2*d)*#1^3 & , 1] - Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 3])) + Ellip
ticPi[1/(Sqrt[a - b]*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]]), I*A
rcSinh[Sqrt[-Sqrt[a - b]]/(a - x)^(1/4)], -1]*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d +
b^2*d)*#1^3 & , 1]]*(1 - 4*(a - b)*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & ,
2] + 3*(a - b)^2*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]^2)*(Root[1 + d*
#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 1] - Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (
a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 3]) + (EllipticPi[-(1/(Sqrt[a - b]*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^
2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 1]])), I*ArcSinh[Sqrt[-Sqrt[a - b]]/(a - x)^(1/4)], -1] - EllipticPi[1/
(Sqrt[a - b]*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 1]]), I*ArcSinh[S
qrt[-Sqrt[a - b]]/(a - x)^(1/4)], -1])*(1 - 4*(a - b)*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d
 + b^2*d)*#1^3 & , 1] + 3*(a - b)^2*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & ,
 1]^2)*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]]*(Root[1 + d*#1 + (-
2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2] - Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d -
 2*a*b*d + b^2*d)*#1^3 & , 3]))*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 &
, 3]] + EllipticPi[-(1/(Sqrt[a - b]*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^
3 & , 3]])), I*ArcSinh[Sqrt[-Sqrt[a - b]]/(a - x)^(1/4)], -1]*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^
2*d - 2*a*b*d + b^2*d)*#1^3 & , 1]]*(Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 &
, 1] - Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2])*Sqrt[Root[1 + d*#1 + (-2
*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]]*(1 - 4*(a - b)*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1
^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 3] + 3*(a - b)^2*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*
b*d + b^2*d)*#1^3 & , 3]^2) - EllipticPi[1/(Sqrt[a - b]*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d -
2*a*b*d + b^2*d)*#1^3 & , 3]]), I*ArcSinh[Sqrt[-Sqrt[a - b]]/(a - x)^(1/4)], -1]*Sqrt[Root[1 + d*#1 + (-2*a*d
+ 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 1]]*(Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b
*d + b^2*d)*#1^3 & , 1] - Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2])*Sqrt[
Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]]*(1 - 4*(a - b)*Root[1 + d*#1 +
(-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 3] + 3*(a - b)^2*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#
1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 3]^2)))/(Sqrt[-Sqrt[a - b]]*((b - x)^2*(-a + x))^(1/4)*Sqrt[Root[1 +
d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 1]]*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1
^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]]*Sqrt[Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^
2*d)*#1^3 & , 3]]*(-3*a + 3*b - 2*d + 2*(a - b)^3*d*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d +
 b^2*d)*#1^3 & , 1]*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]^2 + 2*(a - b
)^3*d*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 1]^2*Root[1 + d*#1 + (-2*a*d
+ 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 3] + 2*(a - b)^3*d*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 +
(a^2*d - 2*a*b*d + b^2*d)*#1^3 & , 2]*Root[1 + d*#1 + (-2*a*d + 2*b*d)*#1^2 + (a^2*d - 2*a*b*d + b^2*d)*#1^3 &
 , 3]^2))

________________________________________________________________________________________

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

Antiderivative was successfully verified.

[In]

IntegrateAlgebraic[(-((2*a - 3*b)*b) + 2*(a - 2*b)*x + x^2)/(((-a + x)*(-b + x)^2)^(1/4)*(-a^3 - b^2*d + (3*a^
2 + 2*b*d)*x - (3*a + d)*x^2 + x^3)),x]

[Out]

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

________________________________________________________________________________________

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((-(2*a-3*b)*b+2*(a-2*b)*x+x^2)/((-a+x)*(-b+x)^2)^(1/4)/(-a^3-b^2*d+(3*a^2+2*b*d)*x-(3*a+d)*x^2+x^3),
x, algorithm="fricas")

[Out]

Timed out

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

integrate(((2*a - 3*b)*b - 2*(a - 2*b)*x - x^2)/((a^3 + b^2*d + (3*a + d)*x^2 - x^3 - (3*a^2 + 2*b*d)*x)*(-(a
- x)*(b - x)^2)^(1/4)), x)

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

integrate(((2*a - 3*b)*b - 2*(a - 2*b)*x - x^2)/((a^3 + b^2*d + (3*a + d)*x^2 - x^3 - (3*a^2 + 2*b*d)*x)*(-(a
- x)*(b - x)^2)^(1/4)), x)

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

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

________________________________________________________________________________________

sympy [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((-(2*a-3*b)*b+2*(a-2*b)*x+x**2)/((-a+x)*(-b+x)**2)**(1/4)/(-a**3-b**2*d+(3*a**2+2*b*d)*x-(3*a+d)*x**
2+x**3),x)

[Out]

Timed out

________________________________________________________________________________________