From 7c51ef20064ed4f44a4e1dcb2040ec4b74919b5f Mon Sep 17 00:00:00 2001
From: herbelin
Date: Mon, 19 May 2008 19:10:40 +0000
Subject: 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
---
 test-suite/success/unification.v | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'test-suite/success')

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.
-- 
cgit v1.2.3