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

Re: Solving complex equations

• To: mathgroup at smc.vnet.net
• Subject: [mg91214] Re: Solving complex equations
• From: J Davis <texasAUtiger at gmail.com>
• Date: Sat, 9 Aug 2008 07:48:29 -0400 (EDT)
• References: <g7h9m1$b6e$1@smc.vnet.net>

On Aug 8, 6:12 am, "Adel Elsabbagh" <aelsabb... at gmail.com> wrote:
> Dear all,
>
> If I have a complex equation in the form of
> a+b I + c+d I == 3+ 4 I
> where a, b, c, and d are all assumed to be real.
>
> How do I tell Mathematica 6 to separate the real and imaginary parts to make
> two equations in the form of
> a + c == 3, and
> b + d == 4.
>
> I need this to apply it on a long list of equations.
>
> Thanks in advance!
>
> --
> Adel Elsabbaghhttp://www.svlab-asu.com/aelsabbagh.html

Solve[{ComplexExpand[Re[a + b I + c + d I]] == Re[3 + 4 I],
  ComplexExpand[Im[a + b I + c + d I]] == Im[3 + 4 I]}, {a, b}]