Lemma iscomp_meet_rel_same_SE2NW {X : hSet} (b : interlaced_prebilattice X) : iscomprelrelfun2 (eqrel_same_SE2NW b) (eqrel_same_SE2NW b) (meet b). Proof. intros ? ? ? ? H1 H2. use (!iscomp_consensus_rel_same_SE2NW (make_interlaced_prebilattice (dual_prebilattice_is_interlaced b)) _ _ _ _ (!H1) (!H2)). Defined.
Require Import UniMath.OrderTheory.Prebilattice.Prebilattice. Require Import UniMath.OrderTheory.Prebilattice.Interlaced. Require Import UniMath.OrderTheory.Prebilattice.PrebilatticeDisplayedCat. Require Import UniMath.MoreFoundations.Equivalences. Require Import UniMath.Foundations.Sets. Require Import UniMath.Algebra.BinaryOperations. Require Import UniMath.OrderTheory.Lattice.Lattice. Require Import UniMath.OrderTheory.Lattice.Bounded. Require Import UniMath.CategoryTheory.Core.Prelude.