Structure > CoUA : Type :=
{CoUA_ob : A; CoUA_mor : F CoUA_ob --> b; Prf_IsCoUA :> IsCoUA CoUA_mor}.
(*** rewrite rules ***)

(* Specifications: *)
Lemma CoUA_diag :
forall (u : CoUA) (a' : A) (f : F a' --> b),
FMor F (CoUA_diese u f) o CoUA_mor u =_S f.
Lemma CoUA_diag1 :
forall (u : CoUA) (a' : A) (f : F a' --> b),
f =_S FMor F (CoUA_diese u f) o CoUA_mor u.
Lemma CoUA_unic :
forall (u : CoUA) (a' : A) (f : F a' --> b) (g : a' --> CoUA_ob u),
FMor F g o CoUA_mor u =_S f -> g =_S CoUA_diese u f.
Lemma CoUA_unic1 :
forall (u : CoUA) (a' : A) (f : F a' --> b) (g : a' --> CoUA_ob u),
FMor F g o CoUA_mor u =_S f -> CoUA_diese u f =_S g.