Lemma meet_id {X : hSet} (b : prebilattice X) (x : X) : meet b x x = x . Proof. exact (Lmin_id (tlattice b) x). Defined.
Require Import UniMath.Algebra.BinaryOperations. Require Import UniMath.OrderTheory.Lattice.Lattice. Require Import UniMath.OrderTheory.Lattice.Bounded.