diff options
| author |  msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-12-14 16:21:23 +0000 |
|---|---|---|
| committer | msozeau <msozeau@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2006-12-14 16:21:23 +0000 |
| commit | 856a5c32dca6f0ff7bb47bdac8465f75a76fde1f (patch) | |
| tree | 44b2d438fc6082306897263d66df708324779987 /contrib/subtac/test/take.v | |
| parent | 9413d09feb48aee891a0c759d2217068a391f30e (diff) | |
Reimplemented equality generation for pattern matching at typing time. First version.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@9451 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/subtac/test/take.v')
| -rw-r--r-- | contrib/subtac/test/take.v | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/subtac/test/take.v b/contrib/subtac/test/take.v index 968ab3ad7..07f63a2ba 100644 --- a/contrib/subtac/test/take.v +++ b/contrib/subtac/test/take.v @@ -1,7 +1,7 @@ Variable A : Set. Require Import JMeq. Require Import List. - +Require Import Coq.subtac.Utils. Program Fixpoint take (l : list A) (n : nat | n <= length l) { struct l } : { l' : list A | length l' = n } := match n with |