MathGroup Archive 2006

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Pattern Matching for Exponentials


Rick Eller 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
> 
Hi Rick,

Well, I do not know what to say since that works fine on my system:

In[1]:=
Exp[2*i*t]

Out[1]=
  2 i t
E

In[2]:=
FullForm[%]

Out[2]//FullForm=
Power[E, Times[2, i, t]]

In[3]:=
MatchQ[Exp[2*i*t], Exp[(n_)*i*t]]

Out[3]=
True

In[4]:=
Exp[2*i*t] /. Exp[(n_)*i*t] -> 0

Out[4]=
0

In[5]:=
Exp[2*i*t] /. Exp[(n_)*i*t] -> Exp[n*i*t]/(n^(2) - 1)

Out[5]=
1  2 i t
- E
3

In[6]:=
$Version

Out[6]=
5.2 for Microsoft Windows (June 20, 2005)

HTH,
Jean-Marc


  • Prev by Date: RE: Pattern Matching for Exponentials
  • Next by Date: Bugs--Bugs Report in List Operation
  • Previous by thread: RE: Pattern Matching for Exponentials
  • Next by thread: how to fit data with this specified functional form?