diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2007-01-22 17:36:04 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2007-01-22 17:36:04 +0000 |
| commit | 612ea3d4b3c7d7e00616b009050803cd7b7f763e (patch) | |
| tree | d176ca917b4cc77c1f8710eb80b6d3198576b492 /test-suite/success/unification.v | |
| parent | c939260137bef6002aad416632641c04601dc2b8 (diff) | |
Correction d'un bug d'unification-pattern dans l'algo d'unification
des tactiques (ne marchait que si l'instance était une application).
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9516 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'test-suite/success/unification.v')
| -rw-r--r-- | test-suite/success/unification.v | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/test-suite/success/unification.v b/test-suite/success/unification.v index 7acbb7d05..2d6dabf26 100644 --- a/test-suite/success/unification.v +++ b/test-suite/success/unification.v @@ -15,6 +15,12 @@ Proof. intros; apply (H _ H0). Qed. +Lemma l3 : (forall P, ~(exists x:nat, P x)) + -> forall P:nat->Prop, ~(exists x:nat, P x -> P x). +Proof. +intros; apply H. +Qed. + (* Example submitted for Zenon *) |