Re: On Reduce

*To*: mathgroup at smc.vnet.net*Subject*: [mg72044] Re: [mg72011] On Reduce*From*: Andrzej Kozlowski <akoz at mimuw.edu.pl>*Date*: Sat, 9 Dec 2006 06:09:53 -0500 (EST)*References*: <200612081118.GAA20205@smc.vnet.net>

On 8 Dec 2006, at 20:18, Virgil Stokes wrote: > I have the following small piece of Mathematica code that works > fine for > my purposes. > > BInv = {{ 1/4, 1/4, 0}, > {-1/2, 1/2, 0}, > { 3/4, -5/4, 1}} > B = Inverse[BInv] > b = {4 + \[Delta], 8, 10}; > BInv.b // FullSimplify > Reduce[{%[[1]] >= 0, %[[2]] >= 0, %[[3]] >= 0}, {\[Delta]}] > % /. {\[Delta] -> b1 - 4} // FullSimplify > > which gives > > 0 <= b1 <= 8 > > which is of course correct. But, how can I use (access) the values > 0 and 8? > That is, I would like to now use these values in some expressions that > would follow this. > > Thanks, > V. Stokes > Do you mean you wan tot extract the pair {0,8} as a list? There are lots of way, e.g. Cases[%,_?NumericQ] {0,8} Andrzej Kozlowski

**References**:**On Reduce***From:*Virgil Stokes <vs@it.uu.se>