Canonical Structure FunY := Build_Functor0'' FunY_comp_law FunY_id_law.

(* Specifications: *)
Lemma Y_full : let f := fun (a b : C) (h : NT (FunSET a) (FunSET b)) => h a (Id a) in Full_law0'' (F:=FunY) f.
Lemma Y_faithful : Faithful_law0'' FunY.