Re: solving a set of inequalities

*To*: mathgroup at smc.vnet.net*Subject*: [mg65934] Re: [mg65910] solving a set of inequalities*From*: Bob Hanlon <hanlonr at cox.net>*Date*: Mon, 24 Apr 2006 06:01:36 -0400 (EDT)*Reply-to*: hanlonr at cox.net*Sender*: owner-wri-mathgroup at wolfram.com

eqns={3*a+5*b+9*c>6*a+6*b+8*c, 3*a+5*b+9*c>a+5*b+12*c, x+y+z==1}; Reduce[eqns, Reals] a > (3*c)/2 && b < c - 3*a && x == -y - z + 1 Perhaps the last equation also was intended to relate a, b, and c eqns={3*a+5*b+9*c>6*a+6*b+8*c, 3*a+5*b+9*c>a+5*b+12*c, a+b+c==1}; Reduce[eqns, Reals] c < -1 && (1/2)*(3 - 4*c) < b < (1/2)*(2 - 5*c) && a == -b - c + 1 Bob Hanlon > > From: reiro <reir at no.email.com> To: mathgroup at smc.vnet.net > Subject: [mg65934] [mg65910] solving a set of inequalities > > I'll be grateful if you tell me how to solve this set of inequalities in > mathematica. I've been looking in the help file but it returns an error > and I don't know how to sort it oout. > > I need to solve this set: > > 3*a + 5*b + 9*c > 6*a + 6*b + 8*c > 3*a + 5*b + 9*c > a + 5*b + 12*c > x + y + z = 1 > >