3.36 \(\int \frac {f^{a+4 b x}}{c+d f^{e+2 b x}} \, dx\)

Optimal. Leaf size=61 \[ \frac {f^{a+2 b x-e}}{2 b d \log (f)}-\frac {c f^{a-2 e} \log \left (d f^{2 b x+e}+c\right )}{2 b d^2 \log (f)} \]

[Out]

1/2*f^(2*b*x+a-e)/b/d/ln(f)-1/2*c*f^(a-2*e)*ln(c+d*f^(2*b*x+e))/b/d^2/ln(f)

________________________________________________________________________________________

Rubi [A]  time = 0.06, antiderivative size = 61, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 2, integrand size = 23, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.087, Rules used = {2248, 43} \[ \frac {f^{a+2 b x-e}}{2 b d \log (f)}-\frac {c f^{a-2 e} \log \left (d f^{2 b x+e}+c\right )}{2 b d^2 \log (f)} \]

Antiderivative was successfully verified.

[In]

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

[Out]

f^(a - e + 2*b*x)/(2*b*d*Log[f]) - (c*f^(a - 2*e)*Log[c + d*f^(e + 2*b*x)])/(2*b*d^2*Log[f])

Rule 43

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_.), x_Symbol] :> Int[ExpandIntegrand[(a + b*x)^m*(c + d
*x)^n, x], x] /; FreeQ[{a, b, c, d, n}, x] && NeQ[b*c - a*d, 0] && IGtQ[m, 0] && ( !IntegerQ[n] || (EqQ[c, 0]
&& LeQ[7*m + 4*n + 4, 0]) || LtQ[9*m + 5*(n + 1), 0] || GtQ[m + n + 2, 0])

Rule 2248

Int[((a_) + (b_.)*(F_)^((e_.)*((c_.) + (d_.)*(x_))))^(p_.)*(G_)^((h_.)*((f_.) + (g_.)*(x_))), x_Symbol] :> Wit
h[{m = FullSimplify[(g*h*Log[G])/(d*e*Log[F])]}, Dist[(Denominator[m]*G^(f*h - (c*g*h)/d))/(d*e*Log[F]), Subst
[Int[x^(Numerator[m] - 1)*(a + b*x^Denominator[m])^p, x], x, F^((e*(c + d*x))/Denominator[m])], x] /; LeQ[m, -
1] || GeQ[m, 1]] /; FreeQ[{F, G, a, b, c, d, e, f, g, h, p}, x]

Rubi steps

\begin {align*} \int \frac {f^{a+4 b x}}{c+d f^{e+2 b x}} \, dx &=\frac {f^{a-2 e} \operatorname {Subst}\left (\int \frac {x}{c+d x} \, dx,x,f^{e+2 b x}\right )}{2 b \log (f)}\\ &=\frac {f^{a-2 e} \operatorname {Subst}\left (\int \left (\frac {1}{d}-\frac {c}{d (c+d x)}\right ) \, dx,x,f^{e+2 b x}\right )}{2 b \log (f)}\\ &=\frac {f^{a-e+2 b x}}{2 b d \log (f)}-\frac {c f^{a-2 e} \log \left (c+d f^{e+2 b x}\right )}{2 b d^2 \log (f)}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.05, size = 48, normalized size = 0.79 \[ \frac {f^{a-2 e} \left (d f^{2 b x+e}-c \log \left (d f^{2 b x+e}+c\right )\right )}{2 b d^2 \log (f)} \]

Antiderivative was successfully verified.

[In]

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

[Out]

(f^(a - 2*e)*(d*f^(e + 2*b*x) - c*Log[c + d*f^(e + 2*b*x)]))/(2*b*d^2*Log[f])

________________________________________________________________________________________

fricas [A]  time = 0.43, size = 53, normalized size = 0.87 \[ \frac {d f^{2 \, b x + e} f^{a - 2 \, e} - c f^{a - 2 \, e} \log \left (d f^{2 \, b x + e} + c\right )}{2 \, b d^{2} \log \relax (f)} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

1/2*(d*f^(2*b*x + e)*f^(a - 2*e) - c*f^(a - 2*e)*log(d*f^(2*b*x + e) + c))/(b*d^2*log(f))

________________________________________________________________________________________

giac [A]  time = 0.29, size = 66, normalized size = 1.08 \[ \frac {1}{2} \, f^{a} {\left (\frac {f^{2 \, b x}}{b d f^{e} \log \relax (f)} - \frac {c \log \left ({\left | d f^{2 \, b x} f^{e} + c \right |}\right )}{b d^{2} f^{2 \, e} \log \relax (f)}\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

1/2*f^a*(f^(2*b*x)/(b*d*f^e*log(f)) - c*log(abs(d*f^(2*b*x)*f^e + c))/(b*d^2*f^(2*e)*log(f)))

________________________________________________________________________________________

maple [A]  time = 0.04, size = 76, normalized size = 1.25 \[ -\frac {c \,f^{a} f^{-2 e} \ln \left (d \,{\mathrm e}^{\left (2 b x +e \right ) \ln \relax (f )}+c \right )}{2 b \,d^{2} \ln \relax (f )}+\frac {f^{a} f^{-2 e} {\mathrm e}^{\left (2 b x +e \right ) \ln \relax (f )}}{2 b d \ln \relax (f )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

1/2/(f^e)^2/ln(f)/b/d*(f^(1/2*a))^2*exp((2*b*x+e)*ln(f))-1/2/ln(f)/b/d^2*c/(f^e)^2*(f^(1/2*a))^2*ln(c+d*exp((2
*b*x+e)*ln(f)))

________________________________________________________________________________________

maxima [A]  time = 0.45, size = 65, normalized size = 1.07 \[ -\frac {c f^{a - 2 \, e} \log \left (d f^{2 \, b x + e} + c\right )}{2 \, b d^{2} \log \relax (f)} + \frac {{\left (d f^{2 \, b x + e} + c\right )} f^{a - 2 \, e}}{2 \, b d^{2} \log \relax (f)} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

-1/2*c*f^(a - 2*e)*log(d*f^(2*b*x + e) + c)/(b*d^2*log(f)) + 1/2*(d*f^(2*b*x + e) + c)*f^(a - 2*e)/(b*d^2*log(
f))

________________________________________________________________________________________

mupad [B]  time = 3.54, size = 47, normalized size = 0.77 \[ -\frac {f^{a-2\,e}\,\left (\frac {c\,\ln \left (c+d\,f^{e+2\,b\,x}\right )}{2}-\frac {d\,f^{e+2\,b\,x}}{2}\right )}{b\,d^2\,\ln \relax (f)} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

-(f^(a - 2*e)*((c*log(c + d*f^(e + 2*b*x)))/2 - (d*f^(e + 2*b*x))/2))/(b*d^2*log(f))

________________________________________________________________________________________

sympy [A]  time = 1.19, size = 92, normalized size = 1.51 \[ \frac {\left (\begin {cases} x & \text {for}\: b = 0 \vee f = 1 \\\frac {e^{2 b x \log {\relax (f )}}}{2 b \log {\relax (f )}} & \text {otherwise} \end {cases}\right ) e^{a \log {\relax (f )}} e^{- e \log {\relax (f )}}}{d} - \frac {c e^{\left (a - 2 e\right ) \log {\relax (f )}} \log {\left (\frac {c e^{\frac {a \log {\relax (f )}}{2}} e^{- e \log {\relax (f )}}}{d} + \sqrt {e^{\left (a + 4 b x\right ) \log {\relax (f )}}} \right )}}{2 b d^{2} \log {\relax (f )}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

Piecewise((x, Eq(b, 0) | Eq(f, 1)), (exp(2*b*x*log(f))/(2*b*log(f)), True))*exp(a*log(f))*exp(-e*log(f))/d - c
*exp((a - 2*e)*log(f))*log(c*exp(a*log(f)/2)*exp(-e*log(f))/d + sqrt(exp((a + 4*b*x)*log(f))))/(2*b*d**2*log(f
))

________________________________________________________________________________________