3.204 \(\int \frac {1-\cos ^2(x)}{1+\cos ^2(x)} \, dx\)

Optimal. Leaf size=37 \[ \sqrt {2} x-x-\sqrt {2} \tan ^{-1}\left (\frac {\sin (x) \cos (x)}{\cos ^2(x)+\sqrt {2}+1}\right ) \]

[Out]

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

________________________________________________________________________________________

Rubi [A]  time = 0.04, antiderivative size = 37, normalized size of antiderivative = 1.00, number of steps used = 3, number of rules used = 3, integrand size = 17, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.176, Rules used = {3171, 3181, 203} \[ \sqrt {2} x-x-\sqrt {2} \tan ^{-1}\left (\frac {\sin (x) \cos (x)}{\cos ^2(x)+\sqrt {2}+1}\right ) \]

Antiderivative was successfully verified.

[In]

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

[Out]

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

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 3171

Int[((A_.) + (B_.)*sin[(e_.) + (f_.)*(x_)]^2)/((a_) + (b_.)*sin[(e_.) + (f_.)*(x_)]^2), x_Symbol] :> Simp[(B*x
)/b, x] + Dist[(A*b - a*B)/b, Int[1/(a + b*Sin[e + f*x]^2), x], x] /; FreeQ[{a, b, e, f, A, B}, x]

Rule 3181

Int[((a_) + (b_.)*sin[(e_.) + (f_.)*(x_)]^2)^(-1), x_Symbol] :> With[{ff = FreeFactors[Tan[e + f*x], x]}, Dist
[ff/f, Subst[Int[1/(a + (a + b)*ff^2*x^2), x], x, Tan[e + f*x]/ff], x]] /; FreeQ[{a, b, e, f}, x]

Rubi steps

\begin {align*} \int \frac {1-\cos ^2(x)}{1+\cos ^2(x)} \, dx &=-x+2 \int \frac {1}{1+\cos ^2(x)} \, dx\\ &=-x-2 \operatorname {Subst}\left (\int \frac {1}{1+2 x^2} \, dx,x,\cot (x)\right )\\ &=-x+\sqrt {2} x-\sqrt {2} \tan ^{-1}\left (\frac {\cos (x) \sin (x)}{1+\sqrt {2}+\cos ^2(x)}\right )\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]  time = 0.03, size = 23, normalized size = 0.62 \[ 2 \left (\frac {\tan ^{-1}\left (\frac {\tan (x)}{\sqrt {2}}\right )}{\sqrt {2}}-\frac {x}{2}\right ) \]

Antiderivative was successfully verified.

[In]

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

[Out]

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

________________________________________________________________________________________

fricas [A]  time = 1.14, size = 35, normalized size = 0.95 \[ -\frac {1}{2} \, \sqrt {2} \arctan \left (\frac {3 \, \sqrt {2} \cos \relax (x)^{2} - \sqrt {2}}{4 \, \cos \relax (x) \sin \relax (x)}\right ) - x \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

-1/2*sqrt(2)*arctan(1/4*(3*sqrt(2)*cos(x)^2 - sqrt(2))/(cos(x)*sin(x))) - x

________________________________________________________________________________________

giac [A]  time = 0.13, size = 49, normalized size = 1.32 \[ \sqrt {2} {\left (x + \arctan \left (-\frac {\sqrt {2} \sin \left (2 \, x\right ) - \sin \left (2 \, x\right )}{\sqrt {2} \cos \left (2 \, x\right ) + \sqrt {2} - \cos \left (2 \, x\right ) + 1}\right )\right )} - x \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

sqrt(2)*(x + arctan(-(sqrt(2)*sin(2*x) - sin(2*x))/(sqrt(2)*cos(2*x) + sqrt(2) - cos(2*x) + 1))) - x

________________________________________________________________________________________

maple [A]  time = 0.08, size = 17, normalized size = 0.46 \[ \sqrt {2}\, \arctan \left (\frac {\sqrt {2}\, \tan \relax (x )}{2}\right )-x \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((1-cos(x)^2)/(1+cos(x)^2),x)

[Out]

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

________________________________________________________________________________________

maxima [A]  time = 0.42, size = 16, normalized size = 0.43 \[ \sqrt {2} \arctan \left (\frac {1}{2} \, \sqrt {2} \tan \relax (x)\right ) - x \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

sqrt(2)*arctan(1/2*sqrt(2)*tan(x)) - x

________________________________________________________________________________________

mupad [B]  time = 2.29, size = 27, normalized size = 0.73 \[ \sqrt {2}\,\left (x-\mathrm {atan}\left (\mathrm {tan}\relax (x)\right )\right )-x+\sqrt {2}\,\mathrm {atan}\left (\frac {\sqrt {2}\,\mathrm {tan}\relax (x)}{2}\right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(-(cos(x)^2 - 1)/(cos(x)^2 + 1),x)

[Out]

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

________________________________________________________________________________________

sympy [A]  time = 2.66, size = 61, normalized size = 1.65 \[ - x + \sqrt {2} \left (\operatorname {atan}{\left (\sqrt {2} \tan {\left (\frac {x}{2} \right )} - 1 \right )} + \pi \left \lfloor {\frac {\frac {x}{2} - \frac {\pi }{2}}{\pi }}\right \rfloor \right ) + \sqrt {2} \left (\operatorname {atan}{\left (\sqrt {2} \tan {\left (\frac {x}{2} \right )} + 1 \right )} + \pi \left \lfloor {\frac {\frac {x}{2} - \frac {\pi }{2}}{\pi }}\right \rfloor \right ) \]

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

-x + sqrt(2)*(atan(sqrt(2)*tan(x/2) - 1) + pi*floor((x/2 - pi/2)/pi)) + sqrt(2)*(atan(sqrt(2)*tan(x/2) + 1) +
pi*floor((x/2 - pi/2)/pi))

________________________________________________________________________________________