proposition: Lemma add_2 m x y e e' : ~ K.eq x y -> MapsTo y e m -> MapsTo y e (add x e' m).
proof: Proof. intro. now rewrite <- !find_spec, add_spec2. Qed.
imports: Coq(Bool Equalities Orders OrdersFacts OrdersLists) Coq(Morphisms Permutation SetoidPermutation) MMaps(Utils Comparisons Interface)