`BookProof.YangMillsAbelianEsa.ymAbelian_stone_flow` : ∃ (T : UnboundedSelfAdjoint (L2d 99)) (U : ℝ → (L2d 99 →L[ℂ] L2d 99)), IsSelfAdjointExtension (ymHamiltonian (coreRepPoly 99)
ProvedBookProof.YangMillsAbelianEsa.ymAbelian_stone_flowtheoremstimepiece
Prove the following Lean 4 theorem from ChapterYangMillsAbelianEsa.
BookProof.YangMillsAbelianEsa.ymAbelian_stone_flow : ∃ (T : UnboundedSelfAdjoint (L2d 99)) (U : ℝ → (L2d 99 →L[ℂ] L2d 99)), IsSelfAdjointExtension (ymHamiltonian (coreRepPoly 99) 0) T.op ∧ IsStoneFlow T U
Formalization note: Lean 4 identifier BookProof.YangMillsAbelianEsa.ymAbelian_stone_flow.
Preamble
-- Generated from ChapterYangMillsAbelianEsa.lean — theorem BookProof.YangMillsAbelianEsa.ymAbelian_stone_flow import Definitions.Def_ChapterFarisLavine import Definitions.Def_ChapterNavierStokesDifferentialL2 import Definitions.Def_ChapterHermiteRelativeBound import Definitions.Def_ChapterFullQuadraticEsa import Definitions.Def_ChapterSirkTrotterKato import Definitions.Def_ChapterComplexShiftCore import Definitions.Def_ChapterHermiteGalerkinFriedrichs import Definitions.Def_ChapterYangMillsFriedrichs import Mathlib import Definitions.Def_ChapterYangMillsAbelianEsa import Definitions.Def_ChapterEsaClosureCore import Definitions.Def_ChapterHermiteProductCore import Definitions.Def_ChapterStoneBridge import Definitions.Def_ChapterStoneResolvent import Definitions.Def_ChapterYangMillsHermite open BookProof.EsaClosure open BookProof.HermiteProductCore open BookProof.StoneBridge open BookProof.YangMillsHermite open BookProof.YangMillsAbelianEsa open Finset MvPolynomial open BookProof.HermiteProductCore BookProof.YangMillsHermite open BookProof.FarisLavine open BookProof.NavierStokesFlow.DifferentialL2 open BookProof.HermiteRelative open BookProof.FullQuadratic open BookProof.StoneBridge BookProof.EsaClosure BookProof.ChapterStoneResolvent open BookProof.HashimotoShiftInvert BookProof.HermiteGalerkin BookProof.YangMillsFriedrichs noncomputable section
Formal statement
theorem BookProof.YangMillsAbelianEsa.ymAbelian_stone_flow :
∃ (T : UnboundedSelfAdjoint (L2d 99)) (U : ℝ → (L2d 99 →L[ℂ] L2d 99)),
IsSelfAdjointExtension (ymHamiltonian (coreRepPoly 99) 0) T.op ∧ IsStoneFlow T U := by sorry