3.73 \(\int \cos (m x) \sin (x) \, dx\)

Optimal. Leaf size=35 \[ -\frac{\cos ((1-m) x)}{2 (1-m)}-\frac{\cos ((m+1) x)}{2 (m+1)} \]

[Out]

-Cos[(1 - m)*x]/(2*(1 - m)) - Cos[(1 + m)*x]/(2*(1 + m))

________________________________________________________________________________________

Rubi [A]  time = 0.0271964, antiderivative size = 35, normalized size of antiderivative = 1., number of steps used = 4, number of rules used = 2, integrand size = 7, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.286, Rules used = {4574, 2638} \[ -\frac{\cos ((1-m) x)}{2 (1-m)}-\frac{\cos ((m+1) x)}{2 (m+1)} \]

Antiderivative was successfully verified.

[In]

Int[Cos[m*x]*Sin[x],x]

[Out]

-Cos[(1 - m)*x]/(2*(1 - m)) - Cos[(1 + m)*x]/(2*(1 + m))

Rule 4574

Int[Cos[w_]^(q_.)*Sin[v_]^(p_.), x_Symbol] :> Int[ExpandTrigReduce[Sin[v]^p*Cos[w]^q, x], x] /; IGtQ[p, 0] &&
IGtQ[q, 0] && ((PolynomialQ[v, x] && PolynomialQ[w, x]) || (BinomialQ[{v, w}, x] && IndependentQ[Cancel[v/w],
x]))

Rule 2638

Int[sin[(c_.) + (d_.)*(x_)], x_Symbol] :> -Simp[Cos[c + d*x]/d, x] /; FreeQ[{c, d}, x]

Rubi steps

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

Mathematica [A]  time = 0.0401192, size = 24, normalized size = 0.69 \[ \frac{m \sin (x) \sin (m x)+\cos (x) \cos (m x)}{m^2-1} \]

Antiderivative was successfully verified.

[In]

Integrate[Cos[m*x]*Sin[x],x]

[Out]

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

________________________________________________________________________________________

Maple [A]  time = 0.011, size = 28, normalized size = 0.8 \begin{align*}{\frac{\cos \left ( \left ( m-1 \right ) x \right ) }{2\,m-2}}-{\frac{\cos \left ( \left ( 1+m \right ) x \right ) }{2+2\,m}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(cos(m*x)*sin(x),x)

[Out]

1/2*cos((m-1)*x)/(m-1)-1/2*cos((1+m)*x)/(1+m)

________________________________________________________________________________________

Maxima [A]  time = 0.979889, size = 38, normalized size = 1.09 \begin{align*} -\frac{\cos \left ({\left (m + 1\right )} x\right )}{2 \,{\left (m + 1\right )}} + \frac{\cos \left (-{\left (m - 1\right )} x\right )}{2 \,{\left (m - 1\right )}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(m*x)*sin(x),x, algorithm="maxima")

[Out]

-1/2*cos((m + 1)*x)/(m + 1) + 1/2*cos(-(m - 1)*x)/(m - 1)

________________________________________________________________________________________

Fricas [A]  time = 2.35943, size = 66, normalized size = 1.89 \begin{align*} \frac{m \sin \left (m x\right ) \sin \left (x\right ) + \cos \left (m x\right ) \cos \left (x\right )}{m^{2} - 1} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(m*x)*sin(x),x, algorithm="fricas")

[Out]

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

________________________________________________________________________________________

Sympy [A]  time = 3.7095, size = 39, normalized size = 1.11 \begin{align*} \begin{cases} - \frac{\cos ^{2}{\left (x \right )}}{2} & \text{for}\: m = -1 \vee m = 1 \\\frac{m \sin{\left (x \right )} \sin{\left (m x \right )}}{m^{2} - 1} + \frac{\cos{\left (x \right )} \cos{\left (m x \right )}}{m^{2} - 1} & \text{otherwise} \end{cases} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(m*x)*sin(x),x)

[Out]

Piecewise((-cos(x)**2/2, Eq(m, -1) | Eq(m, 1)), (m*sin(x)*sin(m*x)/(m**2 - 1) + cos(x)*cos(m*x)/(m**2 - 1), Tr
ue))

________________________________________________________________________________________

Giac [A]  time = 1.14272, size = 39, normalized size = 1.11 \begin{align*} -\frac{\cos \left (m x + x\right )}{2 \,{\left (m + 1\right )}} + \frac{\cos \left (m x - x\right )}{2 \,{\left (m - 1\right )}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(cos(m*x)*sin(x),x, algorithm="giac")

[Out]

-1/2*cos(m*x + x)/(m + 1) + 1/2*cos(m*x - x)/(m - 1)