fact: Definition PreSwitchMorIs {SOM : SubsetsOfMors} {x y z : ob C} {s : x --> y} {e : SOM x y s} {f g : y --> z} {H : s · f = s · g} (PreS : PreSwitch SOM s e f g H) : SOM z PreS (PreSwitchMor PreS) := dirprod_pr1 (pr2 PreS).
imports: UniMath.Foundations.PartD UniMath.Foundations.Propositions UniMath.Foundations.Sets UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Core.Functors