Section terminal1_def.
Variable C : Category.
SubClass Terminal1 := RightAdj (FunOne C).
Variable t : Terminal1.
Let ua' := CoUnit t Obone.
Definition Terminal1_ob := CoUA_ob ua'.
Definition MorT1 (a : C) := CoUA_diese ua' (a':=a) Id_Obone.

Lemma Prf_isTerminal1 : IsTerminal MorT1.