Definition smash_set : X × Y → hProp := λ xy, pr1 xy = ⊥_{RX} ∨ pr2 xy = ⊥_{RY}.
Require Import UniMath.Foundations.All. Require Import UniMath.MoreFoundations.All. Require Import UniMath.OrderTheory.Posets.Basics. Require Import UniMath.OrderTheory.Posets.MonotoneFunctions. Require Import UniMath.OrderTheory.Posets.PointedPosets.