∀ {α : Type u_2} [inst : AddCommMonoid α] [inst_1 : Preorder α] [toIsOrderedAddMonoid : IsOrderedAddMonoid α],
  (∀ (a b c : α), a + b ≤ a + c → b ≤ c) → (∀ (a b c : α), b + a ≤ c + a → b ≤ c) → IsOrderedCancelAddMonoid α