theorem extracted_formal_statement_8.{v} {ι : Type v} [inst : Nonempty ι] {f : ι → ℝ} {a : ℝ} (hf : ∀ (i : ι), |f i| ≤ a)
  (hbdd : BddAbove (Set.range f)) (h_original_goal : |⨆ i, f i| ≤ a) : ⨆ i, f i ≤ a := sorry

State before:
ι : Type v
inst✝ : Nonempty ι
f : ι → ℝ
a : ℝ
hf : ∀ (i : ι), |f i| ≤ a
hbdd : BddAbove (Set.range f)
⊢ |⨆ i, f i| ≤ a

Tactic: apply abs_le.mpr
    constructor
    ·
  let i : ι := Nonempty.some (by assumption)
  exact le_trans (abs_le.mp (hf i)).1 (le_ciSup hbdd i)

State after:
[case right
 ι : Type v
 inst✝ : Nonempty ι
 f : ι → ℝ
 a : ℝ
 hf : ∀ (i : ι), |f i| ≤ a
 hbdd : BddAbove (Set.range f)
 ⊢ ⨆ i, f i ≤ a]

Relevant lemmas:
error