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

**References**:**List of solution***From:*Clément <rusheraquatic@ifrance.com>