3.508 \(\int \left (a^{k x}-a^{l x}\right )^2 \, dx\)

Optimal. Leaf size=53 \[ -\frac{2 a^{x (k+l)}}{\log (a) (k+l)}+\frac{a^{2 k x}}{2 k \log (a)}+\frac{a^{2 l x}}{2 l \log (a)} \]

[Out]

a^(2*k*x)/(2*k*Log[a]) + a^(2*l*x)/(2*l*Log[a]) - (2*a^((k + l)*x))/((k + l)*Log
[a])

_______________________________________________________________________________________

Rubi [A]  time = 0.127586, antiderivative size = 53, normalized size of antiderivative = 1., number of steps used = 6, number of rules used = 2, integrand size = 15, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.133 \[ -\frac{2 a^{x (k+l)}}{\log (a) (k+l)}+\frac{a^{2 k x}}{2 k \log (a)}+\frac{a^{2 l x}}{2 l \log (a)} \]

Antiderivative was successfully verified.

[In]  Int[(a^(k*x) - a^(l*x))^2,x]

[Out]

a^(2*k*x)/(2*k*Log[a]) + a^(2*l*x)/(2*l*Log[a]) - (2*a^((k + l)*x))/((k + l)*Log
[a])

_______________________________________________________________________________________

Rubi in Sympy [F]  time = 0., size = 0, normalized size = 0. \[ \int \left (a^{k x} - a^{l x}\right )^{2}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate((a**(k*x)-a**(l*x))**2,x)

[Out]

Integral((a**(k*x) - a**(l*x))**2, x)

_______________________________________________________________________________________

Mathematica [A]  time = 0.0573637, size = 55, normalized size = 1.04 \[ -\frac{2 a^{k x+l x}}{\log (a) (k+l)}+\frac{a^{2 k x}}{2 k \log (a)}+\frac{a^{2 l x}}{2 l \log (a)} \]

Antiderivative was successfully verified.

[In]  Integrate[(a^(k*x) - a^(l*x))^2,x]

[Out]

a^(2*k*x)/(2*k*Log[a]) + a^(2*l*x)/(2*l*Log[a]) - (2*a^(k*x + l*x))/((k + l)*Log
[a])

_______________________________________________________________________________________

Maple [A]  time = 0.023, size = 59, normalized size = 1.1 \[{\frac{ \left ({{\rm e}^{kx\ln \left ( a \right ) }} \right ) ^{2}}{2\,k\ln \left ( a \right ) }}+{\frac{ \left ({{\rm e}^{lx\ln \left ( a \right ) }} \right ) ^{2}}{2\,l\ln \left ( a \right ) }}-2\,{\frac{{{\rm e}^{kx\ln \left ( a \right ) }}{{\rm e}^{lx\ln \left ( a \right ) }}}{\ln \left ( a \right ) \left ( k+l \right ) }} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int((a^(k*x)-a^(l*x))^2,x)

[Out]

1/2/k/ln(a)*exp(k*x*ln(a))^2+1/2/l/ln(a)*exp(l*x*ln(a))^2-2/ln(a)/(k+l)*exp(k*x*
ln(a))*exp(l*x*ln(a))

_______________________________________________________________________________________

Maxima [A]  time = 1.39032, size = 69, normalized size = 1.3 \[ -\frac{2 \, a^{k x + l x}}{{\left (k + l\right )} \log \left (a\right )} + \frac{a^{2 \, k x}}{2 \, k \log \left (a\right )} + \frac{a^{2 \, l x}}{2 \, l \log \left (a\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((a^(k*x) - a^(l*x))^2,x, algorithm="maxima")

[Out]

-2*a^(k*x + l*x)/((k + l)*log(a)) + 1/2*a^(2*k*x)/(k*log(a)) + 1/2*a^(2*l*x)/(l*
log(a))

_______________________________________________________________________________________

Fricas [A]  time = 0.218455, size = 86, normalized size = 1.62 \[ -\frac{4 \, a^{k x} a^{l x} k l -{\left (k l + l^{2}\right )} a^{2 \, k x} -{\left (k^{2} + k l\right )} a^{2 \, l x}}{2 \,{\left (k^{2} l + k l^{2}\right )} \log \left (a\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((a^(k*x) - a^(l*x))^2,x, algorithm="fricas")

[Out]

-1/2*(4*a^(k*x)*a^(l*x)*k*l - (k*l + l^2)*a^(2*k*x) - (k^2 + k*l)*a^(2*l*x))/((k
^2*l + k*l^2)*log(a))

_______________________________________________________________________________________

Sympy [A]  time = 3.47077, size = 248, normalized size = 4.68 \[ \begin{cases} 0 & \text{for}\: a = 1 \wedge \left (a = 1 \vee k = 0\right ) \wedge \left (a = 1 \vee l = 0\right ) \\\frac{a^{2 l x}}{2 l \log{\left (a \right )}} - \frac{2 a^{l x}}{l \log{\left (a \right )}} + x & \text{for}\: k = 0 \\\frac{a^{2 l x}}{2 l \log{\left (a \right )}} - 2 x - \frac{a^{- 2 l x}}{2 l \log{\left (a \right )}} & \text{for}\: k = - l \\\frac{a^{2 k x}}{2 k \log{\left (a \right )}} - \frac{2 a^{k x}}{k \log{\left (a \right )}} + x & \text{for}\: l = 0 \\\frac{a^{2 k x} k l}{2 k^{2} l \log{\left (a \right )} + 2 k l^{2} \log{\left (a \right )}} + \frac{a^{2 k x} l^{2}}{2 k^{2} l \log{\left (a \right )} + 2 k l^{2} \log{\left (a \right )}} - \frac{4 a^{k x} a^{l x} k l}{2 k^{2} l \log{\left (a \right )} + 2 k l^{2} \log{\left (a \right )}} + \frac{a^{2 l x} k^{2}}{2 k^{2} l \log{\left (a \right )} + 2 k l^{2} \log{\left (a \right )}} + \frac{a^{2 l x} k l}{2 k^{2} l \log{\left (a \right )} + 2 k l^{2} \log{\left (a \right )}} & \text{otherwise} \end{cases} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((a**(k*x)-a**(l*x))**2,x)

[Out]

Piecewise((0, Eq(a, 1) & (Eq(a, 1) | Eq(k, 0)) & (Eq(a, 1) | Eq(l, 0))), (a**(2*
l*x)/(2*l*log(a)) - 2*a**(l*x)/(l*log(a)) + x, Eq(k, 0)), (a**(2*l*x)/(2*l*log(a
)) - 2*x - a**(-2*l*x)/(2*l*log(a)), Eq(k, -l)), (a**(2*k*x)/(2*k*log(a)) - 2*a*
*(k*x)/(k*log(a)) + x, Eq(l, 0)), (a**(2*k*x)*k*l/(2*k**2*l*log(a) + 2*k*l**2*lo
g(a)) + a**(2*k*x)*l**2/(2*k**2*l*log(a) + 2*k*l**2*log(a)) - 4*a**(k*x)*a**(l*x
)*k*l/(2*k**2*l*log(a) + 2*k*l**2*log(a)) + a**(2*l*x)*k**2/(2*k**2*l*log(a) + 2
*k*l**2*log(a)) + a**(2*l*x)*k*l/(2*k**2*l*log(a) + 2*k*l**2*log(a)), True))

_______________________________________________________________________________________

GIAC/XCAS [A]  time = 0.256413, size = 938, normalized size = 17.7 \[ \text{result too large to display} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((a^(k*x) - a^(l*x))^2,x, algorithm="giac")

[Out]

(2*k*cos(-pi*k*x*sign(a) + pi*k*x)*ln(abs(a))/(4*k^2*ln(abs(a))^2 + (pi*k*sign(a
) - pi*k)^2) - (pi*k*sign(a) - pi*k)*sin(-pi*k*x*sign(a) + pi*k*x)/(4*k^2*ln(abs
(a))^2 + (pi*k*sign(a) - pi*k)^2))*e^(2*k*x*ln(abs(a))) - 1/2*I*(-I*e^(I*pi*k*x*
sign(a) - I*pi*k*x)/(I*pi*k*sign(a) - I*pi*k + 2*k*ln(abs(a))) + I*e^(-I*pi*k*x*
sign(a) + I*pi*k*x)/(-I*pi*k*sign(a) + I*pi*k + 2*k*ln(abs(a))))*e^(2*k*x*ln(abs
(a))) + (2*l*cos(-pi*l*x*sign(a) + pi*l*x)*ln(abs(a))/(4*l^2*ln(abs(a))^2 + (pi*
l*sign(a) - pi*l)^2) - (pi*l*sign(a) - pi*l)*sin(-pi*l*x*sign(a) + pi*l*x)/(4*l^
2*ln(abs(a))^2 + (pi*l*sign(a) - pi*l)^2))*e^(2*l*x*ln(abs(a))) - 1/2*I*(-I*e^(I
*pi*l*x*sign(a) - I*pi*l*x)/(I*pi*l*sign(a) - I*pi*l + 2*l*ln(abs(a))) + I*e^(-I
*pi*l*x*sign(a) + I*pi*l*x)/(-I*pi*l*sign(a) + I*pi*l + 2*l*ln(abs(a))))*e^(2*l*
x*ln(abs(a))) - 4*(2*(k*ln(abs(a)) + l*ln(abs(a)))*cos(-1/2*pi*k*x*sign(a) - 1/2
*pi*l*x*sign(a) + 1/2*pi*k*x + 1/2*pi*l*x)/((pi*k*sign(a) + pi*l*sign(a) - pi*k
- pi*l)^2 + 4*(k*ln(abs(a)) + l*ln(abs(a)))^2) - (pi*k*sign(a) + pi*l*sign(a) -
pi*k - pi*l)*sin(-1/2*pi*k*x*sign(a) - 1/2*pi*l*x*sign(a) + 1/2*pi*k*x + 1/2*pi*
l*x)/((pi*k*sign(a) + pi*l*sign(a) - pi*k - pi*l)^2 + 4*(k*ln(abs(a)) + l*ln(abs
(a)))^2))*e^((k*ln(abs(a)) + l*ln(abs(a)))*x) - 1/2*I*(4*I*e^(1/2*I*pi*k*x*sign(
a) + 1/2*I*pi*l*x*sign(a) - 1/2*I*pi*k*x - 1/2*I*pi*l*x)/(I*pi*k*sign(a) + I*pi*
l*sign(a) - I*pi*k - I*pi*l + 2*k*ln(abs(a)) + 2*l*ln(abs(a))) - 4*I*e^(-1/2*I*p
i*k*x*sign(a) - 1/2*I*pi*l*x*sign(a) + 1/2*I*pi*k*x + 1/2*I*pi*l*x)/(-I*pi*k*sig
n(a) - I*pi*l*sign(a) + I*pi*k + I*pi*l + 2*k*ln(abs(a)) + 2*l*ln(abs(a))))*e^((
k*ln(abs(a)) + l*ln(abs(a)))*x)