`BookProof.TwoParticleSector.swapTwo_involutive` (t : X ⊗[ℂ] (X ⊗[ℂ] ℂ)) : swapTwo X (swapTwo X t) = t
ProvedBookProof.TwoParticleSector.swapTwo_involutivetheoremstimepiece
Prove the following Lean 4 theorem from ChapterTwoParticleSectorEsa.
BookProof.TwoParticleSector.swapTwo_involutive (t : X ⊗[ℂ] (X ⊗[ℂ] ℂ)) : swapTwo X (swapTwo X t) = t
Formalization note: Lean 4 identifier BookProof.TwoParticleSector.swapTwo_involutive.
Preamble
-- Generated from ChapterTwoParticleSectorEsa.lean — theorem BookProof.TwoParticleSector.swapTwo_involutive
import Definitions.Def_ChapterFarisLavine
import Definitions.Def_ChapterGraphCoreTransfer
import Definitions.Def_ChapterReducingSubspaceEsa
import Definitions.Def_ChapterTensorGraphCore
import Mathlib
import Definitions.Def_ChapterTwoParticleSectorEsa
open BookProof.TwoParticleSector
open scoped TensorProduct
open BookProof.FarisLavine BookProof.GraphCore BookProof.ReducedEsa BookProof.TensorCore
noncomputable section
variable (X : Type) [NormedAddCommGroup X] [InnerProductSpace ℂ X]
variable {X}Formal statement
theorem BookProof.TwoParticleSector.swapTwo_involutive (t : X ⊗[ℂ] (X ⊗[ℂ] ℂ)) : swapTwo X (swapTwo X t) = t := by sorry