Section funset_mor_def.
Variable f : b --> c.
Definition FunSET_mor1 (g : a --> b) := g o f.
Canonical Structure FunSET_mor : Map (FunSET_ob b) (FunSET_ob c) :=
FunSET_map_law1.
End funset_mor_def.
Canonical Structure FunSET_map := Build_Map FunSET_map_law.
End funset_map_def.

Lemma Fun_comp_law : Fcomp_law FunSET_map.