Program Definition PMCM_PreSheaf_representing_d : PreSheaf C
      :=
        {|
          FO := fun c' => ((Hom C c' c) * d)%type;
          FA := fun o o' u x => (compose C u (fst x), snd x)
        |}
    .

(* Specifications: *)
Theorem PreSheaf_Monic_components_is_Monic : g = h.