\(\int \frac {x^4 (-9+4 x^5)}{\sqrt {-x+x^6} (a-a x^5+x^9)} \, dx\) [339]

   Optimal result
   Rubi [F]
   Mathematica [F]
   Maple [F]
   Fricas [A] (verification not implemented)
   Sympy [F]
   Maxima [F]
   Giac [F]
   Mupad [F(-1)]

Optimal result

Integrand size = 35, antiderivative size = 28 \[ \int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx=-\frac {2 \text {arctanh}\left (\frac {x^5}{\sqrt {a} \sqrt {-x+x^6}}\right )}{\sqrt {a}} \]

[Out]

-2*arctanh(x^5/a^(1/2)/(x^6-x)^(1/2))/a^(1/2)

Rubi [F]

\[ \int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx=\int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx \]

[In]

Int[(x^4*(-9 + 4*x^5))/(Sqrt[-x + x^6]*(a - a*x^5 + x^9)),x]

[Out]

(8*x*Sqrt[1 - x^5]*Hypergeometric2F1[1/10, 1/2, 11/10, x^5])/Sqrt[-x + x^6] + (8*a*Sqrt[x]*Sqrt[-1 + x^5]*Defe
r[Subst][Defer[Int][1/(Sqrt[-1 + x^10]*(-a + a*x^10 - x^18)), x], x, Sqrt[x]])/Sqrt[-x + x^6] - (8*a*Sqrt[x]*S
qrt[-1 + x^5]*Defer[Subst][Defer[Int][x^10/(Sqrt[-1 + x^10]*(-a + a*x^10 - x^18)), x], x, Sqrt[x]])/Sqrt[-x +
x^6] - (18*Sqrt[x]*Sqrt[-1 + x^5]*Defer[Subst][Defer[Int][x^8/(Sqrt[-1 + x^10]*(a - a*x^10 + x^18)), x], x, Sq
rt[x]])/Sqrt[-x + x^6]

Rubi steps \begin{align*} \text {integral}& = \frac {\left (\sqrt {x} \sqrt {-1+x^5}\right ) \int \frac {x^{7/2} \left (-9+4 x^5\right )}{\sqrt {-1+x^5} \left (a-a x^5+x^9\right )} \, dx}{\sqrt {-x+x^6}} \\ & = \frac {\left (2 \sqrt {x} \sqrt {-1+x^5}\right ) \text {Subst}\left (\int \frac {x^8 \left (-9+4 x^{10}\right )}{\sqrt {-1+x^{10}} \left (a-a x^{10}+x^{18}\right )} \, dx,x,\sqrt {x}\right )}{\sqrt {-x+x^6}} \\ & = \frac {\left (2 \sqrt {x} \sqrt {-1+x^5}\right ) \text {Subst}\left (\int \left (\frac {4}{\sqrt {-1+x^{10}}}-\frac {4 a+9 x^8-4 a x^{10}}{\sqrt {-1+x^{10}} \left (a-a x^{10}+x^{18}\right )}\right ) \, dx,x,\sqrt {x}\right )}{\sqrt {-x+x^6}} \\ & = -\frac {\left (2 \sqrt {x} \sqrt {-1+x^5}\right ) \text {Subst}\left (\int \frac {4 a+9 x^8-4 a x^{10}}{\sqrt {-1+x^{10}} \left (a-a x^{10}+x^{18}\right )} \, dx,x,\sqrt {x}\right )}{\sqrt {-x+x^6}}+\frac {\left (8 \sqrt {x} \sqrt {-1+x^5}\right ) \text {Subst}\left (\int \frac {1}{\sqrt {-1+x^{10}}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x+x^6}} \\ & = \frac {\left (8 \sqrt {x} \sqrt {1-x^5}\right ) \text {Subst}\left (\int \frac {1}{\sqrt {1-x^{10}}} \, dx,x,\sqrt {x}\right )}{\sqrt {-x+x^6}}-\frac {\left (2 \sqrt {x} \sqrt {-1+x^5}\right ) \text {Subst}\left (\int \left (-\frac {4 a}{\sqrt {-1+x^{10}} \left (-a+a x^{10}-x^{18}\right )}+\frac {4 a x^{10}}{\sqrt {-1+x^{10}} \left (-a+a x^{10}-x^{18}\right )}+\frac {9 x^8}{\sqrt {-1+x^{10}} \left (a-a x^{10}+x^{18}\right )}\right ) \, dx,x,\sqrt {x}\right )}{\sqrt {-x+x^6}} \\ & = \frac {8 x \sqrt {1-x^5} \operatorname {Hypergeometric2F1}\left (\frac {1}{10},\frac {1}{2},\frac {11}{10},x^5\right )}{\sqrt {-x+x^6}}-\frac {\left (18 \sqrt {x} \sqrt {-1+x^5}\right ) \text {Subst}\left (\int \frac {x^8}{\sqrt {-1+x^{10}} \left (a-a x^{10}+x^{18}\right )} \, dx,x,\sqrt {x}\right )}{\sqrt {-x+x^6}}+\frac {\left (8 a \sqrt {x} \sqrt {-1+x^5}\right ) \text {Subst}\left (\int \frac {1}{\sqrt {-1+x^{10}} \left (-a+a x^{10}-x^{18}\right )} \, dx,x,\sqrt {x}\right )}{\sqrt {-x+x^6}}-\frac {\left (8 a \sqrt {x} \sqrt {-1+x^5}\right ) \text {Subst}\left (\int \frac {x^{10}}{\sqrt {-1+x^{10}} \left (-a+a x^{10}-x^{18}\right )} \, dx,x,\sqrt {x}\right )}{\sqrt {-x+x^6}} \\ \end{align*}

Mathematica [F]

\[ \int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx=\int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx \]

[In]

Integrate[(x^4*(-9 + 4*x^5))/(Sqrt[-x + x^6]*(a - a*x^5 + x^9)),x]

[Out]

Integrate[(x^4*(-9 + 4*x^5))/(Sqrt[-x + x^6]*(a - a*x^5 + x^9)), x]

Maple [F]

\[\int \frac {x^{4} \left (4 x^{5}-9\right )}{\sqrt {x^{6}-x}\, \left (x^{9}-a \,x^{5}+a \right )}d x\]

[In]

int(x^4*(4*x^5-9)/(x^6-x)^(1/2)/(x^9-a*x^5+a),x)

[Out]

int(x^4*(4*x^5-9)/(x^6-x)^(1/2)/(x^9-a*x^5+a),x)

Fricas [A] (verification not implemented)

none

Time = 0.61 (sec) , antiderivative size = 151, normalized size of antiderivative = 5.39 \[ \int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx=\left [\frac {\log \left (-\frac {x^{18} + 6 \, a x^{14} + a^{2} x^{10} - 6 \, a x^{9} - 2 \, a^{2} x^{5} - 4 \, {\left (x^{13} + a x^{9} - a x^{4}\right )} \sqrt {x^{6} - x} \sqrt {a} + a^{2}}{x^{18} - 2 \, a x^{14} + a^{2} x^{10} + 2 \, a x^{9} - 2 \, a^{2} x^{5} + a^{2}}\right )}{2 \, \sqrt {a}}, \frac {\sqrt {-a} \arctan \left (\frac {2 \, \sqrt {x^{6} - x} \sqrt {-a} x^{4}}{x^{9} + a x^{5} - a}\right )}{a}\right ] \]

[In]

integrate(x^4*(4*x^5-9)/(x^6-x)^(1/2)/(x^9-a*x^5+a),x, algorithm="fricas")

[Out]

[1/2*log(-(x^18 + 6*a*x^14 + a^2*x^10 - 6*a*x^9 - 2*a^2*x^5 - 4*(x^13 + a*x^9 - a*x^4)*sqrt(x^6 - x)*sqrt(a) +
 a^2)/(x^18 - 2*a*x^14 + a^2*x^10 + 2*a*x^9 - 2*a^2*x^5 + a^2))/sqrt(a), sqrt(-a)*arctan(2*sqrt(x^6 - x)*sqrt(
-a)*x^4/(x^9 + a*x^5 - a))/a]

Sympy [F]

\[ \int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx=\int \frac {x^{4} \cdot \left (4 x^{5} - 9\right )}{\sqrt {x \left (x - 1\right ) \left (x^{4} + x^{3} + x^{2} + x + 1\right )} \left (- a x^{5} + a + x^{9}\right )}\, dx \]

[In]

integrate(x**4*(4*x**5-9)/(x**6-x)**(1/2)/(x**9-a*x**5+a),x)

[Out]

Integral(x**4*(4*x**5 - 9)/(sqrt(x*(x - 1)*(x**4 + x**3 + x**2 + x + 1))*(-a*x**5 + a + x**9)), x)

Maxima [F]

\[ \int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx=\int { \frac {{\left (4 \, x^{5} - 9\right )} x^{4}}{{\left (x^{9} - a x^{5} + a\right )} \sqrt {x^{6} - x}} \,d x } \]

[In]

integrate(x^4*(4*x^5-9)/(x^6-x)^(1/2)/(x^9-a*x^5+a),x, algorithm="maxima")

[Out]

integrate((4*x^5 - 9)*x^4/((x^9 - a*x^5 + a)*sqrt(x^6 - x)), x)

Giac [F]

\[ \int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx=\int { \frac {{\left (4 \, x^{5} - 9\right )} x^{4}}{{\left (x^{9} - a x^{5} + a\right )} \sqrt {x^{6} - x}} \,d x } \]

[In]

integrate(x^4*(4*x^5-9)/(x^6-x)^(1/2)/(x^9-a*x^5+a),x, algorithm="giac")

[Out]

integrate((4*x^5 - 9)*x^4/((x^9 - a*x^5 + a)*sqrt(x^6 - x)), x)

Mupad [F(-1)]

Timed out. \[ \int \frac {x^4 \left (-9+4 x^5\right )}{\sqrt {-x+x^6} \left (a-a x^5+x^9\right )} \, dx=\int \frac {x^4\,\left (4\,x^5-9\right )}{\sqrt {x^6-x}\,\left (x^9-a\,x^5+a\right )} \,d x \]

[In]

int((x^4*(4*x^5 - 9))/((x^6 - x)^(1/2)*(a - a*x^5 + x^9)),x)

[Out]

int((x^4*(4*x^5 - 9))/((x^6 - x)^(1/2)*(a - a*x^5 + x^9)), x)