MathGroup Archive 2002

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

Search the Archive

Re: Find all complex root in a region

  • To: mathgroup at smc.vnet.net
  • Subject: [mg38087] Re: Find all complex root in a region
  • From: AES/newspost <siegman at stanford.edu>
  • Date: Tue, 3 Dec 2002 04:29:08 -0500 (EST)
  • References: <as5qnv$nk4$1@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

In article <as5qnv$nk4$1 at smc.vnet.net>,
 mutte75 at hotmail.com (Massimiliano Casaletti) wrote:

> function[z_,w_]:=Module[{k0,sl},k0=w/(3*10^8);sl=(Sqrt[k0^2-z^2])/(377*k0)-(I*
> Sqrt[e*k0^2-z^2])/(377*k0*Tan[o*Sqrt[e*k0^2-z^2]])+I
> w a (1 - b t w^2)/((1 - b t w^2)*(1 - g a w^2) - b a w^2)];

Doing some kind of fiber optics or wave propagation, one might guess . . 
. .


"Power tends to corrupt.  Absolute power corrupts absolutely."
    Lord Acton (1834-1902)
"Dependence on advertising tends to corrupt.  Total dependence 
    on advertising  corrupts totally." (today's equivalent)  


  • Prev by Date: Numerical Integration in Two Dimensions
  • Next by Date: Re: solving non-algebraic exponential equations
  • Previous by thread: Re: Numerical Integration in Two Dimensions
  • Next by thread: Re: Find all complex root in a region