fact: Hypothesis map_extend : forall (E F : Setoid) (f g : MAP E F) (A : part_set E), exists b : MAP E F, (forall x : E, in_part x A -> Equal (b x) (f x)) /\ (forall x : E, ~ in_part x A -> Equal (b x) (g x)).
imports: Parts2