diff options
| author | herbelin | 2005-02-17 18:26:01 +0000 |
|---|---|---|
| committer | herbelin | 2005-02-17 18:26:01 +0000 |
| commit | 972810075672eef13bfd267d2119533549508dea (patch) | |
| tree | 95ce43273015d7a4e2470c9c7cddbd3b623e6151 | |
| parent | a9d2cde33c87d060b8e7cd1fe39f3cb8ef64a509 (diff) | |
Test bug #922
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6729 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | test-suite/success/Omega2.v8 | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/test-suite/success/Omega2.v8 b/test-suite/success/Omega2.v8 new file mode 100644 index 0000000000..c1f4877a6f --- /dev/null +++ b/test-suite/success/Omega2.v8 @@ -0,0 +1,27 @@ +Require Import ZArith Omega. + +(* Submitted by Yegor Bryukhov (#922) *) + +Open Scope Z_scope. + +Lemma Test46 : +forall v1 v2 v3 v4 v5 : Z, +((2 * v4) + (5)) + (8 * v2) <= ((4 * v4) + (3 * v4)) + (5 * v4) -> +9 * v4 > (1 * v4) + ((2 * v1) + (0 * v2)) -> +((9 * v3) + (2 * v5)) + (5 * v2) = 3 * v4 -> +0 > 6 * v1 -> +(0 * v3) + (6 * v2) <> 2 -> +(0 * v3) + (5 * v5) <> ((4 * v2) + (8 * v2)) + (2 * v5) -> +7 * v3 > 5 * v5 -> +0 * v4 >= ((5 * v1) + (4 * v1)) + ((6 * v5) + (3 * v5)) -> +7 * v2 = ((3 * v2) + (6 * v5)) + (7 * v2) -> +0 * v3 > 7 * v1 -> +9 * v2 < 9 * v5 -> +(2 * v3) + (8 * v1) <= 5 * v4 -> +5 * v2 = ((5 * v1) + (0 * v5)) + (1 * v2) -> +0 * v5 <= 9 * v2 -> +((7 * v1) + (1 * v3)) + ((2 * v3) + (1 * v3)) >= ((6 * v5) + (4)) + ((1) + (9)) +-> False. +intros. +omega. +Qed. |
