3.324 \(\int \frac{e^{-i \tan ^{-1}(a x)}}{(1+a^2 x^2)^{3/2}} \, dx\)

Optimal. Leaf size=29 \[ \frac{\tan ^{-1}(a x)}{2 a}-\frac{1}{2 a (-a x+i)} \]

[Out]

-1/(2*a*(I - a*x)) + ArcTan[a*x]/(2*a)

________________________________________________________________________________________

Rubi [A]  time = 0.0412167, antiderivative size = 29, normalized size of antiderivative = 1., number of steps used = 4, number of rules used = 3, integrand size = 24, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.125, Rules used = {5073, 44, 203} \[ \frac{\tan ^{-1}(a x)}{2 a}-\frac{1}{2 a (-a x+i)} \]

Antiderivative was successfully verified.

[In]

Int[1/(E^(I*ArcTan[a*x])*(1 + a^2*x^2)^(3/2)),x]

[Out]

-1/(2*a*(I - a*x)) + ArcTan[a*x]/(2*a)

Rule 5073

Int[E^(ArcTan[(a_.)*(x_)]*(n_.))*((c_) + (d_.)*(x_)^2)^(p_.), x_Symbol] :> Dist[c^p, Int[(1 - I*a*x)^(p + (I*n
)/2)*(1 + I*a*x)^(p - (I*n)/2), x], x] /; FreeQ[{a, c, d, n, p}, x] && EqQ[d, a^2*c] && (IntegerQ[p] || GtQ[c,
 0])

Rule 44

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}, x] && NeQ[b*c - a*d, 0] && ILtQ[m, 0] && IntegerQ[n] &&  !(IGtQ[n, 0] && L
tQ[m + n + 2, 0])

Rule 203

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

Rubi steps

\begin{align*} \int \frac{e^{-i \tan ^{-1}(a x)}}{\left (1+a^2 x^2\right )^{3/2}} \, dx &=\int \frac{1}{(1-i a x) (1+i a x)^2} \, dx\\ &=\int \left (-\frac{1}{2 (-i+a x)^2}+\frac{1}{2 \left (1+a^2 x^2\right )}\right ) \, dx\\ &=-\frac{1}{2 a (i-a x)}+\frac{1}{2} \int \frac{1}{1+a^2 x^2} \, dx\\ &=-\frac{1}{2 a (i-a x)}+\frac{\tan ^{-1}(a x)}{2 a}\\ \end{align*}

Mathematica [A]  time = 0.0158269, size = 21, normalized size = 0.72 \[ \frac{\tan ^{-1}(a x)+\frac{1}{a x-i}}{2 a} \]

Antiderivative was successfully verified.

[In]

Integrate[1/(E^(I*ArcTan[a*x])*(1 + a^2*x^2)^(3/2)),x]

[Out]

((-I + a*x)^(-1) + ArcTan[a*x])/(2*a)

________________________________________________________________________________________

Maple [A]  time = 0.053, size = 25, normalized size = 0.9 \begin{align*} -{\frac{1}{2\,a \left ( -ax+i \right ) }}+{\frac{\arctan \left ( ax \right ) }{2\,a}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(1/(1+I*a*x)/(a^2*x^2+1),x)

[Out]

-1/2/a/(-a*x+I)+1/2*arctan(a*x)/a

________________________________________________________________________________________

Maxima [F(-2)]  time = 0., size = 0, normalized size = 0. \begin{align*} \text{Exception raised: RuntimeError} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(1+I*a*x)/(a^2*x^2+1),x, algorithm="maxima")

[Out]

Exception raised: RuntimeError

________________________________________________________________________________________

Fricas [B]  time = 1.8327, size = 116, normalized size = 4. \begin{align*} \frac{{\left (i \, a x + 1\right )} \log \left (\frac{a x + i}{a}\right ) +{\left (-i \, a x - 1\right )} \log \left (\frac{a x - i}{a}\right ) + 2}{4 \,{\left (a^{2} x - i \, a\right )}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(1+I*a*x)/(a^2*x^2+1),x, algorithm="fricas")

[Out]

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

________________________________________________________________________________________

Sympy [B]  time = 0.40411, size = 36, normalized size = 1.24 \begin{align*} \frac{a}{2 a^{3} x - 2 i a^{2}} + \frac{- \frac{i \log{\left (x - \frac{i}{a} \right )}}{4} + \frac{i \log{\left (x + \frac{i}{a} \right )}}{4}}{a} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(1+I*a*x)/(a**2*x**2+1),x)

[Out]

a/(2*a**3*x - 2*I*a**2) + (-I*log(x - I/a)/4 + I*log(x + I/a)/4)/a

________________________________________________________________________________________

Giac [A]  time = 1.1191, size = 59, normalized size = 2.03 \begin{align*} -\frac{i \log \left (a x - i\right )}{4 \, a} - \frac{\log \left (a i x - 1\right )}{4 \, a i} + \frac{1}{2 \,{\left (a x - i\right )} a} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(1/(1+I*a*x)/(a^2*x^2+1),x, algorithm="giac")

[Out]

-1/4*i*log(a*x - i)/a - 1/4*log(a*i*x - 1)/(a*i) + 1/2/((a*x - i)*a)