Re: List of solution

*To*: mathgroup at smc.vnet.net*Subject*: [mg47003] Re: List of solution*From*: DrBob <drbob at bigfoot.com>*Date*: Fri, 19 Mar 2004 01:35:56 -0500 (EST)*Sender*: owner-wri-mathgroup at wolfram.com

Simple: {{x -> 0, y -> 0}, {x -> 1, y -> 0}, {x -> I, y -> 1 + 2I}} Select[%, FreeQ[#, I] &] {{x -> 0, y -> 0}, {x -> 1, y -> 0}, {x -> I, y -> 1 + 2*I}} {{x -> 0, y -> 0}, {x -> 1, y -> 0}} Bobby Clément <rusheraquatic at ifrance.com> wrote in message news:<c3bgf6$7qh$1 at smc.vnet.net>... > 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