-- File: FoML/FoML/ForMathlib/Probability/Moments.lean
Theorem statement:
theorem extracted_formal_statement_16.{u_1} {Ω : Type u_1} {m : MeasurableSpace Ω} {μ : Measure Ω}
  [inst : IsFiniteMeasure μ] {X : Ω → ℝ} {a b : ℝ} (hX : AEMeasurable X μ) (h_1 : ∀ᵐ (ω : Ω) ∂μ, X ω ∈ Set.Icc a b)
  (ω : Ω) (h : X ω ∈ Set.Icc a b) : -X ω ≤ -a := sorry

Tactic state before:
case h
Ω : Type u_1
m : MeasurableSpace Ω
μ : Measure Ω
inst✝ : IsFiniteMeasure μ
X : Ω → ℝ
t a b : ℝ
hX : AEMeasurable X μ
h✝ : ∀ᵐ (ω : Ω) ∂μ, X ω ∈ Set.Icc a b
ht : t < 0
ω : Ω
h : X ω ∈ Set.Icc a b
⊢ -X ω ≤ ?m.21027

Tactic: apply neg_le_neg h.1

Tactic state after:

Premises used:
neg_le_neg : ∀ {α : Type u} [inst : OrderedAddCommGroup α] {a b : α}, a ≤ b → -b ≤ -a