Lemma istrans_EOlt_le: ∏ x y z : X, x < y -> y <= z -> x < z. Proof. exact (pr1 (pr2 (pr2 (pr2 (pr2 (pr2 X)))))). Qed.
Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.MoreFoundations.Orders. Require Import UniMath.Algebra.BinaryOperations