End MapAxioms.

Lemma MapDomRestrBy_ext_l :
forall (A B:Type) (m1:Map A) (m2:Map B) (m'1:Map A),
eqmap A m1 m'1 ->
eqmap A (MapDomRestrBy A B m1 m2) (MapDomRestrBy A B m'1 m2).