∀ {f : ℝ → ℝ} {a b : ℝ} {μ : MeasureTheory.Measure ℝ} {c d : ℝ},
  c ≤ a →
    a ≤ b →
      b ≤ d →
        0 ≤ᵐ[μ.restrict (Set.Ioc c d)] f →
          IntervalIntegrable f μ c d → ∫ (x : ℝ) in a..b, f x ∂μ ≤ ∫ (x : ℝ) in c..d, f x ∂μ