3.2.12 \(\int \cos ^2(x) (1-\tan ^2(x)) \, dx\) [112]

Optimal. Leaf size=5 \[ \cos (x) \sin (x) \]

[Out]

cos(x)*sin(x)

________________________________________________________________________________________

Rubi [A]
time = 0.01, antiderivative size = 5, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, integrand size = 13, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.154, Rules used = {3756, 391} \begin {gather*} \sin (x) \cos (x) \end {gather*}

Antiderivative was successfully verified.

[In]

Int[Cos[x]^2*(1 - Tan[x]^2),x]

[Out]

Cos[x]*Sin[x]

Rule 391

Int[((a_) + (b_.)*(x_)^(n_))^(p_.)*((c_) + (d_.)*(x_)^(n_)), x_Symbol] :> Simp[c*x*((a + b*x^n)^(p + 1)/a), x]
 /; FreeQ[{a, b, c, d, n, p}, x] && NeQ[b*c - a*d, 0] && EqQ[a*d - b*c*(n*(p + 1) + 1), 0]

Rule 3756

Int[sec[(e_.) + (f_.)*(x_)]^(m_)*((a_) + (b_.)*((c_.)*tan[(e_.) + (f_.)*(x_)])^(n_))^(p_.), x_Symbol] :> With[
{ff = FreeFactors[Tan[e + f*x], x]}, Dist[ff/(c^(m - 1)*f), Subst[Int[(c^2 + ff^2*x^2)^(m/2 - 1)*(a + b*(ff*x)
^n)^p, x], x, c*(Tan[e + f*x]/ff)], x]] /; FreeQ[{a, b, c, e, f, n, p}, x] && IntegerQ[m/2] && (IntegersQ[n, p
] || IGtQ[m, 0] || IGtQ[p, 0] || EqQ[n^2, 4] || EqQ[n^2, 16])

Rubi steps

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

________________________________________________________________________________________

Mathematica [A]
time = 0.00, size = 8, normalized size = 1.60 \begin {gather*} \frac {1}{2} \sin (2 x) \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[Cos[x]^2*(1 - Tan[x]^2),x]

[Out]

Sin[2*x]/2

________________________________________________________________________________________

Mathics [A]
time = 3.58, size = 6, normalized size = 1.20 \begin {gather*} \frac {\text {Sin}\left [2 x\right ]}{2} \end {gather*}

Antiderivative was successfully verified.

[In]

mathics('Integrate[(1 - Tan[x]^2)/Sec[x]^2,x]')

[Out]

Sin[2 x] / 2

________________________________________________________________________________________

Maple [A]
time = 0.04, size = 6, normalized size = 1.20

method result size
default \(\cos \left (x \right ) \sin \left (x \right )\) \(6\)
risch \(\frac {\sin \left (2 x \right )}{2}\) \(7\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((1-tan(x)^2)/sec(x)^2,x,method=_RETURNVERBOSE)

[Out]

cos(x)*sin(x)

________________________________________________________________________________________

Maxima [B] Leaf count of result is larger than twice the leaf count of optimal. 11 vs. \(2 (5) = 10\).
time = 0.26, size = 11, normalized size = 2.20 \begin {gather*} \frac {\tan \left (x\right )}{\tan \left (x\right )^{2} + 1} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1-tan(x)^2)/sec(x)^2,x, algorithm="maxima")

[Out]

tan(x)/(tan(x)^2 + 1)

________________________________________________________________________________________

Fricas [A]
time = 0.34, size = 5, normalized size = 1.00 \begin {gather*} \cos \left (x\right ) \sin \left (x\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1-tan(x)^2)/sec(x)^2,x, algorithm="fricas")

[Out]

cos(x)*sin(x)

________________________________________________________________________________________

Sympy [A]
time = 0.18, size = 7, normalized size = 1.40 \begin {gather*} \frac {\tan {\left (x \right )}}{\sec ^{2}{\left (x \right )}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1-tan(x)**2)/sec(x)**2,x)

[Out]

tan(x)/sec(x)**2

________________________________________________________________________________________

Giac [A]
time = 0.00, size = 7, normalized size = 1.40 \begin {gather*} \frac 1{\tan x+\frac 1{\tan x}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1-tan(x)^2)/sec(x)^2,x)

[Out]

1/(1/tan(x) + tan(x))

________________________________________________________________________________________

Mupad [B]
time = 0.17, size = 6, normalized size = 1.20 \begin {gather*} \frac {\sin \left (2\,x\right )}{2} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(-cos(x)^2*(tan(x)^2 - 1),x)

[Out]

sin(2*x)/2

________________________________________________________________________________________