Canonical Structure Functor_setoid := Build_Setoid' Equal_Functor_equiv.Infix "=_F" := Equal_Functor (at level 70).Definition Comp_FOb (a : C) := H (G a).

(* Specifications: *)
Lemma Comp_FMap_law : Map_law Comp_FMor.
Lemma Comp_Functor_comp_law : Fcomp_law Comp_FMap.
Lemma Comp_Functor_id_law : Fid_law Comp_FMap.