fact: Definition retraction (A B : C) : UU := ∑ (s : A --> B) (r : B --> A), is_retraction s r.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors