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

Initializing...

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