\(\int \cos (x) \sin (m x) \, dx\) [100]

Optimal result

Integrand size = 7, antiderivative size = 35 \[ \int \cos (x) \sin (m x) \, dx=\frac {\cos ((1-m) x)}{2 (1-m)}-\frac {\cos ((1+m) x)}{2 (1+m)} \]

[Out]

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

Rubi [A] (verified)

Time = 0.04 (sec) , antiderivative size = 35, normalized size of antiderivative = 1.00, number of steps used = 4, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.286, Rules used = {4670, 2718} \[ \int \cos (x) \sin (m x) \, dx=\frac {\cos ((1-m) x)}{2 (1-m)}-\frac {\cos ((m+1) x)}{2 (m+1)} \]

[In]

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

[Out]

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

Rule 2718

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

Rule 4670

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

Rubi steps \begin{align*} \text {integral}& = \int \left (-\frac {1}{2} \sin ((1-m) x)+\frac {1}{2} \sin ((1+m) x)\right ) \, dx \\ & = -\left (\frac {1}{2} \int \sin ((1-m) x) \, dx\right )+\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] (verified)

Time = 0.04 (sec) , antiderivative size = 26, normalized size of antiderivative = 0.74 \[ \int \cos (x) \sin (m x) \, dx=\frac {m \cos (x) \cos (m x)+\sin (x) \sin (m x)}{1-m^2} \]

[In]

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

[Out]

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

Maple [A] (verified)

Time = 0.41 (sec) , antiderivative size = 28, normalized size of antiderivative = 0.80

method	result	size
default	\(-\frac {\cos \left (x \left (-1+m \right )\right )}{2 \left (-1+m \right )}-\frac {\cos \left (\left (1+m \right ) x \right )}{2 \left (1+m \right )}\)	\(28\)
risch	\(-\frac {\cos \left (x \left (-1+m \right )\right )}{2 \left (-1+m \right )}-\frac {\cos \left (\left (1+m \right ) x \right )}{2 \left (1+m \right )}\)	\(28\)
parallelrisch	\(\frac {\left (-1-m \right ) \cos \left (x \left (-1+m \right )\right )+\left (1-m \right ) \cos \left (\left (1+m \right ) x \right )+2 m}{2 m^{2}-2}\)	\(39\)
norman	\(\frac {\frac {2 m \tan \left (\frac {x}{2}\right )^{2}}{m^{2}-1}+\frac {2 m \tan \left (\frac {m x}{2}\right )^{2}}{m^{2}-1}-\frac {4 \tan \left (\frac {x}{2}\right ) \tan \left (\frac {m x}{2}\right )}{m^{2}-1}}{\left (1+\tan \left (\frac {x}{2}\right )^{2}\right ) \left (1+\tan \left (\frac {m x}{2}\right )^{2}\right )}\)	\(75\)

[In]

int(cos(x)*sin(m*x),x,method=_RETURNVERBOSE)

[Out]

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

Fricas [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 25, normalized size of antiderivative = 0.71 \[ \int \cos (x) \sin (m x) \, dx=-\frac {m \cos \left (m x\right ) \cos \left (x\right ) + \sin \left (m x\right ) \sin \left (x\right )}{m^{2} - 1} \]

[In]

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

[Out]

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

Sympy [A] (verification not implemented)

Time = 0.27 (sec) , antiderivative size = 44, normalized size of antiderivative = 1.26 \[ \int \cos (x) \sin (m x) \, dx=\begin {cases} - \frac {\sin ^{2}{\left (x \right )}}{2} & \text {for}\: m = -1 \\\frac {\sin ^{2}{\left (x \right )}}{2} & \text {for}\: m = 1 \\- \frac {m \cos {\left (x \right )} \cos {\left (m x \right )}}{m^{2} - 1} - \frac {\sin {\left (x \right )} \sin {\left (m x \right )}}{m^{2} - 1} & \text {otherwise} \end {cases} \]

[In]

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

[Out]

Piecewise((-sin(x)**2/2, Eq(m, -1)), (sin(x)**2/2, Eq(m, 1)), (-m*cos(x)*cos(m*x)/(m**2 - 1) - sin(x)*sin(m*x)
/(m**2 - 1), True))

Maxima [A] (verification not implemented)

none

Time = 0.20 (sec) , antiderivative size = 27, normalized size of antiderivative = 0.77 \[ \int \cos (x) \sin (m x) \, dx=-\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 )}} \]

[In]

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

[Out]

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

Giac [A] (verification not implemented)

none

Time = 0.26 (sec) , antiderivative size = 29, normalized size of antiderivative = 0.83 \[ \int \cos (x) \sin (m x) \, dx=-\frac {\cos \left (m x + x\right )}{2 \, {\left (m + 1\right )}} - \frac {\cos \left (m x - x\right )}{2 \, {\left (m - 1\right )}} \]

[In]

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

[Out]

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

Mupad [B] (verification not implemented)

Time = 27.35 (sec) , antiderivative size = 57, normalized size of antiderivative = 1.63 \[ \int \cos (x) \sin (m x) \, dx=\left \{\begin {array}{cl} \frac {{\sin \left (x\right )}^2}{2} & \text {\ if\ \ }m=1\\ \frac {{\cos \left (x\right )}^2}{2} & \text {\ if\ \ }m=-1\\ -\frac {\cos \left (x\,\left (m-1\right )\right )}{2\,m-2}-\frac {\cos \left (x\,\left (m+1\right )\right )}{2\,m+2} & \text {\ if\ \ }m\neq -1\wedge m\neq 1 \end {array}\right . \]

[In]

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

[Out]

piecewise(m == 1, sin(x)^2/2, m == -1, cos(x)^2/2, m ~= -1 & m ~= 1, - cos(x*(m - 1))/(2*m - 2) - cos(x*(m + 1
))/(2*m + 2))