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

Optimal result
Mathematica [A] (verified)
Rubi [F]
Maple [C] (warning: unable to verify)
Fricas [C] (verification not implemented)
Sympy [F(-1)]
Maxima [F]
Giac [F]
Mupad [F(-1)]
Reduce [F]

Optimal result

Integrand size = 69, antiderivative size = 88 \[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2+2 a x+\left (-1+b^2 d\right ) x^2-2 b d x^3+d x^4\right )} \, dx=-\frac {\arctan \left (\frac {\sqrt [4]{d} \sqrt {a b x+(-a-b) x^2+x^3}}{a-x}\right )}{d^{3/4}}+\frac {\text {arctanh}\left (\frac {\sqrt [4]{d} \sqrt {a b x+(-a-b) x^2+x^3}}{a-x}\right )}{d^{3/4}} \] Output:

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

Mathematica [A] (verified)

Time = 15.49 (sec) , antiderivative size = 66, normalized size of antiderivative = 0.75 \[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2+2 a x+\left (-1+b^2 d\right ) x^2-2 b d x^3+d x^4\right )} \, dx=\frac {\arctan \left (\frac {\sqrt [4]{d} x (-b+x)}{\sqrt {x (-a+x) (-b+x)}}\right )+\text {arctanh}\left (\frac {\sqrt [4]{d} \sqrt {x (-a+x) (-b+x)}}{a-x}\right )}{d^{3/4}} \] Input:

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

Output:

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

Rubi [F]

Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.

\(\displaystyle \int \frac {x (x-b) \left (a b-2 a x+x^2\right )}{\sqrt {x (x-a) (x-b)} \left (-a^2+2 a x+x^2 \left (b^2 d-1\right )-2 b d x^3+d x^4\right )} \, dx\)

\(\Big \downarrow \) 2467

\(\displaystyle \frac {\sqrt {x} \sqrt {-x (a+b)+a b+x^2} \int \frac {(b-x) \sqrt {x} \left (x^2-2 a x+a b\right )}{\sqrt {x^2-(a+b) x+a b} \left (-d x^4+2 b d x^3+\left (1-b^2 d\right ) x^2-2 a x+a^2\right )}dx}{\sqrt {x (a-x) (b-x)}}\)

\(\Big \downarrow \) 2035

\(\displaystyle \frac {2 \sqrt {x} \sqrt {-x (a+b)+a b+x^2} \int \frac {(b-x) x \left (x^2-2 a x+a b\right )}{\sqrt {x^2-(a+b) x+a b} \left (-d x^4+2 b d x^3+\left (1-b^2 d\right ) x^2-2 a x+a^2\right )}d\sqrt {x}}{\sqrt {x (a-x) (b-x)}}\)

\(\Big \downarrow \) 7293

\(\displaystyle \frac {2 \sqrt {x} \sqrt {-x (a+b)+a b+x^2} \int \left (\frac {1}{d \sqrt {x^2-(a+b) x+a b}}-\frac {-\left ((2 a-b) d x^3\right )+\left (-d b^2+3 a d b+1\right ) x^2-a \left (d b^2+2\right ) x+a^2}{d \sqrt {x^2-(a+b) x+a b} \left (-d x^4+2 b d x^3+\left (1-b^2 d\right ) x^2-2 a x+a^2\right )}\right )d\sqrt {x}}{\sqrt {x (a-x) (b-x)}}\)

\(\Big \downarrow \) 2009

\(\displaystyle \frac {2 \sqrt {x} \sqrt {-x (a+b)+a b+x^2} \left (-\frac {a^2 \int \frac {1}{\sqrt {x^2-(a+b) x+a b} \left (-d x^4+2 b d x^3+\left (1-b^2 d\right ) x^2-2 a x+a^2\right )}d\sqrt {x}}{d}+\frac {a \left (b^2 d+2\right ) \int \frac {x}{\sqrt {x^2-(a+b) x+a b} \left (-d x^4+2 b d x^3+\left (1-b^2 d\right ) x^2-2 a x+a^2\right )}d\sqrt {x}}{d}-\frac {\left (3 a b d+b^2 (-d)+1\right ) \int \frac {x^2}{\sqrt {x^2-(a+b) x+a b} \left (-d x^4+2 b d x^3+\left (1-b^2 d\right ) x^2-2 a x+a^2\right )}d\sqrt {x}}{d}+(2 a-b) \int \frac {x^3}{\sqrt {x^2-(a+b) x+a b} \left (-d x^4+2 b d x^3+\left (1-b^2 d\right ) x^2-2 a x+a^2\right )}d\sqrt {x}+\frac {\left (\sqrt {a} \sqrt {b}+x\right ) \sqrt {\frac {-x (a+b)+a b+x^2}{\left (\sqrt {a} \sqrt {b}+x\right )^2}} \operatorname {EllipticF}\left (2 \arctan \left (\frac {\sqrt {x}}{\sqrt [4]{a} \sqrt [4]{b}}\right ),\frac {1}{4} \left (\frac {a+b}{\sqrt {a} \sqrt {b}}+2\right )\right )}{2 \sqrt [4]{a} \sqrt [4]{b} d \sqrt {-x (a+b)+a b+x^2}}\right )}{\sqrt {x (a-x) (b-x)}}\)

Input:

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

Output:

$Aborted
 
Maple [C] (warning: unable to verify)

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

Time = 1.29 (sec) , antiderivative size = 358, normalized size of antiderivative = 4.07

method result size
default \(-\frac {2 b \sqrt {-\frac {-b +x}{b}}\, \sqrt {\frac {-a +x}{-a +b}}\, \sqrt {\frac {x}{b}}\, \operatorname {EllipticF}\left (\sqrt {-\frac {-b +x}{b}}, \sqrt {\frac {b}{-a +b}}\right )}{d \sqrt {a b x -a \,x^{2}-b \,x^{2}+x^{3}}}-\frac {b \left (\munderset {\underline {\hspace {1.25 ex}}\alpha =\operatorname {RootOf}\left (d \,\textit {\_Z}^{4}-2 b d \,\textit {\_Z}^{3}+\left (b^{2} d -1\right ) \textit {\_Z}^{2}+2 a \textit {\_Z} -a^{2}\right )}{\sum }\frac {\left (-2 \underline {\hspace {1.25 ex}}\alpha ^{3} a d +\underline {\hspace {1.25 ex}}\alpha ^{3} b d +3 \underline {\hspace {1.25 ex}}\alpha ^{2} a b d -\underline {\hspace {1.25 ex}}\alpha ^{2} b^{2} d -\underline {\hspace {1.25 ex}}\alpha a \,b^{2} d +\underline {\hspace {1.25 ex}}\alpha ^{2}-2 \underline {\hspace {1.25 ex}}\alpha a +a^{2}\right ) \left (d \,\underline {\hspace {1.25 ex}}\alpha ^{3}-b d \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha +2 a -b \right ) \sqrt {-\frac {-b +x}{b}}\, \sqrt {\frac {-a +x}{-a +b}}\, \sqrt {\frac {x}{b}}\, \operatorname {EllipticPi}\left (\sqrt {-\frac {-b +x}{b}}, -\frac {\left (d \,\underline {\hspace {1.25 ex}}\alpha ^{3}-b d \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha +2 a -b \right ) b}{a^{2}-2 a b +b^{2}}, \sqrt {\frac {b}{-a +b}}\right )}{\left (-2 d \,\underline {\hspace {1.25 ex}}\alpha ^{3}+3 b d \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha \,b^{2} d +\underline {\hspace {1.25 ex}}\alpha -a \right ) \left (a^{2}-2 a b +b^{2}\right ) \sqrt {x \left (a b -a x -b x +x^{2}\right )}}\right )}{d}\) \(358\)
elliptic \(-\frac {2 b \sqrt {-\frac {-b +x}{b}}\, \sqrt {\frac {-a +x}{-a +b}}\, \sqrt {\frac {x}{b}}\, \operatorname {EllipticF}\left (\sqrt {-\frac {-b +x}{b}}, \sqrt {\frac {b}{-a +b}}\right )}{d \sqrt {a b x -a \,x^{2}-b \,x^{2}+x^{3}}}-\frac {b \left (\munderset {\underline {\hspace {1.25 ex}}\alpha =\operatorname {RootOf}\left (d \,\textit {\_Z}^{4}-2 b d \,\textit {\_Z}^{3}+\left (b^{2} d -1\right ) \textit {\_Z}^{2}+2 a \textit {\_Z} -a^{2}\right )}{\sum }\frac {\left (2 \underline {\hspace {1.25 ex}}\alpha ^{3} a d -\underline {\hspace {1.25 ex}}\alpha ^{3} b d -3 \underline {\hspace {1.25 ex}}\alpha ^{2} a b d +\underline {\hspace {1.25 ex}}\alpha ^{2} b^{2} d +\underline {\hspace {1.25 ex}}\alpha a \,b^{2} d -\underline {\hspace {1.25 ex}}\alpha ^{2}+2 \underline {\hspace {1.25 ex}}\alpha a -a^{2}\right ) \left (d \,\underline {\hspace {1.25 ex}}\alpha ^{3}-b d \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha +2 a -b \right ) \sqrt {-\frac {-b +x}{b}}\, \sqrt {\frac {-a +x}{-a +b}}\, \sqrt {\frac {x}{b}}\, \operatorname {EllipticPi}\left (\sqrt {-\frac {-b +x}{b}}, -\frac {\left (d \,\underline {\hspace {1.25 ex}}\alpha ^{3}-b d \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha +2 a -b \right ) b}{a^{2}-2 a b +b^{2}}, \sqrt {\frac {b}{-a +b}}\right )}{\left (2 d \,\underline {\hspace {1.25 ex}}\alpha ^{3}-3 b d \,\underline {\hspace {1.25 ex}}\alpha ^{2}+\underline {\hspace {1.25 ex}}\alpha \,b^{2} d -\underline {\hspace {1.25 ex}}\alpha +a \right ) \left (a^{2}-2 a b +b^{2}\right ) \sqrt {x \left (a b -a x -b x +x^{2}\right )}}\right )}{d}\) \(360\)

Input:

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

Output:

-2/d*b*(-(-b+x)/b)^(1/2)*((-a+x)/(-a+b))^(1/2)*(x/b)^(1/2)/(a*b*x-a*x^2-b* 
x^2+x^3)^(1/2)*EllipticF((-(-b+x)/b)^(1/2),(b/(-a+b))^(1/2))-1/d*b*sum((-2 
*_alpha^3*a*d+_alpha^3*b*d+3*_alpha^2*a*b*d-_alpha^2*b^2*d-_alpha*a*b^2*d+ 
_alpha^2-2*_alpha*a+a^2)/(-2*_alpha^3*d+3*_alpha^2*b*d-_alpha*b^2*d+_alpha 
-a)*(_alpha^3*d-_alpha^2*b*d-_alpha+2*a-b)/(a^2-2*a*b+b^2)*(-(-b+x)/b)^(1/ 
2)*((-a+x)/(-a+b))^(1/2)*(x/b)^(1/2)/(x*(a*b-a*x-b*x+x^2))^(1/2)*EllipticP 
i((-(-b+x)/b)^(1/2),-(_alpha^3*d-_alpha^2*b*d-_alpha+2*a-b)*b/(a^2-2*a*b+b 
^2),(b/(-a+b))^(1/2)),_alpha=RootOf(d*_Z^4-2*b*d*_Z^3+(b^2*d-1)*_Z^2+2*a*_ 
Z-a^2))
 

Fricas [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 0.60 (sec) , antiderivative size = 677, normalized size of antiderivative = 7.69 \[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2+2 a x+\left (-1+b^2 d\right ) x^2-2 b d x^3+d x^4\right )} \, dx =\text {Too large to display} \] Input:

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

Output:

-1/4*(d^(-3))^(1/4)*log((2*b*d*x^3 - d*x^4 - (b^2*d + 1)*x^2 - a^2 + 2*a*x 
 + 2*sqrt(a*b*x - (a + b)*x^2 + x^3)*((b*d^3*x - d^3*x^2)*(d^(-3))^(3/4) + 
 (a*d - d*x)*(d^(-3))^(1/4)) - 2*(a*b*d^2*x - (a + b)*d^2*x^2 + d^2*x^3)*s 
qrt(d^(-3)))/(2*b*d*x^3 - d*x^4 - (b^2*d - 1)*x^2 + a^2 - 2*a*x)) + 1/4*(d 
^(-3))^(1/4)*log((2*b*d*x^3 - d*x^4 - (b^2*d + 1)*x^2 - a^2 + 2*a*x - 2*sq 
rt(a*b*x - (a + b)*x^2 + x^3)*((b*d^3*x - d^3*x^2)*(d^(-3))^(3/4) + (a*d - 
 d*x)*(d^(-3))^(1/4)) - 2*(a*b*d^2*x - (a + b)*d^2*x^2 + d^2*x^3)*sqrt(d^( 
-3)))/(2*b*d*x^3 - d*x^4 - (b^2*d - 1)*x^2 + a^2 - 2*a*x)) + 1/4*I*(d^(-3) 
)^(1/4)*log((2*b*d*x^3 - d*x^4 - (b^2*d + 1)*x^2 - a^2 + 2*a*x + 2*sqrt(a* 
b*x - (a + b)*x^2 + x^3)*((I*b*d^3*x - I*d^3*x^2)*(d^(-3))^(3/4) + (-I*a*d 
 + I*d*x)*(d^(-3))^(1/4)) + 2*(a*b*d^2*x - (a + b)*d^2*x^2 + d^2*x^3)*sqrt 
(d^(-3)))/(2*b*d*x^3 - d*x^4 - (b^2*d - 1)*x^2 + a^2 - 2*a*x)) - 1/4*I*(d^ 
(-3))^(1/4)*log((2*b*d*x^3 - d*x^4 - (b^2*d + 1)*x^2 - a^2 + 2*a*x + 2*sqr 
t(a*b*x - (a + b)*x^2 + x^3)*((-I*b*d^3*x + I*d^3*x^2)*(d^(-3))^(3/4) + (I 
*a*d - I*d*x)*(d^(-3))^(1/4)) + 2*(a*b*d^2*x - (a + b)*d^2*x^2 + d^2*x^3)* 
sqrt(d^(-3)))/(2*b*d*x^3 - d*x^4 - (b^2*d - 1)*x^2 + a^2 - 2*a*x))
 

Sympy [F(-1)]

Timed out. \[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2+2 a x+\left (-1+b^2 d\right ) x^2-2 b d x^3+d x^4\right )} \, dx=\text {Timed out} \] Input:

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

Output:

Timed out
 

Maxima [F]

\[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2+2 a x+\left (-1+b^2 d\right ) x^2-2 b d x^3+d x^4\right )} \, dx=\int { \frac {{\left (a b - 2 \, a x + x^{2}\right )} {\left (b - x\right )} x}{{\left (2 \, b d x^{3} - d x^{4} - {\left (b^{2} d - 1\right )} x^{2} + a^{2} - 2 \, a x\right )} \sqrt {{\left (a - x\right )} {\left (b - x\right )} x}} \,d x } \] Input:

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

Output:

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

Giac [F]

\[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2+2 a x+\left (-1+b^2 d\right ) x^2-2 b d x^3+d x^4\right )} \, dx=\int { \frac {{\left (a b - 2 \, a x + x^{2}\right )} {\left (b - x\right )} x}{{\left (2 \, b d x^{3} - d x^{4} - {\left (b^{2} d - 1\right )} x^{2} + a^{2} - 2 \, a x\right )} \sqrt {{\left (a - x\right )} {\left (b - x\right )} x}} \,d x } \] Input:

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

Output:

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

Mupad [F(-1)]

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

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

Output:

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

Reduce [F]

\[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2+2 a x+\left (-1+b^2 d\right ) x^2-2 b d x^3+d x^4\right )} \, dx=\frac {2 \sqrt {x}\, \sqrt {b -x}\, \sqrt {-a +x}\, b i -2 \sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, b +7 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {-a +x}}{-a \,b^{2} d \,x^{2}+2 a b d \,x^{3}-a d \,x^{4}+b^{2} d \,x^{3}-2 b d \,x^{4}+d \,x^{5}+a^{3}-3 a^{2} x +3 a \,x^{2}-x^{3}}d x \right ) a^{2} b i -\left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {-a +x}}{-a \,b^{2} d \,x^{2}+2 a b d \,x^{3}-a d \,x^{4}+b^{2} d \,x^{3}-2 b d \,x^{4}+d \,x^{5}+a^{3}-3 a^{2} x +3 a \,x^{2}-x^{3}}d x \right ) a \,b^{4} d i +5 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {-a +x}}{-a \,b^{2} d \,x^{2}+2 a b d \,x^{3}-a d \,x^{4}+b^{2} d \,x^{3}-2 b d \,x^{4}+d \,x^{5}+a^{3}-3 a^{2} x +3 a \,x^{2}-x^{3}}d x \right ) a \,b^{2} i +7 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, x^{2}}{-a \,b^{2} d \,x^{2}+2 a b d \,x^{3}-a d \,x^{4}+b^{2} d \,x^{3}-2 b d \,x^{4}+d \,x^{5}+a^{3}-3 a^{2} x +3 a \,x^{2}-x^{3}}d x \right ) a -\left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, x^{2}}{-a \,b^{2} d \,x^{2}+2 a b d \,x^{3}-a d \,x^{4}+b^{2} d \,x^{3}-2 b d \,x^{4}+d \,x^{5}+a^{3}-3 a^{2} x +3 a \,x^{2}-x^{3}}d x \right ) b^{3} d +5 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, x^{2}}{-a \,b^{2} d \,x^{2}+2 a b d \,x^{3}-a d \,x^{4}+b^{2} d \,x^{3}-2 b d \,x^{4}+d \,x^{5}+a^{3}-3 a^{2} x +3 a \,x^{2}-x^{3}}d x \right ) b -14 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, x}{-a \,b^{2} d \,x^{2}+2 a b d \,x^{3}-a d \,x^{4}+b^{2} d \,x^{3}-2 b d \,x^{4}+d \,x^{5}+a^{3}-3 a^{2} x +3 a \,x^{2}-x^{3}}d x \right ) a^{2}+2 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, x}{-a \,b^{2} d \,x^{2}+2 a b d \,x^{3}-a d \,x^{4}+b^{2} d \,x^{3}-2 b d \,x^{4}+d \,x^{5}+a^{3}-3 a^{2} x +3 a \,x^{2}-x^{3}}d x \right ) a \,b^{3} d -10 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, x}{-a \,b^{2} d \,x^{2}+2 a b d \,x^{3}-a d \,x^{4}+b^{2} d \,x^{3}-2 b d \,x^{4}+d \,x^{5}+a^{3}-3 a^{2} x +3 a \,x^{2}-x^{3}}d x \right ) a b}{-b^{3} d +7 a +5 b} \] Input:

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

Output:

(2*sqrt(x)*sqrt(b - x)*sqrt( - a + x)*b*i - 2*sqrt(x)*sqrt(b - x)*sqrt(a - 
 x)*b + 7*int((sqrt(x)*sqrt(b - x)*sqrt( - a + x))/(a**3 - 3*a**2*x - a*b* 
*2*d*x**2 + 2*a*b*d*x**3 - a*d*x**4 + 3*a*x**2 + b**2*d*x**3 - 2*b*d*x**4 
+ d*x**5 - x**3),x)*a**2*b*i - int((sqrt(x)*sqrt(b - x)*sqrt( - a + x))/(a 
**3 - 3*a**2*x - a*b**2*d*x**2 + 2*a*b*d*x**3 - a*d*x**4 + 3*a*x**2 + b**2 
*d*x**3 - 2*b*d*x**4 + d*x**5 - x**3),x)*a*b**4*d*i + 5*int((sqrt(x)*sqrt( 
b - x)*sqrt( - a + x))/(a**3 - 3*a**2*x - a*b**2*d*x**2 + 2*a*b*d*x**3 - a 
*d*x**4 + 3*a*x**2 + b**2*d*x**3 - 2*b*d*x**4 + d*x**5 - x**3),x)*a*b**2*i 
 + 7*int((sqrt(x)*sqrt(b - x)*sqrt(a - x)*x**2)/(a**3 - 3*a**2*x - a*b**2* 
d*x**2 + 2*a*b*d*x**3 - a*d*x**4 + 3*a*x**2 + b**2*d*x**3 - 2*b*d*x**4 + d 
*x**5 - x**3),x)*a - int((sqrt(x)*sqrt(b - x)*sqrt(a - x)*x**2)/(a**3 - 3* 
a**2*x - a*b**2*d*x**2 + 2*a*b*d*x**3 - a*d*x**4 + 3*a*x**2 + b**2*d*x**3 
- 2*b*d*x**4 + d*x**5 - x**3),x)*b**3*d + 5*int((sqrt(x)*sqrt(b - x)*sqrt( 
a - x)*x**2)/(a**3 - 3*a**2*x - a*b**2*d*x**2 + 2*a*b*d*x**3 - a*d*x**4 + 
3*a*x**2 + b**2*d*x**3 - 2*b*d*x**4 + d*x**5 - x**3),x)*b - 14*int((sqrt(x 
)*sqrt(b - x)*sqrt(a - x)*x)/(a**3 - 3*a**2*x - a*b**2*d*x**2 + 2*a*b*d*x* 
*3 - a*d*x**4 + 3*a*x**2 + b**2*d*x**3 - 2*b*d*x**4 + d*x**5 - x**3),x)*a* 
*2 + 2*int((sqrt(x)*sqrt(b - x)*sqrt(a - x)*x)/(a**3 - 3*a**2*x - a*b**2*d 
*x**2 + 2*a*b*d*x**3 - a*d*x**4 + 3*a*x**2 + b**2*d*x**3 - 2*b*d*x**4 + d* 
x**5 - x**3),x)*a*b**3*d - 10*int((sqrt(x)*sqrt(b - x)*sqrt(a - x)*x)/(...