Documentation

Graphon.ForMathlib.CouplingGluing

Gluing two couplings over a shared marginal #

Two couplings sharing their middle marginal — π₁₂ of (μ₁, μ₂) and π₂₃ of (μ₂, μ₃) — glue to a joint law on Ω₁ × Ω₂ × Ω₃ whose (1,2)-projection is π₁₂, whose (2,3)-projection is π₂₃, and whose (1,3)-projection is therefore a coupling of (μ₁, μ₃). This is the measure-theoretic core of the triangle inequality for coupling-defined distances (Janson, Graphons, cut norm and distance, Lemma 6.5).

The construction is the relative joining — no conditional-weight formulas #

The glued law is relativeFactorCoupling π₁₂ π₂₃ Prod.snd Prod.fst — the relatively independent joining of the two couplings over their common middle factor — reordered to Ω₁ × Ω₂ × Ω₃. Both disintegrations are condDistribs, defined almost everywhere under the middle marginal, so zero-mass middle atoms never produce a division by zero: there is no hand-written conditional-weight formula to fail there. The regressions below run the middle through a Dirac mass — every other middle point has measure zero — precisely to exercise that branch.

The middle coordinate is read off the first component of the joining; the common-factor identity (the two middle readings agree almost everywhere) is what makes the (2,3)-projection exact and not merely almost-sure.

Scope #

Everything here is for standard Borel carriers — which includes every finite or countable discrete carrier, the case the step-approximation route consumes. This does not by itself establish the arbitrary-carrier triangle inequality: that requires, separately, stability of the reduction under step approximation, which no statement in this file addresses.

noncomputable def MeasureTheory.gluedCoupling {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] (π₁₂ : Measure (Ω₁ × Ω₂)) (π₂₃ : Measure (Ω₂ × Ω₃)) [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] :
Measure (Ω₁ × Ω₂ × Ω₃)

The glued coupling: the relative joining of the two couplings over their common middle marginal, reordered to the triple product.

Equations
Instances For
    instance MeasureTheory.instIsProbabilityMeasureProdGluedCoupling {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] {π₁₂ : Measure (Ω₁ × Ω₂)} {π₂₃ : Measure (Ω₂ × Ω₃)} [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] :
    theorem MeasureTheory.gluedCoupling_map_fst_snd {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] {π₁₂ : Measure (Ω₁ × Ω₂)} {π₂₃ : Measure (Ω₂ × Ω₃)} [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] :
    Measure.map (fun (w : Ω₁ × Ω₂ × Ω₃) => (w.1, w.2.1)) (gluedCoupling π₁₂ π₂₃) = π₁₂

    The (1,2)-projection is the first coupling. Exact.

    theorem MeasureTheory.gluedCoupling_map_snd_trd {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] {π₁₂ : Measure (Ω₁ × Ω₂)} {π₂₃ : Measure (Ω₂ × Ω₃)} [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] (h : Measure.map Prod.fst π₂₃ = Measure.map Prod.snd π₁₂) :
    Measure.map (fun (w : Ω₁ × Ω₂ × Ω₃) => w.2) (gluedCoupling π₁₂ π₂₃) = π₂₃

    The (2,3)-projection is the second coupling. Exact — the middle is read off the first component, and the common-factor identity moves it to the second before map_snd applies.

    theorem MeasureTheory.gluedCoupling_map_fst {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] {π₁₂ : Measure (Ω₁ × Ω₂)} {π₂₃ : Measure (Ω₂ × Ω₃)} [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] :

    The first marginal of the (1,3)-projection is μ₁. Exact.

    theorem MeasureTheory.gluedCoupling_map_trd {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] {π₁₂ : Measure (Ω₁ × Ω₂)} {π₂₃ : Measure (Ω₂ × Ω₃)} [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] (h : Measure.map Prod.fst π₂₃ = Measure.map Prod.snd π₁₂) :
    Measure.map (fun (w : Ω₁ × Ω₂ × Ω₃) => w.2.2) (gluedCoupling π₁₂ π₂₃) = Measure.map Prod.snd π₂₃

    The last marginal of the (1,3)-projection is μ₃. Exact.

    The induced outer coupling #

    noncomputable def MeasureTheory.gluedOuterCoupling {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] (π₁₂ : Measure (Ω₁ × Ω₂)) (π₂₃ : Measure (Ω₂ × Ω₃)) [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] :
    Measure (Ω₁ × Ω₃)

    The induced coupling of the outer marginals: forget the shared middle coordinate in the glued triple law.

    Equations
    Instances For
      instance MeasureTheory.instIsProbabilityMeasureProdGluedOuterCoupling {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] {π₁₂ : Measure (Ω₁ × Ω₂)} {π₂₃ : Measure (Ω₂ × Ω₃)} [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] :
      theorem MeasureTheory.gluedOuterCoupling_map_fst {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] {π₁₂ : Measure (Ω₁ × Ω₂)} {π₂₃ : Measure (Ω₂ × Ω₃)} [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] :

      The first marginal of the induced outer coupling is the first marginal of π₁₂. Exact.

      theorem MeasureTheory.gluedOuterCoupling_map_snd {Ω₁ : Type u_1} {Ω₂ : Type u_2} {Ω₃ : Type u_3} [MeasurableSpace Ω₁] [StandardBorelSpace Ω₁] [Nonempty Ω₁] [MeasurableSpace Ω₂] [StandardBorelSpace Ω₂] [Nonempty Ω₂] [MeasurableSpace Ω₃] [StandardBorelSpace Ω₃] [Nonempty Ω₃] {π₁₂ : Measure (Ω₁ × Ω₂)} {π₂₃ : Measure (Ω₂ × Ω₃)} [IsProbabilityMeasure π₁₂] [IsProbabilityMeasure π₂₃] (h : Measure.map Prod.fst π₂₃ = Measure.map Prod.snd π₁₂) :

      The second marginal of the induced outer coupling is the second marginal of π₂₃. Exact.

      Zero-mass middle-atom regressions #

      The middle marginal is a Dirac mass, so every other middle point is a zero-mass atom; the projections hold regardless, because the construction never divides by a middle weight.

      Pushing a coupling through factor maps #

      Exact marginal laws for the pushforward of a coupling through a pair of measurable factor maps. Only measurability is assumed — no finiteness of the targets, no positivity of any cell: finite quotients are a later consumer, obtained by instantiating the targets, and zero-mass cells require nothing because nothing here divides.

      theorem MeasureTheory.isProbabilityMeasure_map_prodMap {γ₁ : Type u_4} {γ₂ : Type u_5} {ι₁ : Type u_6} {ι₂ : Type u_7} [MeasurableSpace γ₁] [MeasurableSpace γ₂] [MeasurableSpace ι₁] [MeasurableSpace ι₂] {π : Measure (γ₁ × γ₂)} [IsProbabilityMeasure π] {q₁ : γ₁ι₁} {q₂ : γ₂ι₂} (hq₁ : Measurable q₁) (hq₂ : Measurable q₂) :

      The pushforward of a coupling through a pair of factor maps is a probability measure.

      theorem MeasureTheory.map_prodMap_map_fst {γ₁ : Type u_4} {γ₂ : Type u_5} {ι₁ : Type u_6} {ι₂ : Type u_7} [MeasurableSpace γ₁] [MeasurableSpace γ₂] [MeasurableSpace ι₁] [MeasurableSpace ι₂] {π : Measure (γ₁ × γ₂)} {q₁ : γ₁ι₁} {q₂ : γ₂ι₂} (hq₁ : Measurable q₁) (hq₂ : Measurable q₂) :

      The first marginal of the pushed coupling is the pushed first marginal. Exact.

      theorem MeasureTheory.map_prodMap_map_snd {γ₁ : Type u_4} {γ₂ : Type u_5} {ι₁ : Type u_6} {ι₂ : Type u_7} [MeasurableSpace γ₁] [MeasurableSpace γ₂] [MeasurableSpace ι₁] [MeasurableSpace ι₂] {π : Measure (γ₁ × γ₂)} {q₁ : γ₁ι₁} {q₂ : γ₂ι₂} (hq₁ : Measurable q₁) (hq₂ : Measurable q₂) :

      The second marginal of the pushed coupling is the pushed second marginal. Exact.