-lemma le_inv_plus_plus_r: ∀x,y,z. x + z ≤ y + z → x ≤ y.
-/2 by le_plus_to_le/ qed-.
-
-lemma le_inv_plus_l: ∀x,y,z. x + y ≤ z → x ≤ z - y ∧ y ≤ z.
-/3 width=2/ qed-.
-
-lemma lt_inv_plus_l: ∀x,y,z. x + y < z → x < z ∧ y < z - x.
-/3 width=2/ qed-.
-