Documentation

CsdLean4.LF2.EffectGleason

LF2/EffectGleason: the Busch effect-Gleason theorem, PROVED (discharges the former axiom) #

Category: 3-Local (LF2 operational stratum — the effect-Gleason representation theorem).

Glossary: https://glossary.constraintsurfacedynamics.com/gleason-theorem/ Plain-language, CSD-role and formal statements of the Gleason and Busch theorems, with this module as its Lean anchor. Kept symmetric by scripts/check-glossary.sh.

Earlier revisions of LF2/BornWrapper.lean imported the Busch effect-Gleason theorem as the axiom busch_effect_gleason: every effect-additive, bounded, normalised probability assignment OP.p on effects is OP.p E = Tr(ρ E) for a unique density operator ρ. This module discharges that axiom — it is proved here as OperationalPackage.effect_gleason_representation (2026-07-21), so the corpus imports zero axioms beyond the foundational triple (CONVENTIONS.md §8.1, AXIOMS.md §2.2, specs/BACKLOG.md). The axiom was deleted from BornWrapper.lean and its two named consumers (born_form_of_package, pure_state_born_weights_of_certainty) relocated here (signatures unchanged), since they now depend on the proof, which imports BornWrapper. Busch's proof (Busch 2003, "A Simple Proof of Gleason's Theorem") is short in finite dimensions because additivity over the effect algebra gives linearity directly, bypassing the frame-function analysis of projective Gleason.

Proof arc (bottom-up) #

  1. This module — the foundational layer (p is a monotone, additive functional).
  2. This module — homogeneity p(t • E) = t · p E for t ∈ [0,1] (p_smul_homog, smulVal_homog): the monotone + additive (Cauchy) equation f(a+b) = f(a)+f(b) on [0,1] forces f(t) = t f(1) — via integer scaling (smulVal_natMul), rational homogeneity (smulVal_rat), and the density squeeze (exists_rat_btwn + monotonicity).
  3. Reconstruction — spectral reduction, polarisation, and the ρ-build (delivered). The spectral reduction is done: p_finsetSum (finite additivity), Effect.eigenvalues_le_one (effect eigenvalues ∈ [0,1]), Effect.sum_eigenEffect_M (E = ∑ᵢ λᵢ |eᵢ⟩⟨eᵢ|), and p_eq_eigen_sum (p(E) = ∑ᵢ λᵢ · p(|eᵢ⟩⟨eᵢ|)) reduce the whole representation problem to determining p on rank-one projectors. The polarisation identities are done: outerProduct_parallelogram (|u+v⟩⟨u+v| + |u−v⟩⟨u−v| = 2|u⟩⟨u| + 2|v⟩⟨v|, cross terms cancel) and outerProduct_polarization_real — the algebraic core that lets p, being additive, inherit the parallelogram law. The sub-unit rank-one effect outerEffect v (|v⟩⟨v| for any ‖v‖ ≤ 1, needed for the combinations u ± v, u ± iv), the degree-2 homogeneity p_outerEffect_smul (p(|c·v⟩⟨c·v|) = c²·p(|v⟩⟨v|)), and the Cauchy–Schwarz sum bound one_sub_two_outerProduct_posSemidef (I − |a⟩⟨a| − |b⟩⟨b| PSD for ‖a‖²+‖b‖²≤1, via CS not an eigenvalue bound), and the p-level parallelogram law p_parallelogram (p(|u+v⟩⟨u+v|) + p(|u−v⟩⟨u−v|) = 2p(|u⟩⟨u|) + 2p(|v⟩⟨v|) for ‖u‖²+‖v‖²≤½, from the matrix identity + additivity + the √2-doubling p_outerEffect_sqrt2) are done. The ρ-build (step 3b-final) is now done as well: qform (the degree-2 homogeneous extension of v ↦ p(|v⟩⟨v|) off the unit ball) satisfies the unrestricted parallelogram law (qform_parallelogram); the Jordan–von Neumann argument makes its polarisation qpolar bi-additive (qpolar_add_left) and — via additive_bounded_linear, which replaces the classical continuity step by the bound 0 ≤ q ≤ ‖·‖²-bihomogeneous (qpolar_smul_real); the complex polarisation qsesq is then sesquilinear (qsesq_add_right, qsesq_smul_right, qsesq_conj_symm) with qsesq_self : S(v,v) = q v, and its matrix on the standard basis qmatrix is Hermitian (qmatrix_isHermitian) with p_outerEffect_eq_trace : p(|v⟩⟨v|) = Tr(R · |v⟩⟨v|) and — through the spectral reduction — p_eq_trace : p E = Tr(R · E) for every effect.
  4. Positivity / normalisation + uniqueness (step 4 — done). p ≥ 0 ⟹ R PSD (qmatrix_posSemidef); p I = 1 ⟹ Tr R = 1 (qmatrix_trace_one); uniqueness because a complex matrix is determined by its quadratic form (matrix_eq_zero_of_quadForm_zero, a polarisation) via qdensity_unique. This packages R = qmatrix as the DensityOperator qdensity and yields effect_gleason_representation (∃!), the statement the axiom asserted.

Honest scope #

Delivered here — the complete theorem. Steps 1–2 (monotone/additive layer + homogeneity p(t•E) = t·p E), the spectral reduction (p(E) = ∑ᵢ λᵢ · p(|eᵢ⟩⟨eᵢ|)), the polarisation identities (step 3b), the ρ-build (step 3b-final: p E = Tr(R · E), p_eq_trace), and step 4 (PSD / unit-trace / uniqueness), assembled into OperationalPackage.effect_gleason_representation. All foundational-triple (propext, Classical.choice, Quot.sound), no sorry, no placeholder — verified by AxiomAudit. The busch_effect_gleason axiom has been removed from BornWrapper.lean; this module is the proof.

References: LF2/BornWrapper.lean (Effect, DensityOperator, OperationalPackage, traceForm, rankOneDensity_unique_of_certainty, born_quadratic); Busch 2003 (quant-ph/9909073); Jordan–von Neumann 1935 (the parallelogram characterisation polarised in §J–§K); AXIOMS.md §2.2; CONVENTIONS.md §8.1; specs/BACKLOG.md; specs/future-work.md.

theorem CSD.LF2.Effect.ext_M {N : } {E F : Effect N} (h : E.M = F.M) :
E = F

Effect extensionality on the matrix field. Two effects are equal iff their underlying matrices are equal (the Hermitian/PosSemidef/le_one fields are Prop, proof-irrelevant).

noncomputable def CSD.LF2.Effect.smul {N : } (t : ) (ht0 : 0 t) (ht1 : t 1) (E : Effect N) :

Scalar action on an effect. For t ∈ [0,1], t • E is again an effect: t • M is Hermitian and PSD (t ≥ 0), and 1 - t • M = (1 - M) + (1 - t) • M is PSD (t ≤ 1).

Equations
Instances For
    @[simp]
    theorem CSD.LF2.Effect.smul_M {N : } (t : ) (ht0 : 0 t) (ht1 : t 1) (E : Effect N) :
    (smul t ht0 ht1 E).M = t E.M
    noncomputable def CSD.LF2.Effect.finsetSum {N : } {ι : Type u_1} (s : Finset ι) (E : ιEffect N) (h : (1 - is, (E i).M).PosSemidef) :

    A finite sum of effects whose total is ≤ I is an effect. Hermiticity and PSD of the sum are automatic; le_one is the hypothesis (as in Effect.add).

    Equations
    Instances For
      @[simp]
      theorem CSD.LF2.Effect.finsetSum_M {N : } {ι : Type u_1} (s : Finset ι) (E : ιEffect N) (h : (1 - is, (E i).M).PosSemidef) :
      (finsetSum s E h).M = is, (E i).M

      p 0 = 0. From additivity p 0 = p(0 ⊕ 0) = 2 · p 0.

      theorem CSD.LF2.OperationalPackage.p_mono {N : } (OP : OperationalPackage N) {E F : Effect N} (h : (F.M - E.M).PosSemidef) :
      OP.p E OP.p F

      Monotonicity. If E.M ≤ F.M in the Löwner order (F.M - E.M PSD), then p E ≤ p F. Write F = E ⊕ (F − E), an effect sum, and use p(F−E) ≥ 0.

      theorem CSD.LF2.OperationalPackage.p_smul_add {N : } (OP : OperationalPackage N) {E : Effect N} {a b : } (ha : 0 a) (hb : 0 b) (hab : a + b 1) :
      OP.p (Effect.smul (a + b) hab E) = OP.p (Effect.smul a ha E) + OP.p (Effect.smul b hb E)

      Scalar additivity of t ↦ p(t • E) on [0,1]. For a, b ≥ 0 with a + b ≤ 1, p((a+b) • E) = p(a • E) + p(b • E) — the Cauchy relation whose monotone solution is p(t • E) = t · p E (the deferred homogeneity step).

      theorem CSD.LF2.OperationalPackage.p_smul_mono {N : } (OP : OperationalPackage N) {E : Effect N} {s t : } (hs0 : 0 s) (hst : s t) (ht1 : t 1) :
      OP.p (Effect.smul s hs0 E) OP.p (Effect.smul t ht1 E)

      t ↦ p(t • E) is monotone on [0,1]. Immediate from p_mono: s ≤ t gives (t − s) • E.M PSD, so s • E.M ≤ t • E.M.

      C — homogeneity p(t • E) = t · p E on [0,1] (Route B step 2) #

      The monotone + additive (Cauchy) functional equation f(a+b) = f(a)+f(b) on [0,1] forces f(t) = t·f(1). We package f(t) = p(t•E) as a total function smulVal (0 outside [0,1]) to avoid carrying the 0 ≤ t ≤ 1 proofs, prove homogeneity on the naturals-ratio m/n (from additivity), and squeeze to all reals by density of the rationals + monotonicity.

      noncomputable def CSD.LF2.OperationalPackage.smulVal {N : } (OP : OperationalPackage N) (E : Effect N) (t : ) :

      p(t • E) as a total function of t (0 outside [0,1]), for the Cauchy/monotone analysis.

      Equations
      Instances For
        theorem CSD.LF2.OperationalPackage.smulVal_of {N : } (OP : OperationalPackage N) {E : Effect N} {t : } (ht0 : 0 t) (ht1 : t 1) :
        OP.smulVal E t = OP.p (Effect.smul t ht0 ht1 E)
        theorem CSD.LF2.OperationalPackage.smulVal_add {N : } (OP : OperationalPackage N) {E : Effect N} {a b : } (ha : 0 a) (hb : 0 b) (hab : a + b 1) :
        OP.smulVal E (a + b) = OP.smulVal E a + OP.smulVal E b
        theorem CSD.LF2.OperationalPackage.smulVal_mono {N : } (OP : OperationalPackage N) {E : Effect N} {s t : } (hs0 : 0 s) (hst : s t) (ht1 : t 1) :
        OP.smulVal E s OP.smulVal E t
        theorem CSD.LF2.OperationalPackage.smulVal_natMul {N : } (OP : OperationalPackage N) {E : Effect N} {s : } (hs0 : 0 s) (n : ) (hn : n * s 1) :
        OP.smulVal E (n * s) = n * OP.smulVal E s

        Integer scaling. p((n·s) • E) = n · p(s • E) for s ≥ 0 and n·s ≤ 1 (induction on n via additivity).

        theorem CSD.LF2.OperationalPackage.smulVal_recip {N : } (OP : OperationalPackage N) {E : Effect N} (n : ) (hn : 1 n) :
        OP.smulVal E (1 / n) = 1 / n * OP.smulVal E 1

        Reciprocal. p((1/n) • E) = (1/n) · p(E) for n ≥ 1.

        theorem CSD.LF2.OperationalPackage.smulVal_rat {N : } (OP : OperationalPackage N) {E : Effect N} (q : ) (hq0 : 0 q) (hq1 : q 1) :
        OP.smulVal E q = q * OP.smulVal E 1

        Rational homogeneity. p((q) • E) = q · p(E) for q ∈ [0,1] ∩ ℚ.

        theorem CSD.LF2.OperationalPackage.smulVal_homog {N : } (OP : OperationalPackage N) {E : Effect N} {t : } (ht0 : 0 t) (ht1 : t 1) :
        OP.smulVal E t = t * OP.smulVal E 1

        Homogeneity (the Cauchy/monotone squeeze). p(t • E) = t · p(E) for all t ∈ [0,1]. The rational homogeneity + monotonicity pin smulVal E t between q·c values for rationals q arbitrarily close to t (density), forcing smulVal E t = t·c with c = p(E).

        theorem CSD.LF2.OperationalPackage.p_smul_homog {N : } (OP : OperationalPackage N) {E : Effect N} {t : } (ht0 : 0 t) (ht1 : t 1) :
        OP.p (Effect.smul t ht0 ht1 E) = t * OP.p E

        Homogeneity, effect form. p(t • E) = t · p(E) for t ∈ [0,1].

        D — finite additivity (Route B step 3, building block) #

        theorem CSD.LF2.OperationalPackage.p_finsetSum {N : } (OP : OperationalPackage N) {ι : Type u_1} [DecidableEq ι] (E : ιEffect N) (s : Finset ι) (h : (1 - is, (E i).M).PosSemidef) :
        OP.p (Effect.finsetSum s E h) = is, OP.p (E i)

        Finite additivity. For a family of effects whose total is ≤ I, p(∑ᵢ Eᵢ) = ∑ᵢ p(Eᵢ). Induction on the index set via the pairwise additivity; each partial sum stays ≤ I because the omitted effects are PSD. The prerequisite for reducing p on an arbitrary effect to p on the rank-one projectors of its spectral decomposition.

        E — spectral reduction (Route B step 3): p(E) = ∑ᵢ λᵢ · p(|eᵢ⟩⟨eᵢ|) #

        theorem CSD.LF2.Effect.eigenvalues_le_one {N : } (E : Effect N) (i : Fin N) :

        Effect eigenvalues are ≤ 1. For an effect E (so 1 - E.M is PSD), each eigenvalue of E.M is ≤ 1: on the eigenvector eᵢ, ⟨eᵢ, (1-E.M) eᵢ⟩ = 1 - λᵢ ≥ 0.

        noncomputable def CSD.LF2.Effect.eigenEffect {N : } (E : Effect N) (i : Fin N) :

        The eigenvalue-scaled rank-one projectors of an effect are effects. λᵢ • |eᵢ⟩⟨eᵢ| with λᵢ = eigenvalues i ∈ [0,1] and eᵢ = eigenvectorBasis i (unit norm).

        Equations
        Instances For
          @[simp]
          theorem CSD.LF2.Effect.eigenEffect_M {N : } (E : Effect N) (i : Fin N) :
          theorem CSD.LF2.Effect.sum_eigenEffect_M {N : } (E : Effect N) :
          i : Fin N, (E.eigenEffect i).M = E.M

          E is the finite sum of its eigen-effects. E.M = ∑ᵢ λᵢ |eᵢ⟩⟨eᵢ| (the Hermitian spectral theorem, same computation as density_eq_eigen_ensemble).

          theorem CSD.LF2.OperationalPackage.p_eq_eigen_sum {N : } (OP : OperationalPackage N) (E : Effect N) :
          OP.p E = i : Fin N, .eigenvalues i * OP.p (rankOneEffect (.eigenvectorBasis i) )

          Spectral reduction of p (Route B step 3). For every effect E, p(E) = ∑ᵢ λᵢ · p(|eᵢ⟩⟨eᵢ|) — the eigenvalue-weighted sum of p on the rank-one projectors of E's spectral decomposition. Reduces the entire representation problem to determining p on rank-one projectors. Combines finite additivity + homogeneity with the spectral theorem.

          F0 — the sub-unit rank-one effect |v⟩⟨v| for ‖v‖ ≤ 1 #

          rankOneEffect is defined only for unit vectors. The polarisation reconstruction needs |v⟩⟨v| as an effect for the (generally non-unit) combinations u ± v, u ± iv; this requires ‖v‖ ≤ 1.

          outerProduct under complex scaling. |c•v⟩⟨c•v| = |c|² · |v⟩⟨v|.

          noncomputable def CSD.LF2.outerEffect {N : } (v : EuclideanSpace (Fin N)) (hv : v 1) :

          The sub-unit rank-one effect |v⟩⟨v| for ‖v‖ ≤ 1. PSD is automatic; le_one holds because 1 - |v⟩⟨v| = (1 - |v̂⟩⟨v̂|) + (1-‖v‖²)|v̂⟩⟨v̂|, both PSD.

          Equations
          Instances For
            @[simp]
            theorem CSD.LF2.outerEffect_M {N : } (v : EuclideanSpace (Fin N)) (hv : v 1) :
            theorem CSD.LF2.outerEffect_eq_rankOneEffect {N : } (φ : EuclideanSpace (Fin N)) ( : φ = 1) :

            On a unit vector, outerEffect agrees with rankOneEffect.

            F — the polarisation identities (Route B step 3b, building blocks) #

            The reconstruction of ρ from the rank-one values φ ↦ p(|φ⟩⟨φ|) rests on polarisation: the diagonal quadratic form must come from a sesquilinear form. Its algebraic core is that the rank-one projectors satisfy the parallelogram law at the matrix level — the cross terms of |u±v⟩⟨u±v| cancel — so p, being additive, inherits the parallelogram law.

            Matrix parallelogram identity for rank-one projectors. |u+v⟩⟨u+v| + |u−v⟩⟨u−v| = 2|u⟩⟨u| + 2|v⟩⟨v|: the off-diagonal cross terms |u⟩⟨v| + |v⟩⟨u| appear with opposite signs in the two sums and cancel. Pure matrix algebra.

            theorem CSD.LF2.outerProduct_polarization_real {N : } (u v : EuclideanSpace (Fin N)) :
            outerProduct (u + v) - outerProduct (u - v) = (2 Matrix.vecMulVec (fun (i : Fin N) => u.ofLp i) fun (i : Fin N) => star (v.ofLp i)) + 2 Matrix.vecMulVec (fun (i : Fin N) => v.ofLp i) fun (i : Fin N) => star (u.ofLp i)

            Rank-one polarisation (real part). |u+v⟩⟨u+v| − |u−v⟩⟨u−v| = 2(|u⟩⟨v| + |v⟩⟨u|): the difference isolates the cross terms (the "real part" of the sesquilinear form the reconstruction recovers).

            F1 — the Cauchy–Schwarz sum-of-projectors bound (Route B step 3b) #

            The additivity step of the p-level parallelogram needs |a⟩⟨a| + |b⟩⟨b| ≤ I when ‖a‖² + ‖b‖² ≤ 1. This is Cauchy–Schwarz, not an eigenvalue bound: ⟨x, (I − |a⟩⟨a| − |b⟩⟨b|) x⟩ = ‖x‖² − |⟨a,x⟩|² − |⟨b,x⟩|² ≥ ‖x‖²(1 − ‖a‖² − ‖b‖²) ≥ 0.

            theorem CSD.LF2.quad_outerProduct {N : } (a : EuclideanSpace (Fin N)) (x : Fin N) :

            The |a⟩⟨a| quadratic form: ⟨x, |a⟩⟨a| x⟩ = |⟨a,x⟩|² (the squared norm of the standard Hermitian pairing c := star ⇑a ⬝ᵥ x).

            Cauchy–Schwarz sum bound. For ‖a‖² + ‖b‖² ≤ 1, I − |a⟩⟨a| − |b⟩⟨b| is PSD. ⟨x, (I − |a⟩⟨a| − |b⟩⟨b|) x⟩ = ‖x‖² − |⟨a,x⟩|² − |⟨b,x⟩|² ≥ ‖x‖²(1 − ‖a‖² − ‖b‖²) ≥ 0.

            G — p-level homogeneity of the rank-one form (Route B step 3b) #

            theorem CSD.LF2.OperationalPackage.p_outerEffect_smul {N : } (OP : OperationalPackage N) (c : ) (hc0 : 0 c) (hc1 : c 1) (v : EuclideanSpace (Fin N)) (hv : v 1) :
            OP.p (outerEffect (c v) ) = c ^ 2 * OP.p (outerEffect v hv)

            Homogeneity of the rank-one value. p(|c·v⟩⟨c·v|) = c² · p(|v⟩⟨v|) for real c ∈ [0,1] and ‖v‖ ≤ 1: |c·v⟩⟨c·v| = c² • |v⟩⟨v| = Effect.smul c² |v⟩⟨v|, then apply p_smul_homog. The degree-2 homogeneity of the quadratic form v ↦ p(|v⟩⟨v|).

            theorem CSD.LF2.OperationalPackage.p_congr_outerEffect {N : } (OP : OperationalPackage N) {w v : EuclideanSpace (Fin N)} (h : w = v) (hw : w 1) (hv : v 1) :
            OP.p (outerEffect w hw) = OP.p (outerEffect v hv)

            p depends only on the vector, not the norm-bound proof. For equal vectors, the outerEffect values (and hence their p) agree.

            theorem CSD.LF2.OperationalPackage.p_outerEffect_sqrt2 {N : } (OP : OperationalPackage N) (v : EuclideanSpace (Fin N)) (hv : v 1) (hsv : 2 v 1) :
            OP.p (outerEffect (2 v) hsv) = 2 * OP.p (outerEffect v hv)

            √2-doubling of the rank-one value. p(|√2·v⟩⟨√2·v|) = 2·p(|v⟩⟨v|). Inverts p_outerEffect_smul at c = 1/√2: |v⟩⟨v| = ½·|√2·v⟩⟨√2·v|.

            theorem CSD.LF2.OperationalPackage.p_parallelogram {N : } (OP : OperationalPackage N) {u v : EuclideanSpace (Fin N)} (huv : u ^ 2 + v ^ 2 1 / 2) (hu : u 1) (hv : v 1) (hpv : u + v 1) (hmv : u - v 1) :
            OP.p (outerEffect (u + v) hpv) + OP.p (outerEffect (u - v) hmv) = 2 * OP.p (outerEffect u hu) + 2 * OP.p (outerEffect v hv)

            The p-level parallelogram law (Route B step 3b). For ‖u‖² + ‖v‖² ≤ ½, p(|u+v⟩⟨u+v|) + p(|u−v⟩⟨u−v|) = 2·p(|u⟩⟨u|) + 2·p(|v⟩⟨v|). The matrix parallelogram identity (outerProduct_parallelogram) makes the two effect-sums equal; additivity (with the CS sum bound as the ≤ I hypothesis) + the √2-doubling homogeneity give the scalar 2s. This is the property that forces the diagonal form v ↦ p(|v⟩⟨v|) to come from a sesquilinear form.

            H — the global quadratic form q v = ‖v‖² · p(|v̂⟩⟨v̂|) (Route B step 3b-final) #

            p (outerEffect v ·) lives only on the sub-unit ball, while the polarisation argument needs a quadratic form defined on all vectors (the combinations u ± v, u ± i·v leave the ball). The degree-2 homogeneous extension q supplies it: it agrees with p ∘ outerEffect where the latter is defined (qform_eq_p), so the sub-unit p_parallelogram becomes the unrestricted parallelogram law (qform_parallelogram).

            The normalised representative ‖v‖⁻¹ • v is sub-unit (norm 1 unless v = 0).

            |c·v⟩⟨c·v| = |v⟩⟨v| for a phase ‖c‖ = 1.

            p on outerEffect depends only on the matrix |v⟩⟨v|.

            The global quadratic form q v = ‖v‖² · p(|v̂⟩⟨v̂|), v̂ = ‖v‖⁻¹ • v.

            p (outerEffect v ·) is defined only for ‖v‖ ≤ 1; the reconstruction needs a quadratic form on all of EuclideanSpace ℂ (Fin N). The formula gives q 0 = 0 automatically (the ‖v‖² factor), agrees with p ∘ outerEffect on the sub-unit ball (qform_eq_p), and is degree-2 homogeneous under arbitrary complex scaling (qform_smul).

            Equations
            Instances For

              0 ≤ q v (from OP.nonneg).

              q v ≤ ‖v‖² (from OP.le_one). With qform_nonneg this is the local bound feeding the Cauchy-equation argument in qpolar_smul_real.

              @[simp]

              q 0 = 0.

              theorem CSD.LF2.OperationalPackage.qform_smul {N : } (OP : OperationalPackage N) (c : ) (v : EuclideanSpace (Fin N)) :
              OP.qform (c v) = c ^ 2 * OP.qform v

              Degree-2 homogeneity of q under complex scaling: q(c • v) = ‖c‖² · q v. The modulus of c scales the ‖v‖² prefactor; its phase is invisible to |v⟩⟨v| (outerProduct_smul_of_norm_one).

              theorem CSD.LF2.OperationalPackage.qform_eq_p {N : } (OP : OperationalPackage N) {v : EuclideanSpace (Fin N)} (hv : v 1) :
              OP.qform v = OP.p (outerEffect v hv)

              q agrees with p ∘ outerEffect on the sub-unit ball: q v = p(|v⟩⟨v|) for ‖v‖ ≤ 1. The bridge between the global quadratic form and the operational data (p_outerEffect_smul at c = ‖v‖).

              q is even: q(−v) = q v (the unit phase −1).

              theorem CSD.LF2.OperationalPackage.qform_parallelogram {N : } (OP : OperationalPackage N) (u v : EuclideanSpace (Fin N)) :
              OP.qform (u + v) + OP.qform (u - v) = 2 * OP.qform u + 2 * OP.qform v

              The unrestricted parallelogram law for q. q(u+v) + q(u−v) = 2 q u + 2 q v for all u, v — the sub-unit p_parallelogram transported off the ball by scaling both vectors down by t = (2(1+‖u‖+‖v‖))⁻¹ and dividing out (qform_smul). This is the hypothesis of the Jordan–von Neumann argument below.

              I — Cauchy's functional equation with a local bound (Route B step 3b-final) #

              The Jordan–von Neumann polarisation gives additivity of f u v = q(u+v) − q(u−v) in each slot, hence -homogeneity. Upgrading to -homogeneity is where the classical proof invokes continuity — unavailable here, since p is an arbitrary probability assignment. Boundedness is the substitute: 0 ≤ q ≤ ‖·‖² bounds f on the unit ball, and a bounded additive function on is linear.

              theorem CSD.LF2.additive_bounded_linear (g : ) (hadd : ∀ (s t : ), g (s + t) = g s + g t) {M : } (hM : ∀ (t : ), |t| 1|g t| M) (x : ) :
              g x = x * g 1

              Cauchy's functional equation with a local bound. An additive g : ℝ → ℝ that is bounded on [-1,1] is linear: g t = t · g 1.

              No continuity is assumed (and none is available: p is an arbitrary probability assignment). The proof is the classical squeeze on h y = g y − y · g 1: h is additive, kills every integer (h m = m · h 1 = 0), and is bounded on [-1,1]; for any x and any n ≥ 1, n · h x = h (n x − ⌊n x⌋) lands in that bounded window, so |h x| ≤ (M + |g 1|)/n → 0.

              Used by OperationalPackage.qpolar_smul_real, where the local bound comes from qform_nonneg and qform_le_normSq.

              J — the polarisation difference f u v = q(u+v) − q(u−v) (Route B step 3b-final) #

              noncomputable def CSD.LF2.OperationalPackage.qpolar {N : } (OP : OperationalPackage N) (u v : EuclideanSpace (Fin N)) :

              The polarisation difference f u v = q(u+v) − q(u−v) — four times the real part of the sesquilinear form being reconstructed. Symmetric (qpolar_symm), additive (qpolar_add_left) and -homogeneous (qpolar_smul_real) in each slot.

              Equations
              Instances For

                f is symmetric: q(v−u) = q(−(u−v)) = q(u−v).

                f 0 v = q v − q(−v) = 0 (evenness of q).

                f u (−v) = − f u v (the two q-terms swap).

                theorem CSD.LF2.OperationalPackage.qpolar_add_half {N : } (OP : OperationalPackage N) (u w v : EuclideanSpace (Fin N)) :
                OP.qpolar u v + OP.qpolar w v = 2 * OP.qpolar (2⁻¹ (u + w)) v

                The halving identity (Jordan–von Neumann core). f u v + f w v = 2 · f ((u+w)/2) v: apply the parallelogram law at (a ± v, b) with a = (u+w)/2, b = (u−w)/2 (so a + b = u and a − b = w) and subtract the two instances — the q b terms cancel.

                theorem CSD.LF2.OperationalPackage.qpolar_add_left {N : } (OP : OperationalPackage N) (u w v : EuclideanSpace (Fin N)) :
                OP.qpolar (u + w) v = OP.qpolar u v + OP.qpolar w v

                Additivity of the polarisation difference in the first slot. f (u+w) v = f u v + f w v: the halving identity at (u, w) and at (u+w, 0) (where f 0 v = 0) share a right-hand side.

                theorem CSD.LF2.OperationalPackage.qpolar_smul_real {N : } (OP : OperationalPackage N) (t : ) (u v : EuclideanSpace (Fin N)) :
                OP.qpolar (t u) v = t * OP.qpolar u v

                Real homogeneity of the polarisation difference in the first slot. f (t • u) v = t · f u v for every real t. Additivity alone gives only -homogeneity; the upgrade to is additive_bounded_linear, whose local bound is 0 ≤ q ≤ ‖·‖² (qform_nonneg, qform_le_normSq) — no continuity of p is needed or available.

                K — the polarised sesquilinear form S (Route B step 3b-final) #

                With f bi-additive and -bihomogeneous, the complex polarisation S(u,v) = ¼ f(u,v) − (i/4) f(u, i·v) is sesquilinear: linear in v (the i-homogeneity S(u, i·v) = i·S(u,v) is pure algebra of the formula), conjugate-linear in u by conjugate symmetry, and S(v,v) = q v.

                noncomputable def CSD.LF2.OperationalPackage.qsesq {N : } (OP : OperationalPackage N) (u v : EuclideanSpace (Fin N)) :

                The polarised sesquilinear form. S(u,v) = ¼ f(u,v) − (i/4) f(u, i·v), the complex polarisation of q. It is additive (qsesq_add_right) and -homogeneous (qsesq_smul_right) in v, conjugate-symmetric (qsesq_conj_symm), and restricts to q on the diagonal (qsesq_self) — exactly the sesquilinear form whose matrix is the density operator Busch's theorem asserts.

                Equations
                Instances For
                  theorem CSD.LF2.OperationalPackage.qpolar_add_right {N : } (OP : OperationalPackage N) (u v w : EuclideanSpace (Fin N)) :
                  OP.qpolar u (v + w) = OP.qpolar u v + OP.qpolar u w

                  Additivity of f in the second slot (by symmetry from qpolar_add_left).

                  theorem CSD.LF2.OperationalPackage.qpolar_smul_real_right {N : } (OP : OperationalPackage N) (t : ) (u v : EuclideanSpace (Fin N)) :
                  OP.qpolar u (t v) = t * OP.qpolar u v

                  Real homogeneity of f in the second slot (by symmetry from qpolar_smul_real).

                  theorem CSD.LF2.OperationalPackage.qsesq_add_right {N : } (OP : OperationalPackage N) (u v w : EuclideanSpace (Fin N)) :
                  OP.qsesq u (v + w) = OP.qsesq u v + OP.qsesq u w

                  Additivity of S in the second slot.

                  theorem CSD.LF2.OperationalPackage.qsesq_smul_real_right {N : } (OP : OperationalPackage N) (t : ) (u v : EuclideanSpace (Fin N)) :
                  OP.qsesq u (t v) = t * OP.qsesq u v

                  Real homogeneity of S in the second slot.

                  S(u, i·v) = i · S(u,v) — pure algebra of the polarisation formula (i·(i·v) = −v), no additivity needed.

                  theorem CSD.LF2.OperationalPackage.qsesq_smul_right {N : } (OP : OperationalPackage N) (c : ) (u v : EuclideanSpace (Fin N)) :
                  OP.qsesq u (c v) = c * OP.qsesq u v

                  Complex homogeneity in the second slot: S(u, c•v) = c · S(u,v). Split c = Re c + i · Im c and combine qsesq_smul_real_right with qsesq_smul_I_right.

                  Conjugate symmetry: S(v,u) = conj (S(u,v)). The real part is symmetric (qpolar_symm); the imaginary part flips because q(v ± i·u) = q(u ∓ i·v) (multiply by the unit phase ∓i and use qform_smul). With qsesq_smul_right this makes S conjugate-linear in its first slot.

                  S restricts to q on the diagonal: S(v,v) = q v. The diagonal value is f v v = 4 q v (degree-2 homogeneity at 2), and the imaginary term vanishes because q(v − i·v) = q(v + i·v) (unit phase −i). Both steps are the same witness, OperationalPackage.qform_smul (q(c • v) = ‖c‖² q v): at c = 2 it gives the diagonal value, and at c = −i it gives ‖−i‖² = 1, collapsing the imaginary term.

                  L — the reconstructed matrix R and the representation theorem (Route B step 3b-final) #

                  R j k := S(eⱼ, eₖ) on the standard basis. Sesquilinearity turns the basis expansion of v into q v = ⟨v, R v⟩ = Tr(R · |v⟩⟨v|), i.e. p(|v⟩⟨v|) = Tr(R · |v⟩⟨v|); the spectral reduction lifts this to p E = Tr(R · E) for every effect.

                  Standard-basis expansion in EuclideanSpace: v = ∑ᵢ vᵢ • eᵢ.

                  Tr(R · |v⟩⟨v|) = ⟨v, R v⟩. The trace pairing against a rank-one projector is the quadratic form of R — the identity turning the sesquilinear reconstruction into the Born-style trace formula.

                  theorem CSD.LF2.OperationalPackage.qsesq_sum_right {N : } (OP : OperationalPackage N) {ι : Type u_1} (u : EuclideanSpace (Fin N)) (s : Finset ι) (c : ι) (e : ιEuclideanSpace (Fin N)) :
                  OP.qsesq u (∑ is, c i e i) = is, c i * OP.qsesq u (e i)

                  S is linear over finite sums in the second slot.

                  theorem CSD.LF2.OperationalPackage.qsesq_sum_left {N : } (OP : OperationalPackage N) {ι : Type u_1} (s : Finset ι) (c : ι) (e : ιEuclideanSpace (Fin N)) (w : EuclideanSpace (Fin N)) :
                  OP.qsesq (∑ is, c i e i) w = is, (starRingEnd ) (c i) * OP.qsesq (e i) w

                  S is conjugate-linear over finite sums in the first slot (via qsesq_conj_symm).

                  noncomputable def CSD.LF2.OperationalPackage.qmatrix {N : } (OP : OperationalPackage N) :
                  Matrix (Fin N) (Fin N)

                  The reconstructed matrix R j k = S(eⱼ, eₖ) on the standard basis — the candidate density operator of Busch's theorem (its positivity and unit trace are step 4).

                  Equations
                  Instances For

                    S is the sesquilinear form of R: S(u,v) = ⟨u, R v⟩. Expand both slots in the standard basis (qsesq_sum_left, qsesq_sum_right).

                    q is the quadratic form of R: q v = ⟨v, R v⟩.

                    The rank-one representation (Route B step 3b-final). p(|v⟩⟨v|) = Tr(R · |v⟩⟨v|) for every sub-unit v: the operational probability of every rank-one effect is a trace against one fixed Hermitian matrix. This is what the polarisation programme was for.

                    theorem CSD.LF2.OperationalPackage.p_eq_trace {N : } (OP : OperationalPackage N) (E : Effect N) :
                    (OP.p E) = (OP.qmatrix * E.M).trace

                    Full representation on all effects (Route B step 3b-final, capstone). p E = Tr(R · E) for every effect E — the rank-one representation lifted through the spectral reduction (p_eq_eigen_sum, Effect.sum_eigenEffect_M).

                    This is the content of Busch's theorem except the state conditions on R. What remains (step 4) is R.PosSemidef (from OP.nonneg), R.trace = 1 (from OP.total_one), and uniqueness (non-degeneracy of the trace pairing) — which together make R a DensityOperator and replace the busch_effect_gleason axiom in LF2/BornWrapper.lean.

                    M — step 4: positivity, normalisation, uniqueness, and the discharged theorem #

                    (Route B step 4, capstone)

                    The three state conditions on the reconstructed R = OP.qmatrix: R.PosSemidef (from OP.nonneg), R.trace = 1 (from OP.total_one), and — the only genuinely new argument — uniqueness, from the fact that a complex matrix is determined by its quadratic form (matrix_eq_zero_of_quadForm_zero, a polarisation). Together they package R as a DensityOperator and prove effect_gleason_representation, the statement the busch_effect_gleason axiom used to assert.

                    theorem CSD.LF2.matrix_eq_zero_of_quadForm_zero {N : } {D : Matrix (Fin N) (Fin N) } (hQ : ∀ (x : Fin N), star x ⬝ᵥ D.mulVec x = 0) :
                    D = 0

                    A complex matrix is determined by its quadratic form. If star x ⬝ᵥ (D *ᵥ x) = 0 for every x, then D = 0. Over the diagonal of a sesquilinear form recovers the whole form by polarisation, so a vanishing quadratic form forces every entry to vanish.

                    theorem CSD.LF2.trace_mul_isHermitian_real {N : } {A B : Matrix (Fin N) (Fin N) } (hA : A.IsHermitian) (hB : B.IsHermitian) :
                    (starRingEnd ) (A * B).trace = (A * B).trace

                    The trace of a product of two Hermitian matrices is real. Tr(A·B)^conj = Tr(B·A) = Tr(A·B).

                    theorem CSD.LF2.traceForm_ofReal {N : } (ρ : DensityOperator N) (E : Effect N) :
                    (traceForm ρ E) = (ρ.M * E.M).trace

                    The trace form lifts to the complex trace. For a density operator ρ and effect E (both Hermitian), Tr(ρ·E) is real, so ↑(traceForm ρ E) = Tr(ρ.M·E.M).

                    Step 4a — the reconstructed matrix is positive semidefinite. R.PosSemidef from qform_nonneg and qform_eq_dotProduct (⟨x, R x⟩ = q x ≥ 0), with R Hermitian.

                    Step 4b — the reconstructed matrix has unit trace. R.trace = 1 from OP.total_one (p I = 1) and p_eq_trace at E = Effect.one (Tr(R · I) = Tr R).

                    The reconstructed density operator R = OP.qmatrix, packaged with its PSD + unit-trace witnesses.

                    Equations
                    Instances For

                      p is the trace form of qdensity. From p_eq_trace (↑(p E) = Tr(R·E)) and traceForm_ofReal (↑(traceForm ρ E) = Tr(R·E)), by injectivity of ℝ ↪ ℂ.

                      theorem CSD.LF2.OperationalPackage.qdensity_unique {N : } (OP : OperationalPackage N) (ρ : DensityOperator N) ( : ∀ (E : Effect N), OP.p E = traceForm ρ E) :
                      ρ = OP.qdensity

                      Step 4c — uniqueness. Any density operator whose trace form reproduces p on every effect equals qdensity. Their difference D is Hermitian with Tr(D · E) = 0 for every effect; taking E = |v⟩⟨v| (sub-unit) gives ⟨v, D v⟩ = 0 on the whole unit ball, and scaling

                      Busch effect-Gleason (finite dim), proved. For every operational package there is a unique density operator ρ with p E = Tr(ρ · E) for every effect. This discharges the busch_effect_gleason axiom: qdensity witnesses existence (p_eq_traceForm_qdensity) and qdensity_unique gives uniqueness.

                      theorem CSD.LF2.born_form_of_package {N : } (_hN : 2 N) (OP : OperationalPackage N) :
                      ∃! ρ : DensityOperator N, ∀ (E : Effect N), OP.p E = traceForm ρ E

                      Born-form assignment (spec §5.4 wrapper). The unique density operator representing an operational package — now a theorem (effect_gleason_representation), not an axiom. The dimension hypothesis hN : 2 ≤ N is retained for signature compatibility with the spec and with downstream callers, though the reconstruction in fact works for every N.

                      theorem CSD.LF2.pure_state_born_weights_of_certainty {N : } (_hN : 2 N) (OP : OperationalPackage N) (ψ : EuclideanSpace (Fin N)) ( : ψ = 1) (h_certain : OP.p (rankOneEffect ψ ) = 1) (φ : EuclideanSpace (Fin N)) ( : φ = 1) :
                      OP.p (rankOneEffect φ ) = inner ψ φ ^ 2

                      Strengthened composite endpoint. Given only a purity hypothesis — that the operational package assigns probability one to the rank-1 effect through ψ, i.e. the preparation is "certain" to produce ψ — the Born quadratic form |⟨ψ|φ⟩|² falls out for every rank-1 outcome. Relocated from LF2/BornWrapper.lean (2026-07-21) because it now composes the proven effect_gleason_representation (was busch_effect_gleason) with rankOneDensity_unique_of_certainty and born_quadratic; hN is retained for the spec signature.