(***************************************************)
(** * Applying functions to the elements of a list *)
(***************************************************)
(************)
(** ** Map  *)
(************)
Section Map.
Variables (A : Type) (B : Type).
Variable f : A -> B.
Local Notation map := (@map A B f).

Lemma in_map :
forall (l:list A) (x:A), In x l -> In (f x) (map l).