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: simplifying inequalities

  • To: mathgroup at smc.vnet.net
  • Subject: [mg72326] Re: simplifying inequalities
  • From: "dimitris" <dimmechan at yahoo.com>
  • Date: Tue, 26 Dec 2006 06:02:39 -0500 (EST)
  • References: <33432688.1166365192302.JavaMail.root@eastrmwml08.mgt.cox.net>

In[61]:=
Simplify[Reduce[beamLength > 5*x && 2*beamLength > 5*x && 3*beamLength
> 5*x && 4*beamLength > 5*x && beamLength > x > 0,
   beamLength], x > 0]

Out[61]=
beamLength > 5*x

Dimitris
Chris Chiasson wrote:
> Thanks
>
> On 12/17/06, Bob Hanlon <hanlonr at cox.net> wrote:
> > ineq=beamLength>5 x&&2 beamLength>5 x&&3 beamLength>5 x&&
> >     4 beamLength>5 x;
> >
> > assum=beamLength>x>0;
> >
> > Simplify[Reduce[ineq&&assum, x], assum]
> >
> > beamLength>5 x
> >
> >
> > Bob Hanlon
> >
> > ---- Chris Chiasson <chris at chiasson.name> wrote:
> > > Why isn't the result of this command,
> > >
> > > FullSimplify[
> > >   beamLength>5 x&&2 beamLength>5 x&&3 beamLength>5 x&&
> > >     4 beamLength>5 x,{beamLength>x>0}]
> > >
> > > , equal to beamLength>5x?
> > >
> > > Mathematica just returns all the inequalities as input. Can something
> > > be done about this?
> > >
> > > --
> > > http://chris.chiasson.name/
> > >
> >
> > --
> >
> > Bob Hanlon
> > hanlonr at cox.net
> >
> >
> >
> 
> 
> -- 
> http://chris.chiasson.name/


  • Prev by Date: Re: a bug in recursive formula in 64 bit machine
  • Next by Date: Re: ReplaceAll applied to List
  • Previous by thread: Re: simplifying inequalities
  • Next by thread: rebuild the help index problem