From 981ece2836d6366f3dad790c21350feb24b036af Mon Sep 17 00:00:00 2001 From: herbelin Date: Mon, 13 Jun 2011 22:21:33 +0000 Subject: Added full pattern-unification on Meta for tactic unification. No way to control it yet; maybe flag use_evars_pattern_unification should be generalized for that purpose. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14199 85f007b7-540e-0410-9357-904b9bb8a0f7 --- test-suite/success/unification.v | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'test-suite') diff --git a/test-suite/success/unification.v b/test-suite/success/unification.v index 18ba0fc870..fdc7c72220 100644 --- a/test-suite/success/unification.v +++ b/test-suite/success/unification.v @@ -21,6 +21,12 @@ Proof. intros; apply H. Qed. + (* Feature introduced June 2011 *) + +Lemma l7 : forall x (P:nat->Prop), (forall f, P (f x)) -> P (x+x). +Proof. +intros x P H; apply H. +Qed. (* Example submitted for Zenon *) @@ -138,3 +144,4 @@ Goal (forall (A B : Set) (f : A -> B), (fun x => f x) = f) -> Proof. intros. rewrite H with (f:=f0). +Abort. -- cgit v1.2.3