No abelian corners implies the finite path tests
ProvedOAI.PopaCenter.produced_finite_pathsThroughout, is a unital C*-algebra with a partial order making it star-ordered, is a complex Banach space, and is an isometric conjugate-linear isomorphism, so is a von Neumann algebra with predual (the Lean hypothesis e). A family converges in the predual sense to (PredualTendsto) when for every . Here is a positive linear functional on with that lies in the predual (TraceInPredual: for some ), is tracial, and is faithful ( implies ), and is the norm of τ.toPreGNS x. The hypothesis NoAbelianCorners M says that for every nonzero projection the corner algebra contains two noncommuting elements. If NoAbelianCorners M holds, then satisfies the finite path tests (FinitePathTests τ): given finite types , unitaries , for each a word pattern in in which each row contains a letter that occurs at exactly one position of the whole array , a nontrivial reduced word in the rows, and , there are unitaries with
Formalization Note The statement is verbatim from OpenAI's Lean development, with the listed Definitions imported in place of the upstream modules; the definitions are supporting code for this statement. Only the keyword lemma, where used upstream, becomes theorem, and a leading include ... in or omit ... in moves to the preamble. It is a step of the Lean proof of the vanishing of higher bounded Hochschild cohomology.
import Mathlib
import Definitions.Def_KadisonRingroseSupport2
namespace OAI
noncomputable section
open scoped ComplexOrder
namespace MissingFinitePaths
open BoundedHochschild HochschildDiffuse HochschildRare
universe u
end MissingFinitePaths
open scoped ComplexOrder
namespace PopaPatching
open HochschildRare HochschildPaths
variable {C D M : Type*} [CStarAlgebra M] [PartialOrder M] [StarOrderedRing M]
universe u
variable {M X : Type u} [CStarAlgebra M] [PartialOrder M] [StarOrderedRing M]
[NormedAddCommGroup X] [NormedSpace ℂ X] [CompleteSpace X]
variable (e : StrongDual ℂ X ≃ₗᵢ⋆[ℂ] M) (τ : M →ₚ[ℂ] ℂ)
(hτ : BoundedHochschild.TraceInPredual e τ) (htr : ∀ a b : M, τ (a*b)=τ (b*a))
(hfaith : ∀ a : M, τ (star a*a)=0 → a=0) (h1 : τ 1=1)
(hfactor : ∀ b : M, (∀ x : M, Commute b x) → ∃ c : ℂ, b=c • (1:M))
end PopaPatching
open scoped ComplexOrder
namespace PopaCenter
open PopaPatching HochschildRare HochschildPaths
universe u
variable {M X : Type u} [CStarAlgebra M] [PartialOrder M] [StarOrderedRing M]
[NormedAddCommGroup X] [NormedSpace ℂ X] [CompleteSpace X]
variable (e : StrongDual ℂ X ≃ₗᵢ⋆[ℂ] M) (τ : M →ₚ[ℂ] ℂ)
(hτ : BoundedHochschild.TraceInPredual e τ) (htr : ∀ a b : M, τ (a*b)=τ (b*a))
(hfaith : ∀ a : M, τ (star a*a)=0 → a=0) (h1 : τ 1=1)
include e hτ htr hfaith h1
theorem produced_finite_paths (hII : PopaTypeII.NoAbelianCorners M) :
FinitePathTests τ := by
sorry
end PopaCenter
end
end OAI