Re; FourierTransform problem

• To: mathgroup at smc.vnet.net
• Subject: [mg35106] Re; FourierTransform problem
• From: Matthias.Bode at oppenheim.de
• Date: Tue, 25 Jun 2002 03:40:03 -0400 (EDT)
• Sender: owner-wri-mathgroup at wolfram.com

```Hello David,

1. I could not reproduce your error messages in version 4.1 - I got a rather
steep "sugar cone" that peaked at x = 0, y = 0.8.

2. I remember that Plot[Evaluate[your function], ....] often worked in
version 3.0.

3. Workaround: Make a Table[your function, ....] = list01 and use
ListPlot[list01].

4. Upgrading to release 4.1 is worth its money.

Best regards,
Matthias Bode
Sal. Oppenheim jr. & Cie. KGaA
Koenigsberger Strasse 29
D-60487 Frankfurt am Main
GERMANY
Tel.: +49(0)69 71 34 53 80
Mobile: +49(0)172 6 74 95 77
Fax: +49(0)69 71 34 95 380
E-mail: matthias.bode at oppenheim.de
Internet: http://www.oppenheim.de

-----UrsprÃ¼ngliche Nachricht-----
Von: David Turner [mailto:dturner at faulkner.edu]
Gesendet: Montag, 24. Juni 2002 09:21
An: mathgroup at smc.vnet.net
Betreff: [mg35081] FourierTransform problem

Hello,

I am using Mathematica for Students 3.0.1 with Windows 98.  When I execute
the following code, I get the error messages below:

In[1]:=
<<Calculus`FourierTransform`

In[2]:=
Clear[fx, fw, a]

In[3]:=
a:=1

In[4]:=
fx[x_]:=Exp[-Abs[x*a]]

In[5]:=
fw[w_]:=InverseFourierTransform[fx[x], x, w]

In[6]:=
Plot[fw[w], {w, -5*a,5*a}]

Plot::plnr : fw[w] is not a machine-size real number at w = -5..
Plot::plnr : fw[w] is not a machine-size real number at w = -4.59433..
Plot::plnr : fw[w] is not a machine-size real number at w = -4.15191..
General:: stop : Further output of Plot::plnr will be suppressed during this
calculation.

Does anyone know where I might obtain a corrected FourierTransform.m package
for Mathematica 3.0.1?  My copy is dated 7/21/97.  I contacted Wolfram about
this matter.  However, they told me they no longer support version 3.0.  I