fact: Definition set_rel_weq {X Y : UU} (R₁ R₂ : X → Y → hSet) : (R₁ = R₂) ≃ ∏ (x : X) (y : Y), R₁ x y ≃ R₂ x y := (weqonsecfibers _ _ (λ x, weqonsecfibers _ _ (λ y, UA_for_HLevels 2 _ _) ∘ invweq (weqfunextsec (λ _, hSet) (R₁ x) (R₂ x))) ∘ invweq (weqfunextsec (λ _, Y → hSet) R₁ R₂))%weq.
imports: UniMath.Foundations.All UniMath.MoreFoundations.All UniMath.CategoryTheory.Core.Categories UniMath.CategoryTheory.Core.Functors UniMath.CategoryTheory.Core.Isos UniMath.CategoryTheory.Categories.HSET.Core UniMath.CategoryTheory.TwoSidedDisplayedCats.TwoSidedDispCat UniMath.CategoryTheory.TwoSidedDisplayedCats.Isos UniMath.CategoryTheory.TwoSidedDisplayedCats.Univalence UniMath.CategoryTheory.TwoSidedDisplayedCats.Discrete UniMath.CategoryTheory.TwoSidedDisplayedCats.TwoSidedFibration