Integrand size = 68, antiderivative size = 92 \[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2 d+2 a d x+\left (b^2-d\right ) x^2-2 b x^3+x^4\right )} \, dx=-\frac {\arctan \left (\frac {\sqrt {a b x+(-a-b) x^2+x^3}}{\sqrt [4]{d} (a-x)}\right )}{\sqrt [4]{d}}-\frac {\text {arctanh}\left (\frac {\sqrt [4]{d} \sqrt {a b x+(-a-b) x^2+x^3}}{x (-b+x)}\right )}{\sqrt [4]{d}} \] Output:
-arctan((a*b*x+(-a-b)*x^2+x^3)^(1/2)/d^(1/4)/(a-x))/d^(1/4)-arctanh(d^(1/4 )*(a*b*x+(-a-b)*x^2+x^3)^(1/2)/x/(-b+x))/d^(1/4)
Time = 15.86 (sec) , antiderivative size = 66, normalized size of antiderivative = 0.72 \[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2 d+2 a d x+\left (b^2-d\right ) x^2-2 b x^3+x^4\right )} \, dx=\frac {\arctan \left (\frac {x (-b+x)}{\sqrt [4]{d} \sqrt {x (-a+x) (-b+x)}}\right )-\text {arctanh}\left (\frac {\sqrt [4]{d} (-a+x)}{\sqrt {x (-a+x) (-b+x)}}\right )}{\sqrt [4]{d}} \] Input:
Integrate[(x*(-b + x)*(a*b - 2*a*x + x^2))/(Sqrt[x*(-a + x)*(-b + x)]*(-(a ^2*d) + 2*a*d*x + (b^2 - d)*x^2 - 2*b*x^3 + x^4)),x]
Output:
(ArcTan[(x*(-b + x))/(d^(1/4)*Sqrt[x*(-a + x)*(-b + x)])] - ArcTanh[(d^(1/ 4)*(-a + x))/Sqrt[x*(-a + x)*(-b + x)]])/d^(1/4)
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 d+2 a d x+x^2 \left (b^2-d\right )-2 b x^3+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 (-x^4+2 b x^3-\left (b^2-d\right ) x^2-2 a d x+a^2 d\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 (-x^4+2 b x^3-\left (b^2-d\right ) x^2-2 a d x+a^2 d\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}{\sqrt {x^2-(a+b) x+a b}}-\frac {-\left ((2 a-b) x^3\right )+\left (-b^2+3 a b+d\right ) x^2-a \left (b^2+2 d\right ) x+a^2 d}{\sqrt {x^2-(a+b) x+a b} \left (-x^4+2 b x^3-\left (b^2-d\right ) x^2-2 a d x+a^2 d\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 (a^2 (-d) \int \frac {1}{\sqrt {x^2-(a+b) x+a b} \left (-x^4+2 b x^3-b^2 \left (1-\frac {d}{b^2}\right ) x^2-2 a d x+a^2 d\right )}d\sqrt {x}+a \left (b^2+2 d\right ) \int \frac {x}{\sqrt {x^2-(a+b) x+a b} \left (-x^4+2 b x^3-b^2 \left (1-\frac {d}{b^2}\right ) x^2-2 a d x+a^2 d\right )}d\sqrt {x}-\left (3 a b-b^2+d\right ) \int \frac {x^2}{\sqrt {x^2-(a+b) x+a b} \left (-x^4+2 b x^3-b^2 \left (1-\frac {d}{b^2}\right ) x^2-2 a d x+a^2 d\right )}d\sqrt {x}+(2 a-b) \int \frac {x^3}{\sqrt {x^2-(a+b) x+a b} \left (-x^4+2 b x^3-b^2 \left (1-\frac {d}{b^2}\right ) x^2-2 a d x+a^2 d\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} \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*d) + 2*a*d*x + (b^2 - d)*x^2 - 2*b*x^3 + x^4)),x]
Output:
$Aborted
Result contains higher order function than in optimal. Order 9 vs. order 3.
Time = 1.12 (sec) , antiderivative size = 357, normalized size of antiderivative = 3.88
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 )}{\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 (\textit {\_Z}^{4}-2 b \,\textit {\_Z}^{3}+\left (b^{2}-d \right ) \textit {\_Z}^{2}+2 a d \textit {\_Z} -a^{2} d \right )}{\sum }\frac {\left (-2 \underline {\hspace {1.25 ex}}\alpha ^{3} a +\underline {\hspace {1.25 ex}}\alpha ^{3} b +3 \underline {\hspace {1.25 ex}}\alpha ^{2} a b -\underline {\hspace {1.25 ex}}\alpha ^{2} b^{2}-\underline {\hspace {1.25 ex}}\alpha a \,b^{2}+\underline {\hspace {1.25 ex}}\alpha ^{2} d -2 \underline {\hspace {1.25 ex}}\alpha a d +a^{2} d \right ) \left (\underline {\hspace {1.25 ex}}\alpha ^{3}-b \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha d +2 a d -b d \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 (\underline {\hspace {1.25 ex}}\alpha ^{3}-b \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha d +2 a d -b d \right ) b}{d \left (a^{2}-2 a b +b^{2}\right )}, \sqrt {\frac {b}{-a +b}}\right )}{\left (-2 \underline {\hspace {1.25 ex}}\alpha ^{3}+3 b \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha \,b^{2}+\underline {\hspace {1.25 ex}}\alpha d -a d \right ) \left (a^{2}-2 a b +b^{2}\right ) \sqrt {x \left (a b -a x -b x +x^{2}\right )}}\right )}{d}\) | \(357\) |
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 )}{\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 (\textit {\_Z}^{4}-2 b \,\textit {\_Z}^{3}+\left (b^{2}-d \right ) \textit {\_Z}^{2}+2 a d \textit {\_Z} -a^{2} d \right )}{\sum }\frac {\left (2 \underline {\hspace {1.25 ex}}\alpha ^{3} a -\underline {\hspace {1.25 ex}}\alpha ^{3} b -3 \underline {\hspace {1.25 ex}}\alpha ^{2} a b +\underline {\hspace {1.25 ex}}\alpha ^{2} b^{2}+\underline {\hspace {1.25 ex}}\alpha a \,b^{2}-\underline {\hspace {1.25 ex}}\alpha ^{2} d +2 \underline {\hspace {1.25 ex}}\alpha a d -a^{2} d \right ) \left (\underline {\hspace {1.25 ex}}\alpha ^{3}-b \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha d +2 a d -b d \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 (\underline {\hspace {1.25 ex}}\alpha ^{3}-b \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha d +2 a d -b d \right ) b}{d \left (a^{2}-2 a b +b^{2}\right )}, \sqrt {\frac {b}{-a +b}}\right )}{\left (-2 \underline {\hspace {1.25 ex}}\alpha ^{3}+3 b \,\underline {\hspace {1.25 ex}}\alpha ^{2}-\underline {\hspace {1.25 ex}}\alpha \,b^{2}+\underline {\hspace {1.25 ex}}\alpha d -a d \right ) \left (a^{2}-2 a b +b^{2}\right ) \sqrt {x \left (a b -a x -b x +x^{2}\right )}}\right )}{d}\) | \(357\) |
Input:
int(x*(-b+x)*(a*b-2*a*x+x^2)/(x*(-a+x)*(-b+x))^(1/2)/(-a^2*d+2*a*d*x+(b^2- d)*x^2-2*b*x^3+x^4),x,method=_RETURNVERBOSE)
Output:
-2*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))-b/d*sum((-2*_al pha^3*a+_alpha^3*b+3*_alpha^2*a*b-_alpha^2*b^2-_alpha*a*b^2+_alpha^2*d-2*_ alpha*a*d+a^2*d)/(-2*_alpha^3+3*_alpha^2*b-_alpha*b^2+_alpha*d-a*d)*(_alph a^3-_alpha^2*b-_alpha*d+2*a*d-b*d)/(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)*EllipticPi((-(-b+ x)/b)^(1/2),-(_alpha^3-_alpha^2*b-_alpha*d+2*a*d-b*d)*b/d/(a^2-2*a*b+b^2), (b/(-a+b))^(1/2)),_alpha=RootOf(_Z^4-2*b*_Z^3+(b^2-d)*_Z^2+2*a*d*_Z-a^2*d) )
Result contains complex when optimal does not.
Time = 0.39 (sec) , antiderivative size = 601, normalized size of antiderivative = 6.53 \[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2 d+2 a d x+\left (b^2-d\right ) x^2-2 b x^3+x^4\right )} \, dx=-\frac {\log \left (\frac {2 \, b x^{3} - x^{4} - a^{2} d + 2 \, a d x - {\left (b^{2} + d\right )} x^{2} + 2 \, \sqrt {a b x - {\left (a + b\right )} x^{2} + x^{3}} {\left (\frac {a d - d x}{d^{\frac {1}{4}}} + \frac {b d x - d x^{2}}{d^{\frac {3}{4}}}\right )} - \frac {2 \, {\left (a b d x - {\left (a + b\right )} d x^{2} + d x^{3}\right )}}{\sqrt {d}}}{2 \, b x^{3} - x^{4} + a^{2} d - 2 \, a d x - {\left (b^{2} - d\right )} x^{2}}\right )}{4 \, d^{\frac {1}{4}}} + \frac {\log \left (\frac {2 \, b x^{3} - x^{4} - a^{2} d + 2 \, a d x - {\left (b^{2} + d\right )} x^{2} - 2 \, \sqrt {a b x - {\left (a + b\right )} x^{2} + x^{3}} {\left (\frac {a d - d x}{d^{\frac {1}{4}}} + \frac {b d x - d x^{2}}{d^{\frac {3}{4}}}\right )} - \frac {2 \, {\left (a b d x - {\left (a + b\right )} d x^{2} + d x^{3}\right )}}{\sqrt {d}}}{2 \, b x^{3} - x^{4} + a^{2} d - 2 \, a d x - {\left (b^{2} - d\right )} x^{2}}\right )}{4 \, d^{\frac {1}{4}}} - \frac {i \, \log \left (\frac {2 \, b x^{3} - x^{4} - a^{2} d + 2 \, a d x - {\left (b^{2} + d\right )} x^{2} + 2 \, \sqrt {a b x - {\left (a + b\right )} x^{2} + x^{3}} {\left (\frac {i \, a d - i \, d x}{d^{\frac {1}{4}}} + \frac {-i \, b d x + i \, d x^{2}}{d^{\frac {3}{4}}}\right )} + \frac {2 \, {\left (a b d x - {\left (a + b\right )} d x^{2} + d x^{3}\right )}}{\sqrt {d}}}{2 \, b x^{3} - x^{4} + a^{2} d - 2 \, a d x - {\left (b^{2} - d\right )} x^{2}}\right )}{4 \, d^{\frac {1}{4}}} + \frac {i \, \log \left (\frac {2 \, b x^{3} - x^{4} - a^{2} d + 2 \, a d x - {\left (b^{2} + d\right )} x^{2} + 2 \, \sqrt {a b x - {\left (a + b\right )} x^{2} + x^{3}} {\left (\frac {-i \, a d + i \, d x}{d^{\frac {1}{4}}} + \frac {i \, b d x - i \, d x^{2}}{d^{\frac {3}{4}}}\right )} + \frac {2 \, {\left (a b d x - {\left (a + b\right )} d x^{2} + d x^{3}\right )}}{\sqrt {d}}}{2 \, b x^{3} - x^{4} + a^{2} d - 2 \, a d x - {\left (b^{2} - d\right )} x^{2}}\right )}{4 \, d^{\frac {1}{4}}} \] Input:
integrate(x*(-b+x)*(a*b-2*a*x+x^2)/(x*(-a+x)*(-b+x))^(1/2)/(-a^2*d+2*a*d*x +(b^2-d)*x^2-2*b*x^3+x^4),x, algorithm="fricas")
Output:
-1/4*log((2*b*x^3 - x^4 - a^2*d + 2*a*d*x - (b^2 + d)*x^2 + 2*sqrt(a*b*x - (a + b)*x^2 + x^3)*((a*d - d*x)/d^(1/4) + (b*d*x - d*x^2)/d^(3/4)) - 2*(a *b*d*x - (a + b)*d*x^2 + d*x^3)/sqrt(d))/(2*b*x^3 - x^4 + a^2*d - 2*a*d*x - (b^2 - d)*x^2))/d^(1/4) + 1/4*log((2*b*x^3 - x^4 - a^2*d + 2*a*d*x - (b^ 2 + d)*x^2 - 2*sqrt(a*b*x - (a + b)*x^2 + x^3)*((a*d - d*x)/d^(1/4) + (b*d *x - d*x^2)/d^(3/4)) - 2*(a*b*d*x - (a + b)*d*x^2 + d*x^3)/sqrt(d))/(2*b*x ^3 - x^4 + a^2*d - 2*a*d*x - (b^2 - d)*x^2))/d^(1/4) - 1/4*I*log((2*b*x^3 - x^4 - a^2*d + 2*a*d*x - (b^2 + d)*x^2 + 2*sqrt(a*b*x - (a + b)*x^2 + x^3 )*((I*a*d - I*d*x)/d^(1/4) + (-I*b*d*x + I*d*x^2)/d^(3/4)) + 2*(a*b*d*x - (a + b)*d*x^2 + d*x^3)/sqrt(d))/(2*b*x^3 - x^4 + a^2*d - 2*a*d*x - (b^2 - d)*x^2))/d^(1/4) + 1/4*I*log((2*b*x^3 - x^4 - a^2*d + 2*a*d*x - (b^2 + d)* x^2 + 2*sqrt(a*b*x - (a + b)*x^2 + x^3)*((-I*a*d + I*d*x)/d^(1/4) + (I*b*d *x - I*d*x^2)/d^(3/4)) + 2*(a*b*d*x - (a + b)*d*x^2 + d*x^3)/sqrt(d))/(2*b *x^3 - x^4 + a^2*d - 2*a*d*x - (b^2 - d)*x^2))/d^(1/4)
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 d+2 a d x+\left (b^2-d\right ) x^2-2 b x^3+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*d+2*a* d*x+(b**2-d)*x**2-2*b*x**3+x**4),x)
Output:
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 d+2 a d x+\left (b^2-d\right ) x^2-2 b x^3+x^4\right )} \, dx=\int { \frac {{\left (a b - 2 \, a x + x^{2}\right )} {\left (b - x\right )} x}{{\left (2 \, b x^{3} - x^{4} + a^{2} d - 2 \, a d x - {\left (b^{2} - d\right )} x^{2}\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*d+2*a*d*x +(b^2-d)*x^2-2*b*x^3+x^4),x, algorithm="maxima")
Output:
integrate((a*b - 2*a*x + x^2)*(b - x)*x/((2*b*x^3 - x^4 + a^2*d - 2*a*d*x - (b^2 - d)*x^2)*sqrt((a - x)*(b - x)*x)), x)
\[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2 d+2 a d x+\left (b^2-d\right ) x^2-2 b x^3+x^4\right )} \, dx=\int { \frac {{\left (a b - 2 \, a x + x^{2}\right )} {\left (b - x\right )} x}{{\left (2 \, b x^{3} - x^{4} + a^{2} d - 2 \, a d x - {\left (b^{2} - d\right )} x^{2}\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*d+2*a*d*x +(b^2-d)*x^2-2*b*x^3+x^4),x, algorithm="giac")
Output:
integrate((a*b - 2*a*x + x^2)*(b - x)*x/((2*b*x^3 - x^4 + a^2*d - 2*a*d*x - (b^2 - d)*x^2)*sqrt((a - x)*(b - x)*x)), x)
Time = 0.68 (sec) , antiderivative size = 705, normalized size of antiderivative = 7.66 \[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2 d+2 a d x+\left (b^2-d\right ) x^2-2 b x^3+x^4\right )} \, dx=\left (\sum _{k=1}^4\left (-\frac {2\,b\,\sqrt {\frac {x}{b}}\,\sqrt {\frac {b-x}{b}}\,\sqrt {\frac {a-x}{a-b}}\,\Pi \left (-\frac {b}{\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )-b};\mathrm {asin}\left (\sqrt {\frac {b-x}{b}}\right )\middle |-\frac {b}{a-b}\right )\,\left (-d\,a^2+a\,b^2\,\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )-3\,a\,b\,{\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )}^2+2\,a\,{\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )}^3+2\,d\,a\,\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )+b^2\,{\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )}^2-b\,{\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )}^3-d\,{\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )}^2\right )}{\left (\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )-b\right )\,\sqrt {x\,\left (a-x\right )\,\left (b-x\right )}\,\left (2\,b^2\,\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )-6\,b\,{\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )}^2+4\,{\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )}^3-2\,d\,\mathrm {root}\left (z^4-2\,b\,z^3-z^2\,\left (d-b^2\right )+2\,a\,d\,z-a^2\,d,z,k\right )+2\,a\,d\right )}\right )\right )-\frac {2\,b\,\mathrm {F}\left (\mathrm {asin}\left (\sqrt {\frac {b-x}{b}}\right )\middle |-\frac {b}{a-b}\right )\,\sqrt {\frac {x}{b}}\,\sqrt {\frac {b-x}{b}}\,\sqrt {\frac {a-x}{a-b}}}{\sqrt {x^3+\left (-a-b\right )\,x^2+a\,b\,x}} \] Input:
int((x*(b - x)*(a*b - 2*a*x + x^2))/((x*(a - x)*(b - x))^(1/2)*(x^2*(d - b ^2) + a^2*d + 2*b*x^3 - x^4 - 2*a*d*x)),x)
Output:
symsum(-(2*b*(x/b)^(1/2)*((b - x)/b)^(1/2)*((a - x)/(a - b))^(1/2)*ellipti cPi(-b/(root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a^2*d, z, k) - b), asin(((b - x)/b)^(1/2)), -b/(a - b))*(2*a*root(z^4 - 2*b*z^3 - z^2*(d - b^ 2) + 2*a*d*z - a^2*d, z, k)^3 - b*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a *d*z - a^2*d, z, k)^3 - d*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a ^2*d, z, k)^2 - a^2*d + b^2*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a^2*d, z, k)^2 + 2*a*d*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a^2 *d, z, k) - 3*a*b*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a^2*d, z, k)^2 + a*b^2*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a^2*d, z, k)) )/((root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a^2*d, z, k) - b)*(x*(a - x)*(b - x))^(1/2)*(2*a*d - 2*d*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a *d*z - a^2*d, z, k) - 6*b*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a ^2*d, z, k)^2 + 2*b^2*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a^2*d , z, k) + 4*root(z^4 - 2*b*z^3 - z^2*(d - b^2) + 2*a*d*z - a^2*d, z, k)^3) ), k, 1, 4) - (2*b*ellipticF(asin(((b - x)/b)^(1/2)), -b/(a - b))*(x/b)^(1 /2)*((b - x)/b)^(1/2)*((a - x)/(a - b))^(1/2))/(x^3 - x^2*(a + b) + a*b*x) ^(1/2)
\[ \int \frac {x (-b+x) \left (a b-2 a x+x^2\right )}{\sqrt {x (-a+x) (-b+x)} \left (-a^2 d+2 a d x+\left (b^2-d\right ) x^2-2 b x^3+x^4\right )} \, dx=\frac {-2 \sqrt {x}\, \sqrt {b -x}\, \sqrt {-a +x}\, i +2 \sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}+5 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {-a +x}\, x^{2}}{-a \,b^{2} x^{2}+2 a b \,x^{3}-a \,x^{4}+b^{2} x^{3}-2 b \,x^{4}+x^{5}+a^{3} d -3 a^{2} d x +3 a d \,x^{2}-d \,x^{3}}d x \right ) a b i +7 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {-a +x}\, x^{2}}{-a \,b^{2} x^{2}+2 a b \,x^{3}-a \,x^{4}+b^{2} x^{3}-2 b \,x^{4}+x^{5}+a^{3} d -3 a^{2} d x +3 a d \,x^{2}-d \,x^{3}}d x \right ) b^{2} i -3 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {-a +x}\, x^{2}}{-a \,b^{2} x^{2}+2 a b \,x^{3}-a \,x^{4}+b^{2} x^{3}-2 b \,x^{4}+x^{5}+a^{3} d -3 a^{2} d x +3 a d \,x^{2}-d \,x^{3}}d x \right ) d i -10 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, x}{-a \,b^{2} x^{2}+2 a b \,x^{3}-a \,x^{4}+b^{2} x^{3}-2 b \,x^{4}+x^{5}+a^{3} d -3 a^{2} d x +3 a d \,x^{2}-d \,x^{3}}d x \right ) a^{2} b -14 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, x}{-a \,b^{2} x^{2}+2 a b \,x^{3}-a \,x^{4}+b^{2} x^{3}-2 b \,x^{4}+x^{5}+a^{3} d -3 a^{2} d x +3 a d \,x^{2}-d \,x^{3}}d x \right ) a \,b^{2}+6 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}\, x}{-a \,b^{2} x^{2}+2 a b \,x^{3}-a \,x^{4}+b^{2} x^{3}-2 b \,x^{4}+x^{5}+a^{3} d -3 a^{2} d x +3 a d \,x^{2}-d \,x^{3}}d x \right ) a d +5 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}}{-a \,b^{2} x^{2}+2 a b \,x^{3}-a \,x^{4}+b^{2} x^{3}-2 b \,x^{4}+x^{5}+a^{3} d -3 a^{2} d x +3 a d \,x^{2}-d \,x^{3}}d x \right ) a^{2} b^{2}+7 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}}{-a \,b^{2} x^{2}+2 a b \,x^{3}-a \,x^{4}+b^{2} x^{3}-2 b \,x^{4}+x^{5}+a^{3} d -3 a^{2} d x +3 a d \,x^{2}-d \,x^{3}}d x \right ) a \,b^{3}-3 \left (\int \frac {\sqrt {x}\, \sqrt {b -x}\, \sqrt {a -x}}{-a \,b^{2} x^{2}+2 a b \,x^{3}-a \,x^{4}+b^{2} x^{3}-2 b \,x^{4}+x^{5}+a^{3} d -3 a^{2} d x +3 a d \,x^{2}-d \,x^{3}}d x \right ) a b d}{5 a b +7 b^{2}-3 d} \] Input:
int(x*(-b+x)*(a*b-2*a*x+x^2)/(x*(-a+x)*(-b+x))^(1/2)/(-a^2*d+2*a*d*x+(b^2- d)*x^2-2*b*x^3+x^4),x)
Output:
( - 2*sqrt(x)*sqrt(b - x)*sqrt( - a + x)*i + 2*sqrt(x)*sqrt(b - x)*sqrt(a - x) + 5*int((sqrt(x)*sqrt(b - x)*sqrt( - a + x)*x**2)/(a**3*d - 3*a**2*d* x - a*b**2*x**2 + 2*a*b*x**3 + 3*a*d*x**2 - a*x**4 + b**2*x**3 - 2*b*x**4 - d*x**3 + x**5),x)*a*b*i + 7*int((sqrt(x)*sqrt(b - x)*sqrt( - a + x)*x**2 )/(a**3*d - 3*a**2*d*x - a*b**2*x**2 + 2*a*b*x**3 + 3*a*d*x**2 - a*x**4 + b**2*x**3 - 2*b*x**4 - d*x**3 + x**5),x)*b**2*i - 3*int((sqrt(x)*sqrt(b - x)*sqrt( - a + x)*x**2)/(a**3*d - 3*a**2*d*x - a*b**2*x**2 + 2*a*b*x**3 + 3*a*d*x**2 - a*x**4 + b**2*x**3 - 2*b*x**4 - d*x**3 + x**5),x)*d*i - 10*in t((sqrt(x)*sqrt(b - x)*sqrt(a - x)*x)/(a**3*d - 3*a**2*d*x - a*b**2*x**2 + 2*a*b*x**3 + 3*a*d*x**2 - a*x**4 + b**2*x**3 - 2*b*x**4 - d*x**3 + x**5), x)*a**2*b - 14*int((sqrt(x)*sqrt(b - x)*sqrt(a - x)*x)/(a**3*d - 3*a**2*d* x - a*b**2*x**2 + 2*a*b*x**3 + 3*a*d*x**2 - a*x**4 + b**2*x**3 - 2*b*x**4 - d*x**3 + x**5),x)*a*b**2 + 6*int((sqrt(x)*sqrt(b - x)*sqrt(a - x)*x)/(a* *3*d - 3*a**2*d*x - a*b**2*x**2 + 2*a*b*x**3 + 3*a*d*x**2 - a*x**4 + b**2* x**3 - 2*b*x**4 - d*x**3 + x**5),x)*a*d + 5*int((sqrt(x)*sqrt(b - x)*sqrt( a - x))/(a**3*d - 3*a**2*d*x - a*b**2*x**2 + 2*a*b*x**3 + 3*a*d*x**2 - a*x **4 + b**2*x**3 - 2*b*x**4 - d*x**3 + x**5),x)*a**2*b**2 + 7*int((sqrt(x)* sqrt(b - x)*sqrt(a - x))/(a**3*d - 3*a**2*d*x - a*b**2*x**2 + 2*a*b*x**3 + 3*a*d*x**2 - a*x**4 + b**2*x**3 - 2*b*x**4 - d*x**3 + x**5),x)*a*b**3 - 3 *int((sqrt(x)*sqrt(b - x)*sqrt(a - x))/(a**3*d - 3*a**2*d*x - a*b**2*x*...