simp only [Bounded, _root_.Bounded]
G : Type ?u.46675
inst✝ : AddCommGroup G
f₁ f₂ : AlmostHom ℤ
succ_le_two_mul : ∀ (a : ℕ), a ≠ 0 → a + 1 ≤ 2 * a
⊢ Bounded (-AlmostHom.comp f₁ f₂ + AlmostHom.comp f₂ f₁)
G : Type ?u.46675
inst✝ : AddCommGroup G
f₁ f₂ : AlmostHom ℤ
succ_le_two_mul : ∀ (a : ℕ), a ≠ 0 → a + 1 ≤ 2 * a
⊢ ∃ bound, ∀ (g : ℤ), |toFun (-AlmostHom.comp f₁ f₂ + AlmostHom.comp f₂ f₁) g| ≤ bound