MathGroup Archive 2006

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

Search the Archive

Re: On Reduce


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


  • 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