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)