proposition: Lemma not_EOlt_le : ∏ x y : X, (¬ (x < y)) <-> (y <= x).
proof: Proof. exact (pr1 (pr2 (pr2 (pr2 (pr2 X))))). Qed.
imports: UniMath.Foundations.Sets UniMath.MoreFoundations.QuotientSet UniMath.MoreFoundations.Tactics UniMath.MoreFoundations.Sets UniMath.MoreFoundations.Orders UniMath.Algebra.BinaryOperations UniMath.Algebra.Apartness UniMath.OrderTheory.Lattice.Lattice