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

Re: Taking the Log causing Mathematica kernel crash.

• To: mathgroup at smc.vnet.net
• Subject: [mg57059] Re: Taking the Log causing Mathematica kernel crash.
• From: "Nasser Abbasi" <nma at 12000.org>
• Date: Sat, 14 May 2005 04:57:57 -0400 (EDT)
• References: <d615dg$nn1$1@smc.vnet.net>
• Reply-to: "Nasser Abbasi" <nma at 12000.org>
• Sender: owner-wri-mathgroup at wolfram.com

"me" <nma at 12000.org> wrote in message news:d615dg$nn1$1 at smc.vnet.net...
> Mathematica 5.1 on Windows.
>

This is another small variation on this problem of the Log[]

Now, this causes Mathematica kernel to start eating
all the memory very quickly with full CPU consumption.

Clear["Global`*"]
f[t_] := Sin[3.5*t] + 2*Cos[2*t];
g[t_] := Piecewise[{{0, t < -2*Pi}, {f[t], t >= -2*Pi && t <= 2*Pi},
{0, t > 2*Pi}}];
c[w_] := Integrate[g[t]*Exp[(-I)*w*t], {t, -Infinity, Infinity}];
Plot[20*Log[10, Abs[c[w]]^2 +0.01], {w, -5, 5}, PlotRange -> All]


Nasser