`BookProof.BookBrstYangMills.bookCCR` (μ ν : Fin 4) (a b : Fin N) : Afield μ a * mom ν b - mom ν b * Afield μ a = if (μ, a) = (ν, b) then (Complex.I • 1 : Module.End ℂ (BookState N
ProvedBookProof.BookBrstYangMills.bookCCRtheoremstimepiece
Prove the following Lean 4 theorem from ChapterBookBrstYangMills.
BookProof.BookBrstYangMills.bookCCR (μ ν : Fin 4) (a b : Fin N) : Afield μ a * mom ν b - mom ν b * Afield μ a = if (μ, a) = (ν, b) then (Complex.I • 1 : Module.End ℂ (BookState N)) else 0
Formalization note: Lean 4 identifier BookProof.BookBrstYangMills.bookCCR.
Preamble
-- Generated from ChapterBookBrstYangMills.lean — theorem BookProof.BookBrstYangMills.bookCCR
import Definitions.Def_ChapterBRSTNilpotent
import Definitions.Def_ChapterQuantumGravityBrstCharge
import Mathlib
import Definitions.Def_ChapterBookBrstYangMills
import Definitions.Def_ChapterNavierStokesCanonicalVector
import Definitions.Def_ChapterNavierStokesDifferentialL2
import Definitions.Def_ChapterYangMillsGhostSector
open BookProof.NavierStokesFlow.CanonicalVector
open BookProof.NavierStokesFlow.DifferentialL2
open BookProof.YangMillsGhost
open BookProof.BookBrstYangMills
open MvPolynomial BookProof.BRSTNilpotent BookProof.QuantumGravityBrstCharge
noncomputable section
variable {N : ℕ} (G : GaugeAlgebra N)Formal statement
theorem BookProof.BookBrstYangMills.bookCCR (μ ν : Fin 4) (a b : Fin N) :
Afield μ a * mom ν b - mom ν b * Afield μ a
= if (μ, a) = (ν, b) then (Complex.I • 1 : Module.End ℂ (BookState N)) else 0 := by sorry