Re: Pattern Matching for Exponentials

*To*: mathgroup at smc.vnet.net*Subject*: [mg67506] Re: [mg67502] Pattern Matching for Exponentials*From*: Bob Hanlon <hanlonr at cox.net>*Date*: Thu, 29 Jun 2006 00:09:04 -0400 (EDT)*Reply-to*: hanlonr at cox.net*Sender*: owner-wri-mathgroup at wolfram.com

If a pattern does not work on an expression, look at the FullForm for the expression to see if the form is what you think it is. Exp[2*I*t]//FullForm Power[E,Times[Complex[0,2],t]] Exp[2*I*t] /. E^((Complex[0,n_Integer])*t_Symbol):> Exp[n*I*t]/(n^2-1) (1/3)*E^(2*I*t) Bob Hanlon ---- Rick Eller <reller at bigpond.com> wrote: > > I am looking for a pattern-matching replacement rule which will > transform exponential functions of the form exp(n i t) into > (1/(n^2-1))exp(n i t) where i = sqrt[-1]. For example, exp(2 i t) > should convert to (1/3)exp(2 i t). I've tried the following code without > success : > > In: Exp[2 i t] /. Exp[n_ i t] -> Exp[n i t]/(n^2-1) > > Out: e^2 i t > > I would appreciate any suggestions as to how this code should be > modified. > > Thanks, > > Rick Eller >