Section MapComp.
Variable T1 T2 T3 : Type.

(* Specifications: *)
Lemma map_id (s : seq T1) : map id s = s.
Lemma map_id_in (T : eqType) f (s : seq T) : {in s, f =1 id} -> map f s = s.
Lemma pmap_uniq s : uniq s -> uniq (pmap f s).
Lemma perm_pmap s t : perm_eq s t -> perm_eq (pmap f s) (pmap f t).
End EqPmap.