Definition OB_l (dxc : POb (Dual D) C) : D := Ob_l dxc.Definition Build_POb1 (d : D) (c : C) := Build_POb (A:=Dual D) (B:=C) d c.Definition FunSET2_r_mor1 (h : FunSET2_r_ob d1xc1) :=
    (FMor F (HOM_l foxg) o h) o Hom_r foxg.

(* Specifications: *)
Lemma FunSET2_r_map_law1 : Map_law FunSET2_r_mor1.