Lemma op_le_r' : ∏ k x y : X, Lle lat (x + k) (y + k) → Lle lat x y. Proof. intros k x y H. eapply rcancel. { apply is0. } now rewrite is2, H. Qed.
Require Import UniMath.MoreFoundations.All. Require Import UniMath.Algebra.Monoids. Require Import UniMath.Algebra.Groups.