Canonical Structure Comp_MonMor : MonMor_setoid m1 m3 :=
  Build_MonMor Comp_MonMor_unit_law Comp_MonMor_op_law.

(* Specifications: *)
Lemma Comp_MonMor_congl : Congl_law Comp_MonMor.
Lemma Comp_MonMor_congr : Congr_law Comp_MonMor.