3.488 \(\int \frac {2+2 x}{(-1+x)^3 (1+x^2)} \, dx\)

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

[Out]

-1/(1-x)^2+1/(-1+x)+arctan(x)

________________________________________________________________________________________

Rubi [A]  time = 0.01, antiderivative size = 17, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 2, integrand size = 18, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.111, Rules used = {801, 203} \[ \frac {1}{x-1}-\frac {1}{(1-x)^2}+\tan ^{-1}(x) \]

Antiderivative was successfully verified.

[In]

Int[(2 + 2*x)/((-1 + x)^3*(1 + x^2)),x]

[Out]

-(1 - x)^(-2) + (-1 + x)^(-1) + ArcTan[x]

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])

Rule 801

Int[(((d_.) + (e_.)*(x_))^(m_)*((f_.) + (g_.)*(x_)))/((a_) + (c_.)*(x_)^2), x_Symbol] :> Int[ExpandIntegrand[(
(d + e*x)^m*(f + g*x))/(a + c*x^2), x], x] /; FreeQ[{a, c, d, e, f, g}, x] && NeQ[c*d^2 + a*e^2, 0] && Integer
Q[m]

Rubi steps

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

________________________________________________________________________________________

Mathematica [A]  time = 0.01, size = 17, normalized size = 1.00 \[ \frac {x+(x-1)^2 \tan ^{-1}(x)-2}{(x-1)^2} \]

Antiderivative was successfully verified.

[In]

Integrate[(2 + 2*x)/((-1 + x)^3*(1 + x^2)),x]

[Out]

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

________________________________________________________________________________________

fricas [A]  time = 0.69, size = 25, normalized size = 1.47 \[ \frac {{\left (x^{2} - 2 \, x + 1\right )} \arctan \relax (x) + x - 2}{x^{2} - 2 \, x + 1} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((2+2*x)/(-1+x)^3/(x^2+1),x, algorithm="fricas")

[Out]

((x^2 - 2*x + 1)*arctan(x) + x - 2)/(x^2 - 2*x + 1)

________________________________________________________________________________________

giac [A]  time = 0.24, size = 12, normalized size = 0.71 \[ \frac {x - 2}{{\left (x - 1\right )}^{2}} + \arctan \relax (x) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((2+2*x)/(-1+x)^3/(x^2+1),x, algorithm="giac")

[Out]

(x - 2)/(x - 1)^2 + arctan(x)

________________________________________________________________________________________

maple [A]  time = 0.01, size = 16, normalized size = 0.94 \[ \arctan \relax (x )-\frac {1}{\left (x -1\right )^{2}}+\frac {1}{x -1} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((2*x+2)/(x-1)^3/(x^2+1),x)

[Out]

-1/(x-1)^2+1/(x-1)+arctan(x)

________________________________________________________________________________________

maxima [A]  time = 1.74, size = 17, normalized size = 1.00 \[ \frac {x - 2}{x^{2} - 2 \, x + 1} + \arctan \relax (x) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((2+2*x)/(-1+x)^3/(x^2+1),x, algorithm="maxima")

[Out]

(x - 2)/(x^2 - 2*x + 1) + arctan(x)

________________________________________________________________________________________

mupad [B]  time = 0.03, size = 17, normalized size = 1.00 \[ \mathrm {atan}\relax (x)+\frac {x-2}{x^2-2\,x+1} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((2*x + 2)/((x^2 + 1)*(x - 1)^3),x)

[Out]

atan(x) + (x - 2)/(x^2 - 2*x + 1)

________________________________________________________________________________________

sympy [A]  time = 0.12, size = 14, normalized size = 0.82 \[ \frac {x - 2}{x^{2} - 2 x + 1} + \operatorname {atan}{\relax (x )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((2+2*x)/(-1+x)**3/(x**2+1),x)

[Out]

(x - 2)/(x**2 - 2*x + 1) + atan(x)

________________________________________________________________________________________