apply Nat.succ_le.2
G : Type ?u.46675
inst✝ : AddCommGroup G
f₁ f₂ : AlmostHom ℤ
n✝ : ℕ
ha : Nat.succ n✝ ≠ 0
⊢ Nat.succ n✝ + 1 ≤ 2 * Nat.succ n✝
G : Type ?u.46675
inst✝ : AddCommGroup G
f₁ f₂ : AlmostHom ℤ
n✝ : ℕ
ha : Nat.succ n✝ ≠ 0
⊢ n✝ + 1 < 2 * Nat.succ n✝