MathlibAnnex/Analysis/CStarAlgebra/FacialStructure/ExtremeDecomposition.lean
Exact source · gss-v0.5.0
Fixed commit original · Raw UTF-8 source · Back to GSS Companion
Select a source link from a manuscript to highlight its exact range.
Technical identity
- Commit
ac405356bb98afed954da9b9c795d23cc8d5d149- SHA-256
77d9584147f3fcc8b44fa83e5daa8c21b7f2042e8c1c7ddbacabcf783f9e6c0f- Bytes
- 6480
1/-2Copyright (c) 2026 Ryotaro Tanaka. All rights reserved.3Released under Apache 2.0 license as described in the file LICENSE.4Authors: Ryotaro Tanaka5-/6import MathlibAnnex.Analysis.CStarAlgebra.FacialStructure.FunctionalRealization7import MathlibAnnex.Analysis.CStarAlgebra.FacialStructure.ExtremeCoefficient8import MathlibAnnex.Analysis.CStarAlgebra.FacialStructure.PositiveTranslateUniqueness910/-!11# Pure-state and unitary decomposition of arbitrary extreme dual functionals1213Start with an arbitrary extreme point of the dual unit ball of a nontrivial,14possibly nonunital C-star algebra. The actual Hahn--Banach/auxiliary-GNS model15is compressed to the original-algebra closed orbit. Its two unit vectors,16coefficient recovery and original-algebra cyclicity are proved in17`FunctionalRealization`; the existing extreme-coefficient criterion then18makes this actual representation irreducible. Unitary transitivity gives a19pure positive translate. The positive state is unique, not its translating20unitary. No extremality of the Hahn--Banach extension is used.2122This closes the existence and state-uniqueness assertions of Notes 11.9.23It does not assert maximality of the support slice or a singleton of all24supporting functionals; those require the later slice-separation theorem.25-/2627set_option autoImplicit false28noncomputable section29open Set Metric30open scoped CStarAlgebra ComplexOrder3132namespace MathlibAnnex.Analysis.CStarAlgebra3334universe u35variable {A : Type u} [NonUnitalCStarAlgebra A] [Nontrivial A]3637/-- The explicitly constructed original-algebra cyclic representation of an38arbitrary extreme dual functional is nonzero and irreducible. -/39theorem NonUnitalFunctional.isIrreducible_cyclicRepresentation40(rho : StrongDual ℂ A) (hrho : rho ≠ 0)41(hext : rho ∈ (closedBall (0 : StrongDual ℂ A) 1).extremePoints ℝ) :42(NonUnitalFunctional.cyclicRepresentation rho hrho).IsIrreducible := by43have hn := norm_eq_one_of_mem_extremePoints_dual_closedBall hext44have hx := NonUnitalFunctional.norm_cyclicSourceVector rho hrho45have hy := NonUnitalFunctional.norm_cyclicTargetVector rho hrho46have hcoeff := NonUnitalFunctional.matrixCoefficient_cyclicRepresentation_of_norm_eq_one47rho hrho hn48apply NonUnitalCStarRepresentation.isIrreducible_of_extreme_matrixCoefficient_of_denseRange49(NonUnitalFunctional.cyclicRepresentation rho hrho)50(NonUnitalFunctional.cyclicSourceVector rho hrho)51(NonUnitalFunctional.cyclicTargetVector rho hrho) hx hy52· rwa [hcoeff]53· rwa [hcoeff]54· exact NonUnitalFunctional.denseRange_cyclicRepresentation rho hrho5556variable [PartialOrder A] [StarOrderedRing A]5758/-- Every extreme dual unit functional is a unitary translate of a genuine59pure nonunital state. Existence is proved from the arbitrary extreme point,60not from a pre-existing positive translate or irreducible realization. -/61theorem exists_pureState_unitaryTranslate_of_mem_extremePoints_dual_closedBall62{rho : StrongDual ℂ A}63(hrho : rho ∈ (closedBall (0 : StrongDual ℂ A) 1).extremePoints ℝ) :64∃ phi : StrongDual ℂ A, IsPureNonUnitalState A phi ∧65∃ u : unitary (Unitization ℂ A),66unitaryTranslate u rho = phi ∧ rho = unitaryTranslate (star u) phi := by67have hn := norm_eq_one_of_mem_extremePoints_dual_closedBall hrho68have hne : rho ≠ 0 := norm_ne_zero_iff.mp (by rw [hn]; exact one_ne_zero)69have hpi := NonUnitalFunctional.isIrreducible_cyclicRepresentation rho hne hrho70have hx := NonUnitalFunctional.norm_cyclicSourceVector rho hne71have hy := NonUnitalFunctional.norm_cyclicTargetVector rho hne72have hcoeff := NonUnitalFunctional.matrixCoefficient_cyclicRepresentation_of_norm_eq_one73rho hne hn74obtain ⟨u, hu, hpure, hrecover⟩ :=75NonUnitalCStarRepresentation.exists_unitaryTranslate_eq_pureState_of_isIrreducible76(NonUnitalFunctional.cyclicRepresentation rho hne) hpi77(NonUnitalFunctional.cyclicSourceVector rho hne)78(NonUnitalFunctional.cyclicTargetVector rho hne) hx hy79refine ⟨_, hpure, u, ?_, ?_⟩80· simpa only [hcoeff] using hu81· simpa only [hcoeff] using hrecover8283/-- The positive pure state in the unitary decomposition is unique.84The unitary is existentially quantified inside the unique-state property. -/85theorem existsUnique_pureState_unitaryTranslate86{rho : StrongDual ℂ A}87(hrho : rho ∈ (closedBall (0 : StrongDual ℂ A) 1).extremePoints ℝ) :88∃! phi : StrongDual ℂ A, IsPureNonUnitalState A phi ∧89∃ u : unitary (Unitization ℂ A),90unitaryTranslate u rho = phi ∧ rho = unitaryTranslate (star u) phi := by91obtain ⟨phi, hphi, u, hu, hrecover⟩ :=92exists_pureState_unitaryTranslate_of_mem_extremePoints_dual_closedBall hrho93refine ⟨phi, ⟨hphi, u, hu, hrecover⟩, ?_⟩94rintro psi ⟨hpsi, v, hv, _⟩95have hu0 : ∀ a : A, 0 ≤ a → 0 ≤ unitaryTranslate u rho a := by96intro a ha97rw [hu]98exact hphi.1.1 a ha99have hv0 : ∀ a : A, 0 ≤ a → 0 ≤ unitaryTranslate v rho a := by100intro a ha101rw [hv]102exact hpsi.1.1 a ha103calc104psi = unitaryTranslate v rho := hv.symm105_ = unitaryTranslate u rho :=106unitaryTranslate_eq_of_nonneg_of_mem_extremePoints_dual_closedBall hrho v u hv0 hu0107_ = phi := hu108109/-- Every extreme dual unit functional attains the value one at a norm-one110member of the original algebra, not merely of its unitization. -/111theorem exists_norm_eq_one_apply_eq_one_of_mem_extremePoints_dual_closedBall112{rho : StrongDual ℂ A}113(hrho : rho ∈ (closedBall (0 : StrongDual ℂ A) 1).extremePoints ℝ) :114∃ a : A, ‖a‖ = 1 ∧ rho a = 1 := by115obtain ⟨phi, hphi, u, hu, _⟩ :=116exists_pureState_unitaryTranslate_of_mem_extremePoints_dual_closedBall hrho117apply exists_norm_eq_one_apply_eq_one_of_nonneg_unitaryTranslate u hrho118intro a ha119rw [hu]120exact hphi.1.1 a ha121122/-- The shared value-one slice of an arbitrary extreme dual functional is123nonempty. No maximality or support-uniqueness claim is part of this theorem. -/124theorem nonempty_unitBallSupportFace_of_mem_extremePoints_dual_closedBall125{rho : StrongDual ℂ A}126(hrho : rho ∈ (closedBall (0 : StrongDual ℂ A) 1).extremePoints ℝ) :127(NormedSpace.unitBallSupportFace ℂ rho).Nonempty := by128obtain ⟨a, ha, hval⟩ := exists_norm_eq_one_apply_eq_one_of_mem_extremePoints_dual_closedBall hrho129exact ⟨a, mem_closedBall_zero_iff.mpr ha.le, hval⟩130131end MathlibAnnex.Analysis.CStarAlgebra