MathGroup Archive 2001

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

Search the Archive

How to save time with InequalitySolve

  • To: mathgroup at smc.vnet.net
  • Subject: [mg30305] How to save time with InequalitySolve
  • From: zylootino at yahoo.fr (Nathan ZYLBERSZTEJN)
  • Date: Wed, 8 Aug 2001 01:33:59 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

I want Mathematica to solve this system of inequalities. When I try
the following expressions, Mathematica is gone for hours and never
stops. How can I solve my system in a reasonable time?


InequalitySolve[
  -((-8*c*(-1 + d) + Sqrt[2 - 2*d]*
         Sqrt[-4*c^2*(-2 + 5*d) + 3*d*(2 - 3*d + d^2)])*
       (-4*c^2*(2 + d) + 3*d*(2 - 3*d + d^2) + 
        2*c*Sqrt[2 - 2*d]*Sqrt[-4*c^2*(-2 + 5*d) + 
           3*d*(2 - 3*d + d^2)]))/(54*c*(-2 + d)^2*d*
      (-1 + 2*c + d)) > (4*Sqrt[2/3])/3 && 1 > c > 0 && 
   1 > d > 0, {d, c}]

Thanks a lot

Nathan ZYLBERSZTEJN


  • Prev by Date: Viewing coin data sets
  • Next by Date: fourier transform
  • Previous by thread: Viewing coin data sets
  • Next by thread: Re: How to save time with InequalitySolve