Groups | Search | Server Info | Login | Register


Groups > comp.soft-sys.math.maple > #198

Re: Complex Roots

From Joe Riel <joer@san.rr.com>
Newsgroups comp.soft-sys.math.maple
Subject Re: Complex Roots
Date 2011-07-01 10:39 -0700
Organization A noiseless patient Spider
Message-ID <87sjqp294m.fsf@san.rr.com> (permalink)
References <ac36427c-d657-460d-9af7-93094a2bf777@h25g2000prf.googlegroups.com>

Show all headers | View raw


Joel <joel.steenis@gmail.com> writes:

> I am trying to find all the complex roots of the equation T given
> below:
>
> w := 60*(2*3.14159);
> R12 := .5;
> L12 := 3/w;
> Z12 := R12+s*L12+I*w*L12;
> kp := 0.5e-3;
> kv := 0.5e-3;
> Q1 := 384;
> Q2 := 375;
>
> apw1 := s+kp*(-Q1+w*L12/abs(Z12)^2);
> apw2 := s+kp*(-Q2+w*L12/abs(Z12)^2);
> aqv1 := 1+kv*(Q1+w*L12/abs(Z12)^2);
> aqv2 := 1+kv*(Q2+w*L12/abs(Z12)^2);
> T := apw1*apw2*aqv1*aqv2;
>
>
> I have used the solve, fsolve (with complex argument), and RootOf
> function but all that is returned is one real root or nothing at all.

It only has two roots, both real.  That is apparent from the 
form of the expressions.  One way to produce both of them is

map(fsolve, {op(T)});

-- 
Joe Riel

Back to comp.soft-sys.math.maple | Previous | NextPrevious in thread | Next in thread | Find similar


Thread

Complex Roots Joel <joel.steenis@gmail.com> - 2011-07-01 08:25 -0700
  Re: Complex Roots Joe Riel <joer@san.rr.com> - 2011-07-01 10:39 -0700
    Re: Complex Roots A N Niel <anniel@nym.alias.net.invalid> - 2011-07-02 06:46 -0600

csiph-web