Canonical Structure FunSET2_r := Build_Functor Fun2_r_comp_law Fun2_r_id_law.Definition FunSET2_l_mor1 (h : FunSET2_l_ob d1xc1) :=
    (HOM_l foxg o h) o FMor G (Hom_r foxg).

Lemma FunSET2_l_map_law1 : Map_law FunSET2_l_mor1.