3.330 \(\int F^{a+\frac {b}{(c+d x)^2}} (c+d x)^4 \, dx\)

Optimal. Leaf size=136 \[ -\frac {4 \sqrt {\pi } b^{5/2} F^a \log ^{\frac {5}{2}}(F) \text {erfi}\left (\frac {\sqrt {b} \sqrt {\log (F)}}{c+d x}\right )}{15 d}+\frac {4 b^2 \log ^2(F) (c+d x) F^{a+\frac {b}{(c+d x)^2}}}{15 d}+\frac {(c+d x)^5 F^{a+\frac {b}{(c+d x)^2}}}{5 d}+\frac {2 b \log (F) (c+d x)^3 F^{a+\frac {b}{(c+d x)^2}}}{15 d} \]

[Out]

1/5*F^(a+b/(d*x+c)^2)*(d*x+c)^5/d+2/15*b*F^(a+b/(d*x+c)^2)*(d*x+c)^3*ln(F)/d+4/15*b^2*F^(a+b/(d*x+c)^2)*(d*x+c
)*ln(F)^2/d-4/15*b^(5/2)*F^a*erfi(b^(1/2)*ln(F)^(1/2)/(d*x+c))*ln(F)^(5/2)*Pi^(1/2)/d

________________________________________________________________________________________

Rubi [A]  time = 0.17, antiderivative size = 136, normalized size of antiderivative = 1.00, number of steps used = 5, number of rules used = 4, integrand size = 21, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.190, Rules used = {2214, 2206, 2211, 2204} \[ -\frac {4 \sqrt {\pi } b^{5/2} F^a \log ^{\frac {5}{2}}(F) \text {Erfi}\left (\frac {\sqrt {b} \sqrt {\log (F)}}{c+d x}\right )}{15 d}+\frac {4 b^2 \log ^2(F) (c+d x) F^{a+\frac {b}{(c+d x)^2}}}{15 d}+\frac {(c+d x)^5 F^{a+\frac {b}{(c+d x)^2}}}{5 d}+\frac {2 b \log (F) (c+d x)^3 F^{a+\frac {b}{(c+d x)^2}}}{15 d} \]

Antiderivative was successfully verified.

[In]

Int[F^(a + b/(c + d*x)^2)*(c + d*x)^4,x]

[Out]

(F^(a + b/(c + d*x)^2)*(c + d*x)^5)/(5*d) + (2*b*F^(a + b/(c + d*x)^2)*(c + d*x)^3*Log[F])/(15*d) + (4*b^2*F^(
a + b/(c + d*x)^2)*(c + d*x)*Log[F]^2)/(15*d) - (4*b^(5/2)*F^a*Sqrt[Pi]*Erfi[(Sqrt[b]*Sqrt[Log[F]])/(c + d*x)]
*Log[F]^(5/2))/(15*d)

Rule 2204

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^2), x_Symbol] :> Simp[(F^a*Sqrt[Pi]*Erfi[(c + d*x)*Rt[b*Log[F], 2
]])/(2*d*Rt[b*Log[F], 2]), x] /; FreeQ[{F, a, b, c, d}, x] && PosQ[b]

Rule 2206

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

Rule 2211

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> Dist[1/(d*(m + 1))
, Subst[Int[F^(a + b*x^2), x], x, (c + d*x)^(m + 1)], x] /; FreeQ[{F, a, b, c, d, m, n}, x] && EqQ[n, 2*(m + 1
)]

Rule 2214

Int[(F_)^((a_.) + (b_.)*((c_.) + (d_.)*(x_))^(n_))*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> Simp[((c + d*x)^(m
+ 1)*F^(a + b*(c + d*x)^n))/(d*(m + 1)), x] - Dist[(b*n*Log[F])/(m + 1), Int[(c + d*x)^(m + n)*F^(a + b*(c +
d*x)^n), x], x] /; FreeQ[{F, a, b, c, d}, x] && IntegerQ[(2*(m + 1))/n] && LtQ[-4, (m + 1)/n, 5] && IntegerQ[n
] && ((GtQ[n, 0] && LtQ[m, -1]) || (GtQ[-n, 0] && LeQ[-n, m + 1]))

Rubi steps

\begin {align*} \int F^{a+\frac {b}{(c+d x)^2}} (c+d x)^4 \, dx &=\frac {F^{a+\frac {b}{(c+d x)^2}} (c+d x)^5}{5 d}+\frac {1}{5} (2 b \log (F)) \int F^{a+\frac {b}{(c+d x)^2}} (c+d x)^2 \, dx\\ &=\frac {F^{a+\frac {b}{(c+d x)^2}} (c+d x)^5}{5 d}+\frac {2 b F^{a+\frac {b}{(c+d x)^2}} (c+d x)^3 \log (F)}{15 d}+\frac {1}{15} \left (4 b^2 \log ^2(F)\right ) \int F^{a+\frac {b}{(c+d x)^2}} \, dx\\ &=\frac {F^{a+\frac {b}{(c+d x)^2}} (c+d x)^5}{5 d}+\frac {2 b F^{a+\frac {b}{(c+d x)^2}} (c+d x)^3 \log (F)}{15 d}+\frac {4 b^2 F^{a+\frac {b}{(c+d x)^2}} (c+d x) \log ^2(F)}{15 d}+\frac {1}{15} \left (8 b^3 \log ^3(F)\right ) \int \frac {F^{a+\frac {b}{(c+d x)^2}}}{(c+d x)^2} \, dx\\ &=\frac {F^{a+\frac {b}{(c+d x)^2}} (c+d x)^5}{5 d}+\frac {2 b F^{a+\frac {b}{(c+d x)^2}} (c+d x)^3 \log (F)}{15 d}+\frac {4 b^2 F^{a+\frac {b}{(c+d x)^2}} (c+d x) \log ^2(F)}{15 d}-\frac {\left (8 b^3 \log ^3(F)\right ) \operatorname {Subst}\left (\int F^{a+b x^2} \, dx,x,\frac {1}{c+d x}\right )}{15 d}\\ &=\frac {F^{a+\frac {b}{(c+d x)^2}} (c+d x)^5}{5 d}+\frac {2 b F^{a+\frac {b}{(c+d x)^2}} (c+d x)^3 \log (F)}{15 d}+\frac {4 b^2 F^{a+\frac {b}{(c+d x)^2}} (c+d x) \log ^2(F)}{15 d}-\frac {4 b^{5/2} F^a \sqrt {\pi } \text {erfi}\left (\frac {\sqrt {b} \sqrt {\log (F)}}{c+d x}\right ) \log ^{\frac {5}{2}}(F)}{15 d}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.10, size = 97, normalized size = 0.71 \[ \frac {F^a \left ((c+d x) F^{\frac {b}{(c+d x)^2}} \left (4 b^2 \log ^2(F)+2 b \log (F) (c+d x)^2+3 (c+d x)^4\right )-4 \sqrt {\pi } b^{5/2} \log ^{\frac {5}{2}}(F) \text {erfi}\left (\frac {\sqrt {b} \sqrt {\log (F)}}{c+d x}\right )\right )}{15 d} \]

Antiderivative was successfully verified.

[In]

Integrate[F^(a + b/(c + d*x)^2)*(c + d*x)^4,x]

[Out]

(F^a*(-4*b^(5/2)*Sqrt[Pi]*Erfi[(Sqrt[b]*Sqrt[Log[F]])/(c + d*x)]*Log[F]^(5/2) + F^(b/(c + d*x)^2)*(c + d*x)*(3
*(c + d*x)^4 + 2*b*(c + d*x)^2*Log[F] + 4*b^2*Log[F]^2)))/(15*d)

________________________________________________________________________________________

fricas [A]  time = 0.41, size = 201, normalized size = 1.48 \[ \frac {4 \, \sqrt {\pi } F^{a} b^{2} d \sqrt {-\frac {b \log \relax (F)}{d^{2}}} \operatorname {erf}\left (\frac {d \sqrt {-\frac {b \log \relax (F)}{d^{2}}}}{d x + c}\right ) \log \relax (F)^{2} + {\left (3 \, d^{5} x^{5} + 15 \, c d^{4} x^{4} + 30 \, c^{2} d^{3} x^{3} + 30 \, c^{3} d^{2} x^{2} + 15 \, c^{4} d x + 3 \, c^{5} + 4 \, {\left (b^{2} d x + b^{2} c\right )} \log \relax (F)^{2} + 2 \, {\left (b d^{3} x^{3} + 3 \, b c d^{2} x^{2} + 3 \, b c^{2} d x + b c^{3}\right )} \log \relax (F)\right )} F^{\frac {a d^{2} x^{2} + 2 \, a c d x + a c^{2} + b}{d^{2} x^{2} + 2 \, c d x + c^{2}}}}{15 \, d} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F^(a+b/(d*x+c)^2)*(d*x+c)^4,x, algorithm="fricas")

[Out]

1/15*(4*sqrt(pi)*F^a*b^2*d*sqrt(-b*log(F)/d^2)*erf(d*sqrt(-b*log(F)/d^2)/(d*x + c))*log(F)^2 + (3*d^5*x^5 + 15
*c*d^4*x^4 + 30*c^2*d^3*x^3 + 30*c^3*d^2*x^2 + 15*c^4*d*x + 3*c^5 + 4*(b^2*d*x + b^2*c)*log(F)^2 + 2*(b*d^3*x^
3 + 3*b*c*d^2*x^2 + 3*b*c^2*d*x + b*c^3)*log(F))*F^((a*d^2*x^2 + 2*a*c*d*x + a*c^2 + b)/(d^2*x^2 + 2*c*d*x + c
^2)))/d

________________________________________________________________________________________

giac [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int {\left (d x + c\right )}^{4} F^{a + \frac {b}{{\left (d x + c\right )}^{2}}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F^(a+b/(d*x+c)^2)*(d*x+c)^4,x, algorithm="giac")

[Out]

integrate((d*x + c)^4*F^(a + b/(d*x + c)^2), x)

________________________________________________________________________________________

maple [B]  time = 0.08, size = 324, normalized size = 2.38 \[ \frac {d^{4} x^{5} F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}}}{5}+c \,d^{3} x^{4} F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}}+\frac {2 b \,d^{2} x^{3} F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}} \ln \relax (F )}{15}+2 c^{2} d^{2} x^{3} F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}}+\frac {2 b c d \,x^{2} F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}} \ln \relax (F )}{5}+2 c^{3} d \,x^{2} F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}}-\frac {4 \sqrt {\pi }\, b^{3} F^{a} \erf \left (\frac {\sqrt {-b \ln \relax (F )}}{d x +c}\right ) \ln \relax (F )^{3}}{15 \sqrt {-b \ln \relax (F )}\, d}+\frac {4 b^{2} x \,F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}} \ln \relax (F )^{2}}{15}+\frac {2 b \,c^{2} x \,F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}} \ln \relax (F )}{5}+c^{4} x \,F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}}+\frac {4 b^{2} c \,F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}} \ln \relax (F )^{2}}{15 d}+\frac {2 b \,c^{3} F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}} \ln \relax (F )}{15 d}+\frac {c^{5} F^{a} F^{\frac {b}{\left (d x +c \right )^{2}}}}{5 d} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(F^(a+1/(d*x+c)^2*b)*(d*x+c)^4,x)

[Out]

1/5*F^a*d^4*F^(1/(d*x+c)^2*b)*x^5+F^a*d^3*F^(1/(d*x+c)^2*b)*c*x^4+2*F^a*d^2*F^(1/(d*x+c)^2*b)*c^2*x^3+2*F^a*d*
F^(1/(d*x+c)^2*b)*c^3*x^2+F^a*F^(1/(d*x+c)^2*b)*c^4*x+1/5*F^a/d*F^(1/(d*x+c)^2*b)*c^5+2/15*F^a*d^2*b*ln(F)*F^(
1/(d*x+c)^2*b)*x^3+2/5*F^a*d*b*ln(F)*F^(1/(d*x+c)^2*b)*c*x^2+2/5*F^a*b*ln(F)*F^(1/(d*x+c)^2*b)*c^2*x+2/15*F^a/
d*b*ln(F)*F^(1/(d*x+c)^2*b)*c^3+4/15*F^a*b^2*ln(F)^2*F^(1/(d*x+c)^2*b)*x+4/15*F^a/d*b^2*ln(F)^2*F^(1/(d*x+c)^2
*b)*c-4/15*F^a/d*b^3*ln(F)^3*Pi^(1/2)/(-b*ln(F))^(1/2)*erf((-b*ln(F))^(1/2)/(d*x+c))

________________________________________________________________________________________

maxima [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \frac {1}{15} \, {\left (3 \, F^{a} d^{4} x^{5} + 15 \, F^{a} c d^{3} x^{4} + 2 \, {\left (15 \, F^{a} c^{2} d^{2} + F^{a} b d^{2} \log \relax (F)\right )} x^{3} + 6 \, {\left (5 \, F^{a} c^{3} d + F^{a} b c d \log \relax (F)\right )} x^{2} + {\left (15 \, F^{a} c^{4} + 6 \, F^{a} b c^{2} \log \relax (F) + 4 \, F^{a} b^{2} \log \relax (F)^{2}\right )} x\right )} F^{\frac {b}{d^{2} x^{2} + 2 \, c d x + c^{2}}} + \int \frac {2 \, {\left (4 \, F^{a} b^{3} d x \log \relax (F)^{3} - 3 \, F^{a} b c^{5} \log \relax (F) - 2 \, F^{a} b^{2} c^{3} \log \relax (F)^{2}\right )} F^{\frac {b}{d^{2} x^{2} + 2 \, c d x + c^{2}}}}{15 \, {\left (d^{3} x^{3} + 3 \, c d^{2} x^{2} + 3 \, c^{2} d x + c^{3}\right )}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F^(a+b/(d*x+c)^2)*(d*x+c)^4,x, algorithm="maxima")

[Out]

1/15*(3*F^a*d^4*x^5 + 15*F^a*c*d^3*x^4 + 2*(15*F^a*c^2*d^2 + F^a*b*d^2*log(F))*x^3 + 6*(5*F^a*c^3*d + F^a*b*c*
d*log(F))*x^2 + (15*F^a*c^4 + 6*F^a*b*c^2*log(F) + 4*F^a*b^2*log(F)^2)*x)*F^(b/(d^2*x^2 + 2*c*d*x + c^2)) + in
tegrate(2/15*(4*F^a*b^3*d*x*log(F)^3 - 3*F^a*b*c^5*log(F) - 2*F^a*b^2*c^3*log(F)^2)*F^(b/(d^2*x^2 + 2*c*d*x +
c^2))/(d^3*x^3 + 3*c*d^2*x^2 + 3*c^2*d*x + c^3), x)

________________________________________________________________________________________

mupad [B]  time = 4.01, size = 166, normalized size = 1.22 \[ \frac {F^a\,F^{\frac {b}{{\left (c+d\,x\right )}^2}}\,{\left (c+d\,x\right )}^5}{5\,d}+\frac {4\,F^a\,\sqrt {\pi }\,{\left (c+d\,x\right )}^5\,{\left (-\frac {b\,\ln \relax (F)}{{\left (c+d\,x\right )}^2}\right )}^{5/2}}{15\,d}+\frac {2\,F^a\,F^{\frac {b}{{\left (c+d\,x\right )}^2}}\,b\,\ln \relax (F)\,{\left (c+d\,x\right )}^3}{15\,d}+\frac {4\,F^a\,F^{\frac {b}{{\left (c+d\,x\right )}^2}}\,b^2\,{\ln \relax (F)}^2\,\left (c+d\,x\right )}{15\,d}-\frac {4\,F^a\,\sqrt {\pi }\,\mathrm {erfc}\left (\sqrt {-\frac {b\,\ln \relax (F)}{{\left (c+d\,x\right )}^2}}\right )\,{\left (c+d\,x\right )}^5\,{\left (-\frac {b\,\ln \relax (F)}{{\left (c+d\,x\right )}^2}\right )}^{5/2}}{15\,d} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(F^(a + b/(c + d*x)^2)*(c + d*x)^4,x)

[Out]

(F^a*F^(b/(c + d*x)^2)*(c + d*x)^5)/(5*d) + (4*F^a*pi^(1/2)*(c + d*x)^5*(-(b*log(F))/(c + d*x)^2)^(5/2))/(15*d
) + (2*F^a*F^(b/(c + d*x)^2)*b*log(F)*(c + d*x)^3)/(15*d) + (4*F^a*F^(b/(c + d*x)^2)*b^2*log(F)^2*(c + d*x))/(
15*d) - (4*F^a*pi^(1/2)*erfc((-(b*log(F))/(c + d*x)^2)^(1/2))*(c + d*x)^5*(-(b*log(F))/(c + d*x)^2)^(5/2))/(15
*d)

________________________________________________________________________________________

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

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(F**(a+b/(d*x+c)**2)*(d*x+c)**4,x)

[Out]

Integral(F**(a + b/(c + d*x)**2)*(c + d*x)**4, x)

________________________________________________________________________________________