Re: question
- To: mathgroup at smc.vnet.net
- Subject: [mg80092] Re: question
- From: Jean-Marc Gulliet <jeanmarc.gulliet at gmail.com>
- Date: Sun, 12 Aug 2007 07:19:36 -0400 (EDT)
- Organization: The Open University, Milton Keynes, UK
- References: <f9jlom$3oc$1@smc.vnet.net>
dimitris wrote:
<snip>
> In Mathematica 5.2
>
> In[5]:=
> FourierTransform[Sign[y]*Sign[a*y], y, q]
>
> Out[5]=
> (1/q)*((I*(1 - E^(I*q*Sqrt[1/Integrate`NLtheoremDump`myMax[0,
> 0]^2]*Integrate`NLtheoremDump`myMax[0, 0]^2) +
> E^(2*I*q*Sqrt[1/Integrate`NLtheoremDump`myMax[0,
> 0]^2]*Integrate`NLtheoremDump`myMax[0, 0]^2))*Sqrt[2/Pi]*
> (2 + DiscreteDelta[a] - UnitStep[-a] - UnitStep[a]))/E^(I*q*Sqrt[1/
> Integrate`NLtheoremDump`myMax[0, 0]^2]*
> Integrate`NLtheoremDump`myMax[0, 0]^2))
>
> I think outputs like this is a mini nightmare for the developers.
>
> What does version 6 returns?
Less obfuscated answer Mathematica 6 returns:
In[1]:= $Version
FourierTransform[Sign[y]*Sign[a*y], y, q]
Out[1]= "6.0 for Microsoft Windows (32-bit) (June 19, 2007)"
Out[2]= -Sqrt[2 Pi] DiracDelta[q] UnitStep[-a] +
Sqrt[2 Pi] DiracDelta[q] UnitStep[a] -
2
I Sqrt[--] UnitStep[-a] UnitStep[a]
Pi
-----------------------------------
q
--
Jean-Marc