diff options
| author | mohring | 2001-07-16 12:41:39 +0000 |
|---|---|---|
| committer | mohring | 2001-07-16 12:41:39 +0000 |
| commit | 183d7b8eb4b8a0cb297c4d93ce4a43a72567201e (patch) | |
| tree | 9ce9d3bfbb0e380ed4fd264f72cdf2cb0dc58b9b | |
| parent | 3736dcbebef6e9ac2451102681e37765e0acbc06 (diff) | |
modif Map section
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1851 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | theories/Lists/PolyList.v | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/theories/Lists/PolyList.v b/theories/Lists/PolyList.v index ed64bad707..c1d07eaa67 100644 --- a/theories/Lists/PolyList.v +++ b/theories/Lists/PolyList.v @@ -549,7 +549,7 @@ Section Functions_on_lists. (* Some generic functions on lists and basic functions of them *) (***************************************************************) -Section Map. +Section Map_def. Variables A,B:Set. Variable f:A->B. Fixpoint map [l:(list A)] : (list B) := @@ -557,7 +557,7 @@ Fixpoint map [l:(list A)] : (list B) := nil => (nil B) | (cons a t) => (cons (f a) (map t)) end. -End Map. +End Map_def. Lemma in_map : (A,B:Set)(f:A->B)(l:(list A))(x:A) (In x l) -> (In (f x) (map f l)). |
