MathGroup Archive 2004

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

Search the Archive

Re: List of solution

  • To: mathgroup at smc.vnet.net
  • Subject: [mg46993] Re: [mg46977] List of solution
  • From: "Sseziwa Mukasa,,(978) 536-2359" <mukasa at jeol.com>
  • Date: Fri, 19 Mar 2004 01:35:46 -0500 (EST)
  • References: <200403180625.BAA07630@smc.vnet.net>
  • Sender: owner-wri-mathgroup at wolfram.com

On Mar 18, 2004, at 1:25 AM, Clément wrote:

> Hello MathGroup,
>
> I have resolved an equation. So i have a list of solution like : 
> {{x->0,
> y->0}{x->1, y->0}{x->i, y->1+2i}}
> I want to remove the complex solutions of this list.
> How can i do ?
>
> Thanks
>

Select[{x,y}/.{{x->0,y->0}{x->1, y->0}{x->i, 
y->1+2i}},Im[#[[1]]]==0&&Im[#[[2]]]==0&]

Regards,

Ssezi


  • Prev by Date: Re: Re: Exact real solutions of cubic equations
  • Next by Date: Re: List of solution
  • Previous by thread: List of solution
  • Next by thread: RE: List of solution