MathGroup Archive 2006

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

Search the Archive

Re: Reasonable integration speed? (24 hrs and counting)

  • To: mathgroup at smc.vnet.net
  • Subject: [mg68086] Re: Reasonable integration speed? (24 hrs and counting)
  • From: axlq at spamcop.net (axlq)
  • Date: Sat, 22 Jul 2006 06:24:09 -0400 (EDT)
  • References: <e9nkvm$9vo$1@smc.vnet.net> <e9q97p$7tf$1@smc.vnet.net> <e9rhl6$p7k$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

In article <e9rhl6$p7k$1 at smc.vnet.net>,
Jean-Marc Gulliet  <jeanmarc.gulliet at gmail.com> wrote:
>I think you can abort the evaluation. Here is what I get on my system:
>
>f[x] = Sqrt[a^2 + (q - x)^2]
>
>Integrate[Cos[(2*n + 1)*Pi*(x/d)]*((Exp[(-I)*k*f[x]]/(4*Pi*f[x]^5))*((1 
>+ I*k*f[x])*(2*f[x]^2 - 3*a^2) + (k*a*f[x])^2)*I*(d/(2*Pi*w)) + p), {x, 
>-d/2, d/2}]
>
>displays after several minutes
>
>Integrate::"gener" : "Unable to check convergence.

Hmmm... I never got any such message.  Oh, well, I did abort it
after I broke it down into several simpler terms using Expand[] and
discovered Mathematica couldn't integrate most of them.  At least it
gave me output eventually; after an hour or it gave back the same
thing I input.

Now I'm writing a routine in Visual Basic for Excel solve it
numerically.

-Alex


  • Prev by Date: Re: Applying a list of 2D paramters to a mathematica function
  • Next by Date: Re: Applying a list of 2D paramters to a mathematica function
  • Previous by thread: Re: Reasonable integration speed? (24 hrs and counting)
  • Next by thread: General--FindRoot::nlnum error (Updated)