`BookProof.BrstUnboundedLeakage.leakage_le` {B Om : H →L[ℂ] H} (hcomm : ∀ (s : ℝ) (y : H), Om (T.stoneU s y) = T.stoneU s (Om y)) (t : ℝ) (ht : 0 ≤ t) (x : H) (hdom : ∀ s : ℝ, flow
ProvedBookProof.BrstUnboundedLeakage.leakage_letheoremstimepiece
Prove the following Lean 4 theorem from ChapterBrstUnboundedLeakage.
BookProof.BrstUnboundedLeakage.leakage_le {B Om : H →L[ℂ] H} (hcomm : ∀ (s : ℝ) (y : H), Om (T.stoneU s y) = T.stoneU s (Om y)) (t : ℝ) (ht : 0 ≤ t) (x : H) (hdom : ∀ s : ℝ, flow B s x ∈ T.domain) (K : ℝ) (hK : ∀ s ∈ Set.Icc (0 : ℝ) t, ‖T.op ⟨flow B s x, hdom s⟩ - B (flow B s x)‖ ≤ K) : ‖Om (flow B t x)‖ ≤ ‖Om x‖ + ‖Om‖ * (K * t)
Formalization note: Lean 4 identifier BookProof.BrstUnboundedLeakage.leakage_le.
Preamble
-- Generated from ChapterBrstUnboundedLeakage.lean — theorem BookProof.BrstUnboundedLeakage.leakage_le
import Definitions.Def_ChapterSirkTrotterKato
import Mathlib
import Definitions.Def_ChapterBrstUnboundedLeakage
import Definitions.Def_ChapterBrstTruncationLeakage
import Definitions.Def_ChapterStoneResolvent
import Definitions.Def_ChapterStoneUnitary
open BookProof.BrstLeakage
open BookProof.BrstUnboundedLeakage
open NormedSpace Filter Topology
open scoped InnerProductSpace
open BookProof.BrstLeakage BookProof.ChapterStoneResolvent
variable {H : Type*} [NormedAddCommGroup H] [InnerProductSpace ℂ H] [CompleteSpace H]
variable (T : UnboundedSelfAdjoint H)Formal statement
theorem BookProof.BrstUnboundedLeakage.leakage_le {B Om : H →L[ℂ] H}
(hcomm : ∀ (s : ℝ) (y : H), Om (T.stoneU s y) = T.stoneU s (Om y))
(t : ℝ) (ht : 0 ≤ t) (x : H) (hdom : ∀ s : ℝ, flow B s x ∈ T.domain) (K : ℝ)
(hK : ∀ s ∈ Set.Icc (0 : ℝ) t, ‖T.op ⟨flow B s x, hdom s⟩ - B (flow B s x)‖ ≤ K) :
‖Om (flow B t x)‖ ≤ ‖Om x‖ + ‖Om‖ * (K * t) := by sorry