From b106d57de090ed0033a984247e6ba6546da6629c Mon Sep 17 00:00:00 2001
From: letouzey
Date: Mon, 22 May 2006 10:33:06 +0000
Subject: encore un exemple ne marchant pas, ni avec omega ni avec romega

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@8839 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 test-suite/success/Omega0.v  | 16 ++++++++++++++++
 test-suite/success/ROmega0.v | 16 ++++++++++++++++
 2 files changed, 32 insertions(+)

diff --git a/test-suite/success/Omega0.v b/test-suite/success/Omega0.v
index 20340c9894..4614c90db0 100644
--- a/test-suite/success/Omega0.v
+++ b/test-suite/success/Omega0.v
@@ -3,6 +3,22 @@ Open Scope Z_scope.
 
 (* Pierre L: examples gathered while debugging romega. *)
 
+Lemma test_romega_0 : 
+ forall m m', 
+  0<= m <= 1 -> 0<= m' <= 1 -> (0 < m <-> 0 < m') -> m = m'.
+Proof.
+intros.
+(*omega.*)
+Admitted.
+
+Lemma test_romega_0b : 
+ forall m m', 
+  0<= m <= 1 -> 0<= m' <= 1 -> (0 < m <-> 0 < m') -> m = m'.
+Proof.
+intros m m'.
+(*omega.*)
+Admitted.
+
 Lemma test_romega_1 : 
  forall (z z1 z2 : Z), 
     z2 <= z1 ->
diff --git a/test-suite/success/ROmega0.v b/test-suite/success/ROmega0.v
index 2cb66fef1c..0efca1e13f 100644
--- a/test-suite/success/ROmega0.v
+++ b/test-suite/success/ROmega0.v
@@ -3,6 +3,22 @@ Open Scope Z_scope.
 
 (* Pierre L: examples gathered while debugging romega. *)
 
+Lemma test_romega_0 : 
+ forall m m', 
+  0<= m <= 1 -> 0<= m' <= 1 -> (0 < m <-> 0 < m') -> m = m'.
+Proof.
+intros.
+(*romega.*)
+Admitted.
+
+Lemma test_romega_0b : 
+ forall m m', 
+  0<= m <= 1 -> 0<= m' <= 1 -> (0 < m <-> 0 < m') -> m = m'.
+Proof.
+intros m m'.
+(*romega.*)
+Admitted.
+
 Lemma test_romega_1 : 
  forall (z z1 z2 : Z), 
     z2 <= z1 ->
-- 
cgit v1.2.3