Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2006
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2006

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

Search the Archive

Re: On Reduce

  • To: mathgroup at smc.vnet.net
  • Subject: [mg72173] Re: [mg72011] On Reduce
  • From: Virgil Stokes <vs at it.uu.se>
  • Date: Wed, 13 Dec 2006 06:42:23 -0500 (EST)
  • References: <200612081118.GAA20205@smc.vnet.net> <B874AACE-F0C2-4869-9588-5B3DDBBB8183@mimuw.edu.pl>

Andrzej Kozlowski wrote:
>
> 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
Very nice Andrzej,

It is clear I need to study Mathematica more.

--Thanks,
V


  • References:
    • On Reduce
      • From: Virgil Stokes <vs@it.uu.se>
  • Prev by Date: Re: Two suggestions for Wolfram Workbench
  • Next by Date: Re: it seems like InequalityPlot can only handle a color
  • Previous by thread: Re: On Reduce
  • Next by thread: Re: On Reduce