fact: Definition right {x y z : C} (f : x ~> y) : z + x ~{C}~> z + y := inl ▽ (inr ∘ f).
imports: Category.Lib Category.Theory.Category Category.Theory.Isomorphism Category.Structure.Cartesian Category.Structure.Initial Category.Construction.Opposite