fact: Definition make_is_retract {x y x' y' : C} {f : x --> y} {f' : x' --> y'} {ix : x' --> x} {rx : x --> x'} {iy : y' --> y} {ry : y --> y'} (hx : rx ∘ ix = identity x') (hy : ry ∘ iy = identity y') (hi : f ∘ ix = iy ∘ f') (hr : f' ∘ rx = ry ∘ f): is_retract f f' ix rx iy ry := make_dirprod hx (make_dirprod hy (make_dirprod hi hr)).
imports: UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Prelude UniMath.CategoryTheory.opp_precat