aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/micromega
diff options
context:
space:
mode:
authorGravatar fbesson <fbesson@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-05-11 20:09:34 +0000
committerGravatar fbesson <fbesson@85f007b7-540e-0410-9357-904b9bb8a0f7>2009-05-11 20:09:34 +0000
commit28a38529e47d2593a7af41a7223208e2dd049179 (patch)
tree5f20a493312388aea52f927fd3a1eb8255d85f0f /test-suite/micromega
parente66ba651bdd283dd490453f9d48b226730444726 (diff)
micromega: proof compression bugfix
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12123 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/micromega')
-rw-r--r--test-suite/micromega/zomicron.v8
1 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/micromega/zomicron.v b/test-suite/micromega/zomicron.v
index 3087db1ad..60c16a998 100644
--- a/test-suite/micromega/zomicron.v
+++ b/test-suite/micromega/zomicron.v
@@ -26,3 +26,11 @@ Proof.
lia.
Qed.
+Lemma compact_proof : forall z,
+ (z < 0) ->
+ (z >= 0) ->
+ (0 >= z \/ 0 < z) -> False.
+Proof.
+ intros.
+ lia.
+Qed. \ No newline at end of file