fact: Definition AdjunctionFromUniversalArrows (H: forall c : C, UniversalArrow c U) : @Adjunction _ _ (LeftAdjointFunctorFromUniversalArrows H) U.
imports: Category.Lib Category.Theory.Category Category.Theory.Functor Category.Theory.Adjunction Category.Structure.Initial Category.Theory.Isomorphism Category.Construction.Comma Category.Functor.Diagonal Category.Instance.Sets