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
>
>