Group Abstract Group Abstract

Message Boards Message Boards

Simplify long but easy inequality?

Posted 9 years ago
POSTED BY: Cl Ag
2 Replies
Posted 9 years ago

Thanks, that is very useful for me. Actually I think I can skip the Equivalent - I just want all already fulfilled inequalities removed. Or am I overlooking anything important?

I just feel a little disappointed that Simplify was not able to do this by itself.

POSTED BY: Cl Ag

If you evaluate

Reduce[$Assumptions && (s (-1 + q - q u)) + lab (-1 + q) q u v < 0]

you can recognize that it is equivalent to $Assumptions. Mathematica should know, because

Simplify[Equivalent[$Assumptions, 
  Reduce[$Assumptions && (s (-1 + q - q u)) + lab (-1 + q) q u v < 
     0]]]

gives True. You can automate this idea:

inequalityCheck[ineq_] := 
 Simplify[Equivalent[$Assumptions, Reduce[$Assumptions && ineq]]]

I have not tried it on other inequalities, though.

POSTED BY: Gianluca Gorni
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard