aboutsummaryrefslogtreecommitdiff
path: root/test-suite/success
diff options
context:
space:
mode:
authorherbelin2008-05-19 19:10:40 +0000
committerherbelin2008-05-19 19:10:40 +0000
commit7c51ef20064ed4f44a4e1dcb2040ec4b74919b5f (patch)
tree4cc4f55d026344c86de4381aa16cd2aa20f69150 /test-suite/success
parent133516a1acebebfce527204fe5109a5eecb9bb45 (diff)
Intégration de micromega ("omicron" pour fourier et sa variante sur Z,
"micromega" et "sos" pour les problèmes non linéaires sous-traités à csdp); mise en place d'un cache pour pouvoir rejouer les preuves sans avoir besoin de csdp (pour l'instant c'est du bricolage, faudra affiner cela). git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10947 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success')
-rw-r--r--test-suite/success/unification.v8
1 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/success/unification.v b/test-suite/success/unification.v
index 91ee18ea46..3d935cd1da 100644
--- a/test-suite/success/unification.v
+++ b/test-suite/success/unification.v
@@ -126,3 +126,11 @@ intros.
exists (fun n => match n with O => a | S n' => f' n' end).
constructor.
Qed.
+
+(* Why this not work, even, without the "fix" to #1851 *)
+
+Goal forall X (a:X 0) (f':forall n:nat, X n), (exists f : forall n:nat, X n, True).
+intros.
+exists (fun n => match n with O => a | S n' => f' n' end).
+constructor.
+Qed.