MathGroup Archive 2006

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

Search the Archive

Re: FourierTransform of a function defined in sections

  • To: mathgroup at
  • Subject: [mg70189] Re: FourierTransform of a function defined in sections
  • From: Paul Abbott <paul at>
  • Date: Sat, 7 Oct 2006 07:06:59 -0400 (EDT)
  • Organization: The University of Western Australia
  • References: <eg4soa$ffu$>

In article <eg4soa$ffu$1 at>,
 "Eckhard Schlemm" <e.schlemm at> wrote:

> I want Mathematica to calculate the FourierTransform of a function which is
> defined by Sin[x]^2 for Abs[x]<PI and zero else. 

What version of Mathematica are you using? For Piecewise functions, it 
is preferable to use Piecewise.

> I tried and defined the function g as follows:
> g[x_]:=If[Abs[x]>PI,0,Sin[x]^2];

I assume that you have Pi instead of PI.
> That works fine. 

Note that in version 5.2, PiecewiseExpand converts g[x] to a Piecewise 
function -- and such operations are done automatically, if required. For 

  Integrate[g[x], x]

  Piecewise[{{x/2 - Sin[2 x]/4, Abs[x] <= Pi}}, 0]

> But if I have mathematica try to determine the FourierTransform by
> FourierTransform[g[x],x,p]
> I always get the error that the recursion limit and the iteration limit were
> exceeded...
> what am I'm doing wrong?

In version 5.2 the following three expressions are identical:

  FourierTransform[g[x], x, k]

  FourierTransform[Piecewise[{{Sin[x]^2, -Pi <= x <= Pi}}], x, k]

  1/Sqrt[2 Pi] Integrate[E^(I k x) Sin[x]^2, {x, -Pi, Pi}]


Paul Abbott                                      Phone:  61 8 6488 2734
School of Physics, M013                            Fax: +61 8 6488 1014
The University of Western Australia         (CRICOS Provider No 00126G)    

  • Prev by Date: Re: List manipulation
  • Next by Date: Re: JLink OutOfMemoryError
  • Previous by thread: Re: Problem with nested NIntegrate[]
  • Next by thread: Troubles with Integrate