`BookProof.QgOuterFockFL.Comparison.isPositiveSelfAdjointExtension` (C : Comparison F) {D : Submodule ℂ F} (H : D →ₗ[ℂ] F) (hHD : ∀ x : D, ∃ h : (x : F) ∈ C.dom, C.op ⟨(x : F), h⟩
ProvedBookProof.QgOuterFockFL.Comparison.isPositiveSelfAdjointExtensiontheoremstimepiece
Prove the following Lean 4 theorem from ChapterQgOuterFockFarisLavine.
BookProof.QgOuterFockFL.Comparison.isPositiveSelfAdjointExtension (C : Comparison F) {D : Submodule ℂ F} (H : D →ₗ[ℂ] F) (hHD : ∀ x : D, ∃ h : (x : F) ∈ C.dom, C.op ⟨(x : F), h⟩ = H x) : IsPositiveSelfAdjointExtension H C.op
Formalization note: Lean 4 identifier BookProof.QgOuterFockFL.Comparison.isPositiveSelfAdjointExtension.
Preamble
-- Generated from ChapterQgOuterFockFarisLavine.lean — theorem BookProof.QgOuterFockFL.Comparison.isPositiveSelfAdjointExtension
import Definitions.Def_ChapterFarisLavine
import Definitions.Def_ChapterDirectSumEsa
import Definitions.Def_ChapterQgOuterFockEsa
import Definitions.Def_ChapterFriedrichsExtension
import Definitions.Def_ChapterComplexShiftCore
import Definitions.Def_ChapterQgHermiteOscillatorEsa
import Definitions.Def_ChapterHermiteProductCore
import Mathlib
import Definitions.Def_ChapterQgOuterFockFarisLavine
import Definitions.Def_ChapterFarisLavineCore
import Definitions.Def_ChapterNavierStokesCanonicalVector
import Definitions.Def_ChapterStoneConverse
import Definitions.Def_ChapterYangMillsFriedrichs
open BookProof.NavierStokesFlow.CanonicalVector
open BookProof.ChapterStoneMeasurable
open BookProof.ChapterStoneMeasurable.WeakMeasurableUnitaryGroup
open BookProof.YangMillsFriedrichs
open BookProof.QgOuterFockFL
open scoped ENNReal
open BookProof.FarisLavine
open BookProof.DirectSumEsa
open BookProof.QgOuterFock
open BookProof.YangMillsFriedrichs
open BookProof.FriedrichsExtension
open BookProof.FriedrichsExtension.FormDom
open BookProof.HashimotoShiftInvert
open BookProof.QgHermiteOscillator
open BookProof.HermiteProductCore
noncomputable section
variable {F : Type*} [NormedAddCommGroup F] [InnerProductSpace ℂ F]Formal statement
theorem BookProof.QgOuterFockFL.Comparison.isPositiveSelfAdjointExtension (C : Comparison F) {D : Submodule ℂ F}
(H : D →ₗ[ℂ] F) (hHD : ∀ x : D, ∃ h : (x : F) ∈ C.dom, C.op ⟨(x : F), h⟩ = H x) :
IsPositiveSelfAdjointExtension H C.op := by sorry