proposition: Lemma add_neq_mapsto_iff m x y e e' : ~ K.eq x y -> (MapsTo y e' (add x e m) <-> MapsTo y e' m).
proof: Proof. split; [apply add_3|apply add_2]; auto. Qed.
imports: Coq(Bool Equalities Orders OrdersFacts OrdersLists) Coq(Morphisms Permutation SetoidPermutation) MMaps(Utils Comparisons Interface)