Question: RE: how to apply product to sum identities of trigonometric expression

Dear all, 

Would you tell me a way to apply the identity relationship in Maple, to rewrite 'subexp' below to 'subexp2'?


 

restart;

subexp := M__a*sin(omega*t + alpha)*I__a*sin(omega*t + phi);

M__a*sin(omega*t+alpha)*I__a*sin(omega*t+phi)

(1)

subexp2 := M__a * I__a * (-1/2*(cos(2*omega*t + alpha + phi)-cos(alpha - phi)));

M__a*I__a*(-(1/2)*cos(2*omega*t+alpha+phi)+(1/2)*cos(alpha-phi))

(2)

is(subexp = subexp2);

true

(3)

 


 

Download Q20200901.mw

Please Wait...