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