3.499 \(\int \frac {4^x}{\sqrt {a-2^x b}} \, dx\)

Optimal. Leaf size=46 \[ \frac {2 \left (a-b 2^x\right )^{3/2}}{3 b^2 \log (2)}-\frac {2 a \sqrt {a-b 2^x}}{b^2 \log (2)} \]

[Out]

2/3*(a-2^x*b)^(3/2)/b^2/ln(2)-2*a*(a-2^x*b)^(1/2)/b^2/ln(2)

________________________________________________________________________________________

Rubi [A]  time = 0.04, antiderivative size = 46, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 2, integrand size = 16, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.125, Rules used = {2248, 43} \[ \frac {2 \left (a-b 2^x\right )^{3/2}}{3 b^2 \log (2)}-\frac {2 a \sqrt {a-b 2^x}}{b^2 \log (2)} \]

Antiderivative was successfully verified.

[In]

Int[4^x/Sqrt[a - 2^x*b],x]

[Out]

(-2*a*Sqrt[a - 2^x*b])/(b^2*Log[2]) + (2*(a - 2^x*b)^(3/2))/(3*b^2*Log[2])

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 {4^x}{\sqrt {a-2^x b}} \, dx &=\frac {\operatorname {Subst}\left (\int \frac {x}{\sqrt {a-b x}} \, dx,x,2^x\right )}{\log (2)}\\ &=\frac {\operatorname {Subst}\left (\int \left (\frac {a}{b \sqrt {a-b x}}-\frac {\sqrt {a-b x}}{b}\right ) \, dx,x,2^x\right )}{\log (2)}\\ &=-\frac {2 a \sqrt {a-2^x b}}{b^2 \log (2)}+\frac {2 \left (a-2^x b\right )^{3/2}}{3 b^2 \log (2)}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.02, size = 30, normalized size = 0.65 \[ -\frac {2 \sqrt {a-b 2^x} \left (2 a+b 2^x\right )}{b^2 \log (8)} \]

Antiderivative was successfully verified.

[In]

Integrate[4^x/Sqrt[a - 2^x*b],x]

[Out]

(-2*Sqrt[a - 2^x*b]*(2*a + 2^x*b))/(b^2*Log[8])

________________________________________________________________________________________

fricas [A]  time = 0.45, size = 28, normalized size = 0.61 \[ -\frac {2 \, {\left (2^{x} b + 2 \, a\right )} \sqrt {-2^{x} b + a}}{3 \, b^{2} \log \relax (2)} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(4^x/(a-2^x*b)^(1/2),x, algorithm="fricas")

[Out]

-2/3*(2^x*b + 2*a)*sqrt(-2^x*b + a)/(b^2*log(2))

________________________________________________________________________________________

giac [F]  time = 0.00, size = 0, normalized size = 0.00 \[ \int \frac {4^{x}}{\sqrt {-2^{x} b + a}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(4^x/(a-2^x*b)^(1/2),x, algorithm="giac")

[Out]

integrate(4^x/sqrt(-2^x*b + a), x)

________________________________________________________________________________________

maple [A]  time = 0.03, size = 29, normalized size = 0.63 \[ -\frac {2 \left (b 2^{x}+2 a \right ) \sqrt {-b 2^{x}+a}}{3 \ln \relax (2) b^{2}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(4^x/(a-b*2^x)^(1/2),x)

[Out]

-2/3*(b*2^x+2*a)/b^2*(a-b*2^x)^(1/2)/ln(2)

________________________________________________________________________________________

maxima [A]  time = 2.11, size = 71, normalized size = 1.54 \[ \frac {2^{2 \, x + 1}}{3 \, \sqrt {-2^{x} b + a} \log \relax (2)} + \frac {2^{x + 1} a}{3 \, \sqrt {-2^{x} b + a} b \log \relax (2)} - \frac {4 \, a^{2}}{3 \, \sqrt {-2^{x} b + a} b^{2} \log \relax (2)} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(4^x/(a-2^x*b)^(1/2),x, algorithm="maxima")

[Out]

1/3*2^(2*x + 1)/(sqrt(-2^x*b + a)*log(2)) + 1/3*2^(x + 1)*a/(sqrt(-2^x*b + a)*b*log(2)) - 4/3*a^2/(sqrt(-2^x*b
+ a)*b^2*log(2))

________________________________________________________________________________________

mupad [B]  time = 3.64, size = 28, normalized size = 0.61 \[ -\frac {2\,\sqrt {a-2^x\,b}\,\left (2\,a+2^x\,b\right )}{3\,b^2\,\ln \relax (2)} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(4^x/(a - 2^x*b)^(1/2),x)

[Out]

-(2*(a - 2^x*b)^(1/2)*(2*a + 2^x*b))/(3*b^2*log(2))

________________________________________________________________________________________

sympy [A]  time = 0.97, size = 58, normalized size = 1.26 \[ \begin {cases} - \frac {2 \cdot 2^{x} \sqrt {- 2^{x} b + a}}{3 b \log {\relax (2 )}} - \frac {4 a \sqrt {- 2^{x} b + a}}{3 b^{2} \log {\relax (2 )}} & \text {for}\: b \neq 0 \\\frac {4^{x}}{2 \sqrt {a} \log {\relax (2 )}} & \text {otherwise} \end {cases} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(4**x/(a-2**x*b)**(1/2),x)

[Out]

Piecewise((-2*2**x*sqrt(-2**x*b + a)/(3*b*log(2)) - 4*a*sqrt(-2**x*b + a)/(3*b**2*log(2)), Ne(b, 0)), (4**x/(2
*sqrt(a)*log(2)), True))

________________________________________________________________________________________