`BookProof.FriedrichsCanonical.qgOneParticleSector_friedrichs_canonical` (M alpha : ℝ) (hM : 0 < M) (halpha : 0 < alpha) (V3 : Polynomial ℝ) (c : ℝ) (hV3 : ∀ t : ℝ, -c ≤ V3.eval t)
ProvedBookProof.FriedrichsCanonical.qgOneParticleSector_friedrichs_canonicaltheoremstimepiece
Prove the following Lean 4 theorem from ChapterFriedrichsCanonical.
BookProof.FriedrichsCanonical.qgOneParticleSector_friedrichs_canonical (M alpha : ℝ) (hM : 0 < M) (halpha : 0 < alpha) (V3 : Polynomial ℝ) (c : ℝ) (hV3 : ∀ t : ℝ, -c ≤ V3.eval t) : IsSemiboundedSelfAdjointExtension c (hamCore (scalaronSectorPotential M alpha V3) (continuous_scalaronSectorPotential M alpha V3) (expBounded_scalaronSectorPotential M alpha hM V3)) (qgSectorFriedrichsOp M alpha hM halpha V3 c hV3)
Formalization note: Lean 4 identifier BookProof.FriedrichsCanonical.qgOneParticleSector_friedrichs_canonical.
Preamble
-- Generated from ChapterFriedrichsCanonical.lean — theorem BookProof.FriedrichsCanonical.qgOneParticleSector_friedrichs_canonical
import Definitions.Def_ChapterFarisLavine
import Definitions.Def_ChapterYangMillsFriedrichs
import Definitions.Def_ChapterComplexShiftCore
import Mathlib
import Definitions.Def_ChapterFriedrichsCanonical
import Definitions.Def_ChapterFriedrichsExtension
import Definitions.Def_ChapterHermiteProductCore
import Definitions.Def_ChapterQgHermiteCore
import Definitions.Def_ChapterQgHermiteFriedrichs
open BookProof.FriedrichsExtension
open BookProof.FriedrichsExtension.FormDom
open BookProof.HermiteProductCore
open BookProof.QgHermiteCore
open BookProof.QgHermiteFriedrichs
open BookProof.FriedrichsCanonical
open BookProof.FarisLavine BookProof.YangMillsFriedrichs BookProof.HashimotoShiftInvert
open BookProof.FriedrichsExtension BookProof.FriedrichsExtension.FormDom
noncomputable section
variable {F : Type*} [NormedAddCommGroup F] [InnerProductSpace ℂ F] [CompleteSpace F]
variable {D : Submodule ℂ F}Formal statement
theorem BookProof.FriedrichsCanonical.qgOneParticleSector_friedrichs_canonical (M alpha : ℝ) (hM : 0 < M) (halpha : 0 < alpha)
(V3 : Polynomial ℝ) (c : ℝ) (hV3 : ∀ t : ℝ, -c ≤ V3.eval t) :
IsSemiboundedSelfAdjointExtension c
(hamCore (scalaronSectorPotential M alpha V3)
(continuous_scalaronSectorPotential M alpha V3)
(expBounded_scalaronSectorPotential M alpha hM V3))
(qgSectorFriedrichsOp M alpha hM halpha V3 c hV3) := by sorry