\(\int \frac {-d+c x}{x^7 \sqrt [3]{-b+a x^3}} \, dx\) [2333]

   Optimal result
   Rubi [A] (verified)
   Mathematica [C] (verified)
   Maple [F]
   Fricas [A] (verification not implemented)
   Sympy [C] (verification not implemented)
   Maxima [A] (verification not implemented)
   Giac [F]
   Mupad [B] (verification not implemented)

Optimal result

Integrand size = 24, antiderivative size = 184 \[ \int \frac {-d+c x}{x^7 \sqrt [3]{-b+a x^3}} \, dx=\frac {\left (-b+a x^3\right )^{2/3} \left (-15 b d+18 b c x-20 a d x^3+27 a c x^4\right )}{90 b^2 x^6}+\frac {2 a^2 d \arctan \left (\frac {1}{\sqrt {3}}-\frac {2 \sqrt [3]{-b+a x^3}}{\sqrt {3} \sqrt [3]{b}}\right )}{9 \sqrt {3} b^{7/3}}+\frac {2 a^2 d \log \left (\sqrt [3]{b}+\sqrt [3]{-b+a x^3}\right )}{27 b^{7/3}}-\frac {a^2 d \log \left (b^{2/3}-\sqrt [3]{b} \sqrt [3]{-b+a x^3}+\left (-b+a x^3\right )^{2/3}\right )}{27 b^{7/3}} \]

[Out]

1/90*(a*x^3-b)^(2/3)*(27*a*c*x^4-20*a*d*x^3+18*b*c*x-15*b*d)/b^2/x^6-2/27*a^2*d*arctan(-1/3*3^(1/2)+2/3*(a*x^3
-b)^(1/3)*3^(1/2)/b^(1/3))*3^(1/2)/b^(7/3)+2/27*a^2*d*ln(b^(1/3)+(a*x^3-b)^(1/3))/b^(7/3)-1/27*a^2*d*ln(b^(2/3
)-b^(1/3)*(a*x^3-b)^(1/3)+(a*x^3-b)^(2/3))/b^(7/3)

Rubi [A] (verified)

Time = 0.14 (sec) , antiderivative size = 198, normalized size of antiderivative = 1.08, number of steps used = 11, number of rules used = 9, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.375, Rules used = {1858, 272, 44, 58, 631, 210, 31, 277, 270} \[ \int \frac {-d+c x}{x^7 \sqrt [3]{-b+a x^3}} \, dx=\frac {2 a^2 d \arctan \left (\frac {\sqrt [3]{b}-2 \sqrt [3]{a x^3-b}}{\sqrt {3} \sqrt [3]{b}}\right )}{9 \sqrt {3} b^{7/3}}+\frac {a^2 d \log \left (\sqrt [3]{a x^3-b}+\sqrt [3]{b}\right )}{9 b^{7/3}}-\frac {a^2 d \log (x)}{9 b^{7/3}}+\frac {3 a c \left (a x^3-b\right )^{2/3}}{10 b^2 x^2}-\frac {2 a d \left (a x^3-b\right )^{2/3}}{9 b^2 x^3}+\frac {c \left (a x^3-b\right )^{2/3}}{5 b x^5}-\frac {d \left (a x^3-b\right )^{2/3}}{6 b x^6} \]

[In]

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

[Out]

-1/6*(d*(-b + a*x^3)^(2/3))/(b*x^6) + (c*(-b + a*x^3)^(2/3))/(5*b*x^5) - (2*a*d*(-b + a*x^3)^(2/3))/(9*b^2*x^3
) + (3*a*c*(-b + a*x^3)^(2/3))/(10*b^2*x^2) + (2*a^2*d*ArcTan[(b^(1/3) - 2*(-b + a*x^3)^(1/3))/(Sqrt[3]*b^(1/3
))])/(9*Sqrt[3]*b^(7/3)) - (a^2*d*Log[x])/(9*b^(7/3)) + (a^2*d*Log[b^(1/3) + (-b + a*x^3)^(1/3)])/(9*b^(7/3))

Rule 31

Int[((a_) + (b_.)*(x_))^(-1), x_Symbol] :> Simp[Log[RemoveContent[a + b*x, x]]/b, x] /; FreeQ[{a, b}, x]

Rule 44

Int[((a_.) + (b_.)*(x_))^(m_)*((c_.) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[(a + b*x)^(m + 1)*((c + d*x)^(n + 1
)/((b*c - a*d)*(m + 1))), x] - Dist[d*((m + n + 2)/((b*c - a*d)*(m + 1))), Int[(a + b*x)^(m + 1)*(c + d*x)^n,
x], x] /; FreeQ[{a, b, c, d, n}, x] && NeQ[b*c - a*d, 0] && ILtQ[m, -1] &&  !IntegerQ[n] && LtQ[n, 0]

Rule 58

Int[1/(((a_.) + (b_.)*(x_))*((c_.) + (d_.)*(x_))^(1/3)), x_Symbol] :> With[{q = Rt[-(b*c - a*d)/b, 3]}, Simp[L
og[RemoveContent[a + b*x, x]]/(2*b*q), x] + (Dist[3/(2*b), Subst[Int[1/(q^2 - q*x + x^2), x], x, (c + d*x)^(1/
3)], x] - Dist[3/(2*b*q), Subst[Int[1/(q + x), x], x, (c + d*x)^(1/3)], x])] /; FreeQ[{a, b, c, d}, x] && NegQ
[(b*c - a*d)/b]

Rule 210

Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(-(Rt[-a, 2]*Rt[-b, 2])^(-1))*ArcTan[Rt[-b, 2]*(x/Rt[-a, 2])
], x] /; FreeQ[{a, b}, x] && PosQ[a/b] && (LtQ[a, 0] || LtQ[b, 0])

Rule 270

Int[((c_.)*(x_))^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Simp[(c*x)^(m + 1)*((a + b*x^n)^(p + 1)/(a*
c*(m + 1))), x] /; FreeQ[{a, b, c, m, n, p}, x] && EqQ[(m + 1)/n + p + 1, 0] && NeQ[m, -1]

Rule 272

Int[(x_)^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Dist[1/n, Subst[Int[x^(Simplify[(m + 1)/n] - 1)*(a
+ b*x)^p, x], x, x^n], x] /; FreeQ[{a, b, m, n, p}, x] && IntegerQ[Simplify[(m + 1)/n]]

Rule 277

Int[(x_)^(m_)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Simp[x^(m + 1)*((a + b*x^n)^(p + 1)/(a*(m + 1))), x]
 - Dist[b*((m + n*(p + 1) + 1)/(a*(m + 1))), Int[x^(m + n)*(a + b*x^n)^p, x], x] /; FreeQ[{a, b, m, n, p}, x]
&& ILtQ[Simplify[(m + 1)/n + p + 1], 0] && NeQ[m, -1]

Rule 631

Int[((a_) + (b_.)*(x_) + (c_.)*(x_)^2)^(-1), x_Symbol] :> With[{q = 1 - 4*Simplify[a*(c/b^2)]}, Dist[-2/b, Sub
st[Int[1/(q - x^2), x], x, 1 + 2*c*(x/b)], x] /; RationalQ[q] && (EqQ[q^2, 1] ||  !RationalQ[b^2 - 4*a*c])] /;
 FreeQ[{a, b, c}, x] && NeQ[b^2 - 4*a*c, 0]

Rule 1858

Int[(Pq_)*((c_.)*(x_))^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*Pq*(a +
b*x^n)^p, x], x] /; FreeQ[{a, b, c, m, n, p}, x] && (PolyQ[Pq, x] || PolyQ[Pq, x^n]) &&  !IGtQ[m, 0]

Rubi steps \begin{align*} \text {integral}& = \int \left (-\frac {d}{x^7 \sqrt [3]{-b+a x^3}}+\frac {c}{x^6 \sqrt [3]{-b+a x^3}}\right ) \, dx \\ & = c \int \frac {1}{x^6 \sqrt [3]{-b+a x^3}} \, dx-d \int \frac {1}{x^7 \sqrt [3]{-b+a x^3}} \, dx \\ & = \frac {c \left (-b+a x^3\right )^{2/3}}{5 b x^5}+\frac {(3 a c) \int \frac {1}{x^3 \sqrt [3]{-b+a x^3}} \, dx}{5 b}-\frac {1}{3} d \text {Subst}\left (\int \frac {1}{x^3 \sqrt [3]{-b+a x}} \, dx,x,x^3\right ) \\ & = -\frac {d \left (-b+a x^3\right )^{2/3}}{6 b x^6}+\frac {c \left (-b+a x^3\right )^{2/3}}{5 b x^5}+\frac {3 a c \left (-b+a x^3\right )^{2/3}}{10 b^2 x^2}-\frac {(2 a d) \text {Subst}\left (\int \frac {1}{x^2 \sqrt [3]{-b+a x}} \, dx,x,x^3\right )}{9 b} \\ & = -\frac {d \left (-b+a x^3\right )^{2/3}}{6 b x^6}+\frac {c \left (-b+a x^3\right )^{2/3}}{5 b x^5}-\frac {2 a d \left (-b+a x^3\right )^{2/3}}{9 b^2 x^3}+\frac {3 a c \left (-b+a x^3\right )^{2/3}}{10 b^2 x^2}-\frac {\left (2 a^2 d\right ) \text {Subst}\left (\int \frac {1}{x \sqrt [3]{-b+a x}} \, dx,x,x^3\right )}{27 b^2} \\ & = -\frac {d \left (-b+a x^3\right )^{2/3}}{6 b x^6}+\frac {c \left (-b+a x^3\right )^{2/3}}{5 b x^5}-\frac {2 a d \left (-b+a x^3\right )^{2/3}}{9 b^2 x^3}+\frac {3 a c \left (-b+a x^3\right )^{2/3}}{10 b^2 x^2}-\frac {a^2 d \log (x)}{9 b^{7/3}}+\frac {\left (a^2 d\right ) \text {Subst}\left (\int \frac {1}{\sqrt [3]{b}+x} \, dx,x,\sqrt [3]{-b+a x^3}\right )}{9 b^{7/3}}-\frac {\left (a^2 d\right ) \text {Subst}\left (\int \frac {1}{b^{2/3}-\sqrt [3]{b} x+x^2} \, dx,x,\sqrt [3]{-b+a x^3}\right )}{9 b^2} \\ & = -\frac {d \left (-b+a x^3\right )^{2/3}}{6 b x^6}+\frac {c \left (-b+a x^3\right )^{2/3}}{5 b x^5}-\frac {2 a d \left (-b+a x^3\right )^{2/3}}{9 b^2 x^3}+\frac {3 a c \left (-b+a x^3\right )^{2/3}}{10 b^2 x^2}-\frac {a^2 d \log (x)}{9 b^{7/3}}+\frac {a^2 d \log \left (\sqrt [3]{b}+\sqrt [3]{-b+a x^3}\right )}{9 b^{7/3}}-\frac {\left (2 a^2 d\right ) \text {Subst}\left (\int \frac {1}{-3-x^2} \, dx,x,1-\frac {2 \sqrt [3]{-b+a x^3}}{\sqrt [3]{b}}\right )}{9 b^{7/3}} \\ & = -\frac {d \left (-b+a x^3\right )^{2/3}}{6 b x^6}+\frac {c \left (-b+a x^3\right )^{2/3}}{5 b x^5}-\frac {2 a d \left (-b+a x^3\right )^{2/3}}{9 b^2 x^3}+\frac {3 a c \left (-b+a x^3\right )^{2/3}}{10 b^2 x^2}+\frac {2 a^2 d \arctan \left (\frac {1-\frac {2 \sqrt [3]{-b+a x^3}}{\sqrt [3]{b}}}{\sqrt {3}}\right )}{9 \sqrt {3} b^{7/3}}-\frac {a^2 d \log (x)}{9 b^{7/3}}+\frac {a^2 d \log \left (\sqrt [3]{b}+\sqrt [3]{-b+a x^3}\right )}{9 b^{7/3}} \\ \end{align*}

Mathematica [C] (verified)

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

Time = 10.05 (sec) , antiderivative size = 65, normalized size of antiderivative = 0.35 \[ \int \frac {-d+c x}{x^7 \sqrt [3]{-b+a x^3}} \, dx=\frac {\left (-b+a x^3\right )^{2/3} \left (b c \left (2 b+3 a x^3\right )-5 a^2 d x^5 \operatorname {Hypergeometric2F1}\left (\frac {2}{3},3,\frac {5}{3},1-\frac {a x^3}{b}\right )\right )}{10 b^3 x^5} \]

[In]

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

[Out]

((-b + a*x^3)^(2/3)*(b*c*(2*b + 3*a*x^3) - 5*a^2*d*x^5*Hypergeometric2F1[2/3, 3, 5/3, 1 - (a*x^3)/b]))/(10*b^3
*x^5)

Maple [F]

\[\int \frac {c x -d}{x^{7} \left (a \,x^{3}-b \right )^{\frac {1}{3}}}d x\]

[In]

int((c*x-d)/x^7/(a*x^3-b)^(1/3),x)

[Out]

int((c*x-d)/x^7/(a*x^3-b)^(1/3),x)

Fricas [A] (verification not implemented)

none

Time = 118.79 (sec) , antiderivative size = 405, normalized size of antiderivative = 2.20 \[ \int \frac {-d+c x}{x^7 \sqrt [3]{-b+a x^3}} \, dx=\left [\frac {30 \, \sqrt {\frac {1}{3}} a^{2} b d x^{6} \sqrt {-\frac {1}{b^{\frac {2}{3}}}} \log \left (\frac {2 \, a x^{3} - 3 \, \sqrt {\frac {1}{3}} {\left (2 \, {\left (a x^{3} - b\right )}^{\frac {2}{3}} b^{\frac {2}{3}} + {\left (a x^{3} - b\right )}^{\frac {1}{3}} b - b^{\frac {4}{3}}\right )} \sqrt {-\frac {1}{b^{\frac {2}{3}}}} - 3 \, {\left (a x^{3} - b\right )}^{\frac {1}{3}} b^{\frac {2}{3}} - 3 \, b}{x^{3}}\right ) + 20 \, a^{2} b^{\frac {2}{3}} d x^{6} \log \left (\frac {{\left (a x^{3} - b\right )}^{\frac {1}{3}} + b^{\frac {1}{3}}}{x}\right ) - 10 \, a^{2} b^{\frac {2}{3}} d x^{6} \log \left (\frac {{\left (a x^{3} - b\right )}^{\frac {2}{3}} - {\left (a x^{3} - b\right )}^{\frac {1}{3}} b^{\frac {1}{3}} + b^{\frac {2}{3}}}{x^{2}}\right ) + 3 \, {\left (27 \, a b c x^{4} - 20 \, a b d x^{3} + 18 \, b^{2} c x - 15 \, b^{2} d\right )} {\left (a x^{3} - b\right )}^{\frac {2}{3}}}{270 \, b^{3} x^{6}}, -\frac {60 \, \sqrt {\frac {1}{3}} a^{2} b^{\frac {2}{3}} d x^{6} \arctan \left (\frac {\sqrt {\frac {1}{3}} {\left (2 \, {\left (a x^{3} - b\right )}^{\frac {1}{3}} - b^{\frac {1}{3}}\right )}}{b^{\frac {1}{3}}}\right ) - 20 \, a^{2} b^{\frac {2}{3}} d x^{6} \log \left (\frac {{\left (a x^{3} - b\right )}^{\frac {1}{3}} + b^{\frac {1}{3}}}{x}\right ) + 10 \, a^{2} b^{\frac {2}{3}} d x^{6} \log \left (\frac {{\left (a x^{3} - b\right )}^{\frac {2}{3}} - {\left (a x^{3} - b\right )}^{\frac {1}{3}} b^{\frac {1}{3}} + b^{\frac {2}{3}}}{x^{2}}\right ) - 3 \, {\left (27 \, a b c x^{4} - 20 \, a b d x^{3} + 18 \, b^{2} c x - 15 \, b^{2} d\right )} {\left (a x^{3} - b\right )}^{\frac {2}{3}}}{270 \, b^{3} x^{6}}\right ] \]

[In]

integrate((c*x-d)/x^7/(a*x^3-b)^(1/3),x, algorithm="fricas")

[Out]

[1/270*(30*sqrt(1/3)*a^2*b*d*x^6*sqrt(-1/b^(2/3))*log((2*a*x^3 - 3*sqrt(1/3)*(2*(a*x^3 - b)^(2/3)*b^(2/3) + (a
*x^3 - b)^(1/3)*b - b^(4/3))*sqrt(-1/b^(2/3)) - 3*(a*x^3 - b)^(1/3)*b^(2/3) - 3*b)/x^3) + 20*a^2*b^(2/3)*d*x^6
*log(((a*x^3 - b)^(1/3) + b^(1/3))/x) - 10*a^2*b^(2/3)*d*x^6*log(((a*x^3 - b)^(2/3) - (a*x^3 - b)^(1/3)*b^(1/3
) + b^(2/3))/x^2) + 3*(27*a*b*c*x^4 - 20*a*b*d*x^3 + 18*b^2*c*x - 15*b^2*d)*(a*x^3 - b)^(2/3))/(b^3*x^6), -1/2
70*(60*sqrt(1/3)*a^2*b^(2/3)*d*x^6*arctan(sqrt(1/3)*(2*(a*x^3 - b)^(1/3) - b^(1/3))/b^(1/3)) - 20*a^2*b^(2/3)*
d*x^6*log(((a*x^3 - b)^(1/3) + b^(1/3))/x) + 10*a^2*b^(2/3)*d*x^6*log(((a*x^3 - b)^(2/3) - (a*x^3 - b)^(1/3)*b
^(1/3) + b^(2/3))/x^2) - 3*(27*a*b*c*x^4 - 20*a*b*d*x^3 + 18*b^2*c*x - 15*b^2*d)*(a*x^3 - b)^(2/3))/(b^3*x^6)]

Sympy [C] (verification not implemented)

Result contains complex when optimal does not.

Time = 2.71 (sec) , antiderivative size = 345, normalized size of antiderivative = 1.88 \[ \int \frac {-d+c x}{x^7 \sqrt [3]{-b+a x^3}} \, dx=c \left (\begin {cases} - \frac {3 a^{\frac {11}{3}} x^{6} \left (-1 + \frac {b}{a x^{3}}\right )^{\frac {2}{3}} \Gamma \left (- \frac {5}{3}\right )}{9 a^{2} b^{2} x^{6} e^{\frac {i \pi }{3}} \Gamma \left (\frac {1}{3}\right ) - 9 a b^{3} x^{3} e^{\frac {i \pi }{3}} \Gamma \left (\frac {1}{3}\right )} + \frac {a^{\frac {8}{3}} b x^{3} \left (-1 + \frac {b}{a x^{3}}\right )^{\frac {2}{3}} \Gamma \left (- \frac {5}{3}\right )}{9 a^{2} b^{2} x^{6} e^{\frac {i \pi }{3}} \Gamma \left (\frac {1}{3}\right ) - 9 a b^{3} x^{3} e^{\frac {i \pi }{3}} \Gamma \left (\frac {1}{3}\right )} + \frac {2 a^{\frac {5}{3}} b^{2} \left (-1 + \frac {b}{a x^{3}}\right )^{\frac {2}{3}} \Gamma \left (- \frac {5}{3}\right )}{9 a^{2} b^{2} x^{6} e^{\frac {i \pi }{3}} \Gamma \left (\frac {1}{3}\right ) - 9 a b^{3} x^{3} e^{\frac {i \pi }{3}} \Gamma \left (\frac {1}{3}\right )} & \text {for}\: \left |{\frac {b}{a x^{3}}}\right | > 1 \\\frac {a^{\frac {5}{3}} \left (1 - \frac {b}{a x^{3}}\right )^{\frac {2}{3}} \Gamma \left (- \frac {5}{3}\right )}{3 b^{2} \Gamma \left (\frac {1}{3}\right )} + \frac {2 a^{\frac {2}{3}} \left (1 - \frac {b}{a x^{3}}\right )^{\frac {2}{3}} \Gamma \left (- \frac {5}{3}\right )}{9 b x^{3} \Gamma \left (\frac {1}{3}\right )} & \text {otherwise} \end {cases}\right ) + \frac {d \Gamma \left (\frac {7}{3}\right ) {{}_{2}F_{1}\left (\begin {matrix} \frac {1}{3}, \frac {7}{3} \\ \frac {10}{3} \end {matrix}\middle | {\frac {b e^{2 i \pi }}{a x^{3}}} \right )}}{3 \sqrt [3]{a} x^{7} \Gamma \left (\frac {10}{3}\right )} \]

[In]

integrate((c*x-d)/x**7/(a*x**3-b)**(1/3),x)

[Out]

c*Piecewise((-3*a**(11/3)*x**6*(-1 + b/(a*x**3))**(2/3)*gamma(-5/3)/(9*a**2*b**2*x**6*exp(I*pi/3)*gamma(1/3) -
 9*a*b**3*x**3*exp(I*pi/3)*gamma(1/3)) + a**(8/3)*b*x**3*(-1 + b/(a*x**3))**(2/3)*gamma(-5/3)/(9*a**2*b**2*x**
6*exp(I*pi/3)*gamma(1/3) - 9*a*b**3*x**3*exp(I*pi/3)*gamma(1/3)) + 2*a**(5/3)*b**2*(-1 + b/(a*x**3))**(2/3)*ga
mma(-5/3)/(9*a**2*b**2*x**6*exp(I*pi/3)*gamma(1/3) - 9*a*b**3*x**3*exp(I*pi/3)*gamma(1/3)), Abs(b/(a*x**3)) >
1), (a**(5/3)*(1 - b/(a*x**3))**(2/3)*gamma(-5/3)/(3*b**2*gamma(1/3)) + 2*a**(2/3)*(1 - b/(a*x**3))**(2/3)*gam
ma(-5/3)/(9*b*x**3*gamma(1/3)), True)) + d*gamma(7/3)*hyper((1/3, 7/3), (10/3,), b*exp_polar(2*I*pi)/(a*x**3))
/(3*a**(1/3)*x**7*gamma(10/3))

Maxima [A] (verification not implemented)

none

Time = 0.27 (sec) , antiderivative size = 219, normalized size of antiderivative = 1.19 \[ \int \frac {-d+c x}{x^7 \sqrt [3]{-b+a x^3}} \, dx=-\frac {1}{54} \, {\left (\frac {4 \, \sqrt {3} a^{2} \arctan \left (\frac {\sqrt {3} {\left (2 \, {\left (a x^{3} - b\right )}^{\frac {1}{3}} - b^{\frac {1}{3}}\right )}}{3 \, b^{\frac {1}{3}}}\right )}{b^{\frac {7}{3}}} + \frac {2 \, a^{2} \log \left ({\left (a x^{3} - b\right )}^{\frac {2}{3}} - {\left (a x^{3} - b\right )}^{\frac {1}{3}} b^{\frac {1}{3}} + b^{\frac {2}{3}}\right )}{b^{\frac {7}{3}}} - \frac {4 \, a^{2} \log \left ({\left (a x^{3} - b\right )}^{\frac {1}{3}} + b^{\frac {1}{3}}\right )}{b^{\frac {7}{3}}} + \frac {3 \, {\left (4 \, {\left (a x^{3} - b\right )}^{\frac {5}{3}} a^{2} + 7 \, {\left (a x^{3} - b\right )}^{\frac {2}{3}} a^{2} b\right )}}{{\left (a x^{3} - b\right )}^{2} b^{2} + 2 \, {\left (a x^{3} - b\right )} b^{3} + b^{4}}\right )} d + \frac {c {\left (\frac {5 \, {\left (a x^{3} - b\right )}^{\frac {2}{3}} a}{x^{2}} - \frac {2 \, {\left (a x^{3} - b\right )}^{\frac {5}{3}}}{x^{5}}\right )}}{10 \, b^{2}} \]

[In]

integrate((c*x-d)/x^7/(a*x^3-b)^(1/3),x, algorithm="maxima")

[Out]

-1/54*(4*sqrt(3)*a^2*arctan(1/3*sqrt(3)*(2*(a*x^3 - b)^(1/3) - b^(1/3))/b^(1/3))/b^(7/3) + 2*a^2*log((a*x^3 -
b)^(2/3) - (a*x^3 - b)^(1/3)*b^(1/3) + b^(2/3))/b^(7/3) - 4*a^2*log((a*x^3 - b)^(1/3) + b^(1/3))/b^(7/3) + 3*(
4*(a*x^3 - b)^(5/3)*a^2 + 7*(a*x^3 - b)^(2/3)*a^2*b)/((a*x^3 - b)^2*b^2 + 2*(a*x^3 - b)*b^3 + b^4))*d + 1/10*c
*(5*(a*x^3 - b)^(2/3)*a/x^2 - 2*(a*x^3 - b)^(5/3)/x^5)/b^2

Giac [F]

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

[In]

integrate((c*x-d)/x^7/(a*x^3-b)^(1/3),x, algorithm="giac")

[Out]

integrate((c*x - d)/((a*x^3 - b)^(1/3)*x^7), x)

Mupad [B] (verification not implemented)

Time = 7.05 (sec) , antiderivative size = 250, normalized size of antiderivative = 1.36 \[ \int \frac {-d+c x}{x^7 \sqrt [3]{-b+a x^3}} \, dx=\frac {2\,a^2\,d\,\ln \left ({\left (a\,x^3-b\right )}^{1/3}+b^{1/3}\right )}{27\,b^{7/3}}-\frac {\frac {7\,a^2\,d\,{\left (a\,x^3-b\right )}^{2/3}}{18\,b}+\frac {2\,a^2\,d\,{\left (a\,x^3-b\right )}^{5/3}}{9\,b^2}}{{\left (b-a\,x^3\right )}^2-2\,b\,\left (b-a\,x^3\right )+b^2}+\frac {2\,a^2\,d\,\ln \left (\frac {4\,a^4\,d^2\,{\left (-\frac {1}{2}+\frac {\sqrt {3}\,1{}\mathrm {i}}{2}\right )}^2}{81\,b^{11/3}}+\frac {4\,a^4\,d^2\,{\left (a\,x^3-b\right )}^{1/3}}{81\,b^4}\right )\,\left (-\frac {1}{2}+\frac {\sqrt {3}\,1{}\mathrm {i}}{2}\right )}{27\,b^{7/3}}-\frac {2\,a^2\,d\,\ln \left (\frac {4\,a^4\,d^2\,{\left (\frac {1}{2}+\frac {\sqrt {3}\,1{}\mathrm {i}}{2}\right )}^2}{81\,b^{11/3}}+\frac {4\,a^4\,d^2\,{\left (a\,x^3-b\right )}^{1/3}}{81\,b^4}\right )\,\left (\frac {1}{2}+\frac {\sqrt {3}\,1{}\mathrm {i}}{2}\right )}{27\,b^{7/3}}+\frac {c\,{\left (a\,x^3-b\right )}^{2/3}\,\left (3\,a\,x^3+2\,b\right )}{10\,b^2\,x^5} \]

[In]

int(-(d - c*x)/(x^7*(a*x^3 - b)^(1/3)),x)

[Out]

(2*a^2*d*log((a*x^3 - b)^(1/3) + b^(1/3)))/(27*b^(7/3)) - ((7*a^2*d*(a*x^3 - b)^(2/3))/(18*b) + (2*a^2*d*(a*x^
3 - b)^(5/3))/(9*b^2))/((b - a*x^3)^2 - 2*b*(b - a*x^3) + b^2) + (2*a^2*d*log((4*a^4*d^2*((3^(1/2)*1i)/2 - 1/2
)^2)/(81*b^(11/3)) + (4*a^4*d^2*(a*x^3 - b)^(1/3))/(81*b^4))*((3^(1/2)*1i)/2 - 1/2))/(27*b^(7/3)) - (2*a^2*d*l
og((4*a^4*d^2*((3^(1/2)*1i)/2 + 1/2)^2)/(81*b^(11/3)) + (4*a^4*d^2*(a*x^3 - b)^(1/3))/(81*b^4))*((3^(1/2)*1i)/
2 + 1/2))/(27*b^(7/3)) + (c*(a*x^3 - b)^(2/3)*(2*b + 3*a*x^3))/(10*b^2*x^5)