Re: Mathematica freezes?
- To: mathgroup at smc.vnet.net
- Subject: [mg126987] Re: Mathematica freezes?
- From: Jason Ebaugh <ebaughjason at gmail.com>
- Date: Fri, 22 Jun 2012 03:00:11 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <jrup2b$flc$1@smc.vnet.net>
The evaluation does not complete and I get this message:
"NIntegrate::slwcon: Numerical integration converging too slowly; suspect one of the following: singularity, value of the integration is 0, highly oscillatory integrand, or WorkingPrecision too small. >>"
But the front end application itself does not freeze. I can just choose "abort evaluation" for the pull down menu and all is well.
Jason Ebaugh
On Thursday, June 21, 2012 4:21:15 AM UTC-5, Alex Khmelnitsky wrote:
> When I try to do the following commands:
>
> r = 3.7; a = 5.1; z = 1.1; p = 0.61;
>
> e = Exp[I f];
> ep = Exp[I p];
> tc = r \[Rho] ep/e;
> l1 = 1/2 (Sqrt[(r + a)^2 + z^2] - Sqrt[(r - a)^2 + z^2]);
> l2 =
> 1/2 (Sqrt[(r + a)^2 + z^2] + Sqrt[(r - a)^2 + z^2]);
> sq = Sqrt[a^2 - \[Rho]^2];
> sq1 = Sqrt[a^2 - l1^2];
> sq2 = Sqrt[ l2^2 - a^2];
> \[Rho] = a Sin[x];
> ff1 = 2 Pi (a^2/(a^2 - tc)^(3/2) ArcTan[Sqrt[a^2 - tc]/sq2] - (
> tc sq2)/((a^2 - tc) (l2^2 - tc)));
>
> NIntegrate[ff1 \[Rho]^2/e, {f, 0, 2 Pi}, {x, 0, Pi/2}],
>
> it freezes Mathematica. Does it freeze on anyone else's computer?
>
> Thanks.