fact: Definition iscomprelfun2' {X Y Z} (RX:hrel X) (RY:hrel Y) (f:X->Y->Z) : Type := (∏ x x', RX x x' -> ∏ y, f x y = f x' y) × (∏ y y', RY y y' -> ∏ x, f x y = f x y').
imports: UniMath.Foundations.Sets UniMath.MoreFoundations.PartA