All proofs
Project-declaredLean 4.32.0 ยท mathlib@81a5d257c8e4

Of Cr An Op super Commute normal Order of Cr An List sum

FieldSpecification.WickAlgebra.ofCrAnOp_superCommute_normalOrder_ofCrAnList_sum

Plain-language statement

For a field specification ๐“•, an element ฯ† of ๐“•.CrAnFieldOp, a list ฯ†s of ๐“•.CrAnFieldOp, the following relation holds [ฯ†, ๐“(ฯ†โ‚€โ€ฆฯ†โ‚™)]โ‚› = โˆ‘ i, ๐“ข(ฯ†, ฯ†โ‚€โ€ฆฯ†แตขโ‚‹โ‚) โ€ข [ฯ†, ฯ†แตข]โ‚› * ๐“(ฯ†โ‚€โ€ฆฯ†แตขโ‚‹โ‚ฯ†แตขโ‚Šโ‚โ€ฆฯ†โ‚™). The proof of this result ultimately goes as follows - The definition of normalOrder is used to rewrite ๐“(ฯ†โ‚€โ€ฆฯ†โ‚™) as a scalar multiple of a `ofCrAnList...

Exact Lean statement

lemma ofCrAnOp_superCommute_normalOrder_ofCrAnList_sum (ฯ† : ๐“•.CrAnFieldOp)
    (ฯ†s : List ๐“•.CrAnFieldOp) : [ofCrAnOp ฯ†, ๐“(ofCrAnList ฯ†s)]โ‚› = โˆ‘ n : Fin ฯ†s.length,
    ๐“ข(๐“• |>โ‚› ฯ†, ๐“• |>โ‚› (ฯ†s.take n)) โ€ข [ofCrAnOp ฯ†, ofCrAnOp ฯ†s[n]]โ‚›
    * ๐“(ofCrAnList (ฯ†s.eraseIdx n))

Formal artifact

Lean source

Canonical source
Full Lean sourceLean 4
lemma ofCrAnOp_superCommute_normalOrder_ofCrAnList_sum (ฯ† : ๐“•.CrAnFieldOp)    (ฯ†s : List ๐“•.CrAnFieldOp) : [ofCrAnOp ฯ†, ๐“(ofCrAnList ฯ†s)]โ‚› = โˆ‘ n : Fin ฯ†s.length,    ๐“ข(๐“• |>โ‚› ฯ†, ๐“• |>โ‚› (ฯ†s.take n)) โ€ข [ofCrAnOp ฯ†, ofCrAnOp ฯ†s[n]]โ‚›    * ๐“(ofCrAnList (ฯ†s.eraseIdx n)) := by  rw [normalOrder_ofCrAnList, map_smul]  erw [superCommute_ofCrAnOp_ofCrAnList_eq_sum, Finset.smul_sum,    sum_normalOrderList_length]  congr  funext n  simp only [List.get_eq_getElem, normalOrderList_get_normalOrderEquiv,    normalOrderList_eraseIdx_normalOrderEquiv, Algebra.smul_mul_assoc, Fin.getElem_fin]  erw [ofCrAnList_eq_normalOrder, mul_smul_comm, smul_smul, smul_smul]  by_cases hs : (๐“• |>โ‚› ฯ†) = (๐“• |>โ‚› ฯ†s[n])  ยท congr    erw [normalOrderSign_eraseIdx, โ† hs]    trans (normalOrderSign ฯ†s * normalOrderSign ฯ†s) *      (๐“ข(๐“• |>โ‚› (ฯ†s.get n), ๐“• |>โ‚› ((normalOrderList ฯ†s).take (normalOrderEquiv n))) *      ๐“ข(๐“• |>โ‚› (ฯ†s.get n), ๐“• |>โ‚› ((normalOrderList ฯ†s).take (normalOrderEquiv n))))      * ๐“ข(๐“• |>โ‚› (ฯ†s.get n), ๐“• |>โ‚› (ฯ†s.take n))    ยท ring_nf      rw [hs]      rfl    ยท simp [hs]  ยท erw [superCommute_diff_statistic hs]    simp only [zero_mul, smul_zero]
Project
Physlib
License
Apache-2.0
Commit
dd43e9e65791
Source
Physlib/QFT/PerturbationTheory/WickAlgebra/NormalOrder/Lemmas.lean:244-268

Reuse this declaration

Bring the exact result into your workflow

The import identifies the source module. Your project still needs the pinned package dependency shown on this page.

What this badge means

This completion status comes from the project or community source. It has not yet been represented here as an independent rebuild and axiom audit.

Continue in this project

Related declarations

Project-declaredLean 4.32.0

Adiabatic relation log

adiabatic_relation_log

Plain-language statement

Adiabatic relation in logarithmic form: If S(Ua,Va,N) = S(Ub,Vb,N) with N fixed, then c * log (Ua/Ub) + log (Va/Vb) = 0.

physicsquantum field theoryrelativity

Source project: Physlib

Person-level attribution pending.

View proof record
Project-declaredLean 4.32.0

Adiabatic relation Ua Ub Va Vb

adiabatic_relation_UaUbVaVb

Plain-language statement

Adiabatic relation in product form: If S(Ua,Va,N) = S(Ub,Vb,N) with N fixed, then (Ua/Ub)^c * (Va/Vb) = 1.

physicsquantum field theoryrelativity

Source project: Physlib

Person-level attribution pending.

View proof record