MathGroup Archive 2003

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

Search the Archive

Re: is this a new bug? Mathematicaa 5.0...

  • To: mathgroup at smc.vnet.net
  • Subject: [mg43203] Re: is this a new bug? Mathematicaa 5.0...
  • From: Paul Abbott <paul at physics.uwa.edu.au>
  • Date: Wed, 20 Aug 2003 22:24:48 -0400 (EDT)
  • Organization: The University of Western Australia
  • References: <bhfkcb$6ak$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

In article <bhfkcb$6ak$1 at smc.vnet.net>, w1rw1ck at hotmail.com (steven) 
wrote:

> Assuming[b > 0 && [Omega] > 0 && b [NotEqual] [Omega] , 
>     Integrate[
>       (Sin[b t]/(b t)) [ExponentialE]^([ImaginaryI][Omega]t),
> {t, (-[Infinity]),  [Infinity]}]])
> 
> Out = 0    ( think this should be a "rectangle" function..  )

Since you are computing a Fourier transform, why not use

  FourierTransform[Sin[b t]/(b t), t, w]

which does, indeed, give you what you are after (and quickly too).

Cheers,
Paul

-- 
Paul Abbott                                   Phone: +61 8 9380 2734
School of Physics, M013                         Fax: +61 8 9380 1014
The University of Western Australia      (CRICOS Provider No 00126G)         
35 Stirling Highway
Crawley WA 6009                      mailto:paul at physics.uwa.edu.au 
AUSTRALIA                            http://physics.uwa.edu.au/~paul


  • Prev by Date: Re: Are points co-planar in (numDimensions-1)?
  • Next by Date: MATHGROUP MESSAGE Re: Comprehensive Clear ?
  • Previous by thread: Re: is this a new bug? Mathematicaa 5.0...
  • Next by thread: Re: is this a new bug? Mathematicaa 5.0...