Re: Rewriting of Trigonometric Functions

*To*: mathgroup at smc.vnet.net*Subject*: [mg26847] Re: Rewriting of Trigonometric Functions*From*: "Allan Hayes" <hay at haystack.demon.co.uk>*Date*: Thu, 25 Jan 2001 01:13:25 -0500 (EST)*References*: <94m8st$3mn@smc.vnet.net>*Sender*: owner-wri-mathgroup at wolfram.com

Thomas, TrigReduce[Sin[x]^2] 1/2*(1 - Cos[2*x]) TrigReduce[Sin[a]Sin[b]] 1/2*(Cos[a - b] - Cos[a + b]) See File>Palettes>AlgebraicManipulation. -- Allan --------------------- Allan Hayes Mathematica Training and Consulting Leicester UK www.haystack.demon.co.uk hay at haystack.demon.co.uk Voice: +44 (0)116 271 4198 Fax: +44 (0)870 164 0565 "Thomas Engelhardt" <thomas-a.engelhardt at t-online.de> wrote in message news:94m8st$3mn at smc.vnet.net... > Dear Mathgroup members, > > I have just started to use Mathematica and directly ran into a problem: > > I have rather lengthy expressions resulting from putting a sum of two > sinusodial swings to the power of three (Two-tone Intermodulation). > In order for me to recognise the contained frequencies I want Mathematica to > rewrite the contained Trigonometric functions in certain ways, namely like: > > [sin(a)]^2 should be transformed into 1/2*(1+cos2x) > and for higher powers accordingly. > > Furthermore: > sin(a)*sin(b) should be changed to 1/2*[cos(a-b) - cos(a+b)] > > I have tried all kinds of "Expand" and "Trig..." operations but Mathematica > always keeps the powers on the trigonometric functions and doesn't change > the multiplications either. > > Does anybody have an idea how I can get Mathematica to transform the > expressions in the desired way? > > I appreciate your help! > Thanks in advance. > > Kind Regards > > Thomas > Munich, Germany > >