proposition: Lemma binds_map_2 : binds x a E -> binds x (f1 a) (map f1 f2 E).
proof: Proof. clear. induction E; simpl_asnlist. inversion 1. unfold binds in *. simpl. intros [? | ?]. destruct a0. inversion H; subst. left. congruence. inversion H. destruct a0. right. auto. right. auto. Qed.
imports: Coq.FSets.FSets Coq.Lists.List Coq.Logic.Decidable Metalib.CoqFSetDecide Metalib.CoqListFacts Metalib.LibTactics Metalib.MetatheoryAtom Metalib.LibTactics