`BookProof.QuantumGravityBrstCharge.linGen_contract_left` (A B : Matrix (Fin d) (Fin d) ℝ) : (∑ j, ∑ k, ∑ l, ∑ m, (A j k * B l m) • (if k = l then elemGen j m else 0)) = linGen (A

Proved

BookProof.QuantumGravityBrstCharge.linGen_contract_left

by leonardopedro · Oct 10, 2026 · Mathlib 0df444a (Lean v4.33.1)

theoremstimepiece

Prove the following Lean 4 theorem from ChapterQuantumGravityBrstCharge.

BookProof.QuantumGravityBrstCharge.linGen_contract_left (A B : Matrix (Fin d) (Fin d) ℝ) : (∑ j, ∑ k, ∑ l, ∑ m, (A j k * B l m) • (if k = l then elemGen j m else 0)) = linGen (A * B)

Formalization note: Lean 4 identifier BookProof.QuantumGravityBrstCharge.linGen_contract_left.

Preamble

-- Generated from ChapterQuantumGravityBrstCharge.lean — theorem BookProof.QuantumGravityBrstCharge.linGen_contract_left
import Definitions.Def_ChapterBRSTNilpotent
import Definitions.Def_ChapterYangMillsHermite
import Definitions.Def_ChapterQuantumGravity3DGauge
import Mathlib
import Definitions.Def_ChapterQuantumGravityBrstCharge
open BookProof.QuantumGravityBrstCharge



open MvPolynomial BookProof.BRSTNilpotent BookProof.YangMillsHermite
open BookProof.QuantumGravity3DGauge

noncomputable section

variable {R : Type*} [Ring R] [Algebra ℝ R] {n : ℕ}
variable {f : Fin n → Fin n → Fin n → ℝ} {G χ β : Fin n → R}
variable {d : ℕ}
variable {α : Type*}

Formal statement

theorem BookProof.QuantumGravityBrstCharge.linGen_contract_left (A B : Matrix (Fin d) (Fin d) ℝ) :
    (∑ j, ∑ k, ∑ l, ∑ m, (A j k * B l m) • (if k = l then elemGen j m else 0))
      = linGen (A * B) := by sorry

View graph