MathGroup Archive 2006

[Date Index] [Thread Index] [Author Index]

Search the Archive

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>
  • Prev by Date: Re: how-to show a contourplot together with a point grid
  • Next by Date: RE: how-to show a contourplot together with a point grid
  • Previous by thread: On Reduce
  • Next by thread: Re: On Reduce