Multi-edge events and translation invariance of q = 2 FK measures
A. Multi-edge events
DefinitionEvent that all edges of a finite set are open#✓fully proved
The event A_t that every edge of the finite set t is open. On box configurations it is
cdc_boxMultiOpenEvent (med_boxMultiOpenEvent_eq).
def med_genericMultiOpenEvent {V : Type*} (t : Finset (Sym2 V)) :
Set (ConfigSpace (Sym2 V)) :=
{ω | ∀ e ∈ t, ω e = true}
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
Uses 1 · Used by 10
B. Finite-volume masses
DefinitionMass of the all-open event under a weight function#✓fully proved
The mass ∑_ω 1_{A_t}(ω) μ(ω) of the event that every edge of t is open, for a weight
function μ on a finite configuration space; it is eventMassProb μ A_t
(med_multiMassProb_eq_eventMassProb).
noncomputable def med_multiMassProb (μ : ConfigSpace (Sym2 V) → ℝ) (t : Finset (Sym2 V)) : ℝ :=
∑ ω : ConfigSpace (Sym2 V),
(med_genericMultiOpenEvent t).indicator (fun _ => (1 : ℝ)) ω * μ ω
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
def med_genericMultiOpenEvent {V : Type*} (t : Finset (Sym2 V)) :
Set (ConfigSpace (Sym2 V)) :=
{ω | ∀ e ∈ t, ω e = true}
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:84
Uses 2 · Used by 22
LemmaWired box measure of an all-open event equals its box mass#✓fully proved
The wired box measure on Λ_m, pushed to ℤ^d, gives A_t the box mass of t.
lemma med_centred_mass_eq (m : ℕ) (t : Finset (Sym2 (boxVerts d m))) {p : ℝ}
(hp : 0 < p) (hp1 : p < 1) :
(wiredFiniteMeasure d m hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t.image (edgeIncl d m)))
= med_multiMassProb (wiredFkProb (boxGraph d m) (boxBoundary d m) p 2) t
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
noncomputable def wiredFiniteMeasure (d n : ℕ) {p q : ℝ}
(hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) :
ProbabilityMeasure (ConfigSpace (Sym2 (Site d))) :=
⟨((wiredFkPMF (boxGraph d n) (boxBoundary d n) hp hp1 hq).toMeasure).map (extendEdge d n),
inferInstance⟩
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:187
Uses 14 · Used by 4
LemmaFree box measure of an all-open event equals its box mass#✓fully proved
The free box measure on Λ_m, pushed to ℤ^d, gives A_t the box mass of t.
lemma med_free_centred_mass_eq (m : ℕ) (t : Finset (Sym2 (boxVerts d m))) {p : ℝ}
(hp : 0 < p) (hp1 : p < 1) :
(freeFiniteMeasure d m hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t.image (edgeIncl d m)))
= med_multiMassProb (fkProb (boxGraph d m) p 2) t
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
noncomputable def freeFiniteMeasure (d n : ℕ) {p q : ℝ}
(hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) :
ProbabilityMeasure (ConfigSpace (Sym2 (Site d))) :=
⟨((fkPMF (boxGraph d n) hp hp1 hq).toMeasure).map (extendEdge d n),
inferInstance⟩
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:179
Uses 13 · Used by 3
C. Translation covariance
LemmaTranslation covariance of wired box masses#✓fully proved
The wired mass of t in Λ_m equals the wired mass of t + v in v + Λ_m.
lemma med_centred_eq_translated_wired (m : ℕ) (v : Site d) (t : Finset (Sym2 (boxVerts d m)))
{p : ℝ} :
med_multiMassProb (wiredFkProb (boxGraph d m) (boxBoundary d m) p 2) t
= med_multiMassProb
(wiredFkProb (fvs_transBoxGraph d m v) (fvs_transBoxBoundary d m v) p 2)
(t.image (Sym2.map (fvs_transEquiv d m v)))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
noncomputable def med_multiMassProb (μ : ConfigSpace (Sym2 V) → ℝ) (t : Finset (Sym2 V)) : ℝ :=
∑ ω : ConfigSpace (Sym2 V),
(med_genericMultiOpenEvent t).indicator (fun _ => (1 : ℝ)) ω * μ ω
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:115
noncomputable def wiredFkProb (p q : ℝ) (ω : ConfigSpace (Sym2 V)) : ℝ :=
wiredFkWeight G bdry p q ω / wiredFkZ G bdry p q
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:105
def boxGraph (d n : ℕ) : SimpleGraph (boxVerts d n) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:142
def boxBoundary (d n : ℕ) (x : boxVerts d n) : Prop := (x : Site d) ∈ vertexBoundary d n
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:151
def fvs_transBoxGraph (d m : ℕ) (v : Site d) : SimpleGraph (fvs_transBoxVerts d m v) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:334
def fvs_transBoxBoundary (d m : ℕ) (v : Site d) (y : fvs_transBoxVerts d m v) : Prop :=
((y : Site d) - v) ∈ vertexBoundary d m
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:343
noncomputable def fvs_transEquiv (d m : ℕ) (v : Site d) :
boxVerts d m ≃ fvs_transBoxVerts d m v where
toFun := fun x => ⟨(x : Site d) + v, by
change ((x : Site d) + v - v) ∈ box d m
rw [add_sub_cancel_right]; exact x.2⟩
invFun := fun y => ⟨(y : Site d) - v, y.2⟩
left_inv := by intro x; apply Subtype.ext; simp
right_inv := by intro y; apply Subtype.ext; simp
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:311
Uses 19 · Used by 2
LemmaTranslation covariance of free box masses#✓fully proved
The free mass of t in Λ_m equals the free mass of t + v in v + Λ_m.
lemma med_centred_eq_translated_free (m : ℕ) (v : Site d) (t : Finset (Sym2 (boxVerts d m)))
{p : ℝ} :
med_multiMassProb (fkProb (boxGraph d m) p 2) t
= med_multiMassProb
(fkProb (fvs_transBoxGraph d m v) p 2)
(t.image (Sym2.map (fvs_transEquiv d m v)))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
noncomputable def med_multiMassProb (μ : ConfigSpace (Sym2 V) → ℝ) (t : Finset (Sym2 V)) : ℝ :=
∑ ω : ConfigSpace (Sym2 V),
(med_genericMultiOpenEvent t).indicator (fun _ => (1 : ℝ)) ω * μ ω
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:115
noncomputable def fkProb (p q : ℝ) (ω : ConfigSpace (Sym2 V)) : ℝ :=
fkWeight G p q ω / fkZ G p q
PhyslibExt/StatisticalMechanics/RandomCluster/RandomCluster.lean:172
def boxGraph (d n : ℕ) : SimpleGraph (boxVerts d n) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:142
def fvs_transBoxGraph (d m : ℕ) (v : Site d) : SimpleGraph (fvs_transBoxVerts d m v) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:334
noncomputable def fvs_transEquiv (d m : ℕ) (v : Site d) :
boxVerts d m ≃ fvs_transBoxVerts d m v where
toFun := fun x => ⟨(x : Site d) + v, by
change ((x : Site d) + v - v) ∈ box d m
rw [add_sub_cancel_right]; exact x.2⟩
invFun := fun y => ⟨(y : Site d) - v, y.2⟩
left_inv := by intro x; apply Subtype.ext; simp
right_inv := by intro y; apply Subtype.ext; simp
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:311
Uses 16 · Used by 2
D. Limits along boxes
LemmaWired all-open probabilities converge to the infinite-volume value#✓fully proved
Restatement of cdc_wired_multiOpenEvent_tendsto: the wired box probabilities of A_t
converge to the wired infinite-volume probability.
lemma med_centred_tendsto_iv (N : ℕ) (t : Finset (Sym2 (boxVerts d N)))
{p : ℝ} (hp : 0 < p) (hp1 : p < 1) :
Tendsto (fun m => (wiredFiniteMeasure d m hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t.image (edgeIncl d N)))) atTop
(𝓝 ((wiredInfiniteVolume d hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t.image (edgeIncl d N)))))
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
noncomputable def wiredFiniteMeasure (d n : ℕ) {p q : ℝ}
(hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) :
ProbabilityMeasure (ConfigSpace (Sym2 (Site d))) :=
⟨((wiredFkPMF (boxGraph d n) (boxBoundary d n) hp hp1 hq).toMeasure).map (extendEdge d n),
inferInstance⟩
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:187
Uses 11 · Used by 4
LemmaFree all-open probabilities converge to the infinite-volume value#✓fully proved
Restatement of cdc_free_multiOpenEvent_tendsto: the free box probabilities of A_t
converge to the free infinite-volume probability.
lemma med_free_centred_tendsto_iv (N : ℕ) (t : Finset (Sym2 (boxVerts d N)))
{p : ℝ} (hp : 0 < p) (hp1 : p < 1) :
Tendsto (fun m => (freeFiniteMeasure d m hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t.image (edgeIncl d N)))) atTop
(𝓝 ((freeInfiniteVolume d hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t.image (edgeIncl d N)))))
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
noncomputable def freeFiniteMeasure (d n : ℕ) {p q : ℝ}
(hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) :
ProbabilityMeasure (ConfigSpace (Sym2 (Site d))) :=
⟨((fkPMF (boxGraph d n) hp hp1 hq).toMeasure).map (extendEdge d n),
inferInstance⟩
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:179
Uses 11 · Used by 3
E. The off-centre multi-edge carrier
DefinitionDifference of wired all-open masses of an edge set and its translate#✓fully proved
The difference between the wired mass of t in Λ_m and the wired mass of t + v in
v + Λ_m; it vanishes by translation covariance.
noncomputable def med_offCentreMultiCarrier (v : Site d) (N : ℕ) (t : Finset (Sym2 (boxVerts d N)))
(p : ℝ) (m : ℕ) (hNm : N ≤ m) : ℝ :=
med_multiMassProb (wiredFkProb (boxGraph d m) (boxBoundary d m) p 2)
(t.image (innerEdgeLE d hNm))
- med_multiMassProb
(wiredFkProb (fvs_transBoxGraph d m v) (fvs_transBoxBoundary d m v) p 2)
((t.image (innerEdgeLE d hNm)).image (Sym2.map (fvs_transEquiv d m v)))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
noncomputable def med_multiMassProb (μ : ConfigSpace (Sym2 V) → ℝ) (t : Finset (Sym2 V)) : ℝ :=
∑ ω : ConfigSpace (Sym2 V),
(med_genericMultiOpenEvent t).indicator (fun _ => (1 : ℝ)) ω * μ ω
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:115
noncomputable def wiredFkProb (p q : ℝ) (ω : ConfigSpace (Sym2 V)) : ℝ :=
wiredFkWeight G bdry p q ω / wiredFkZ G bdry p q
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:105
def boxGraph (d n : ℕ) : SimpleGraph (boxVerts d n) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:142
def boxBoundary (d n : ℕ) (x : boxVerts d n) : Prop := (x : Site d) ∈ vertexBoundary d n
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:151
def innerEdgeLE (d : ℕ) {n m : ℕ} (h : n ≤ m) : Sym2 (boxVerts d n) → Sym2 (boxVerts d m) :=
Sym2.map (boxVertInclLE d h)
PhyslibExt/StatisticalMechanics/RandomCluster/WiredDomChain.lean:424
def fvs_transBoxGraph (d m : ℕ) (v : Site d) : SimpleGraph (fvs_transBoxVerts d m v) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:334
def fvs_transBoxBoundary (d m : ℕ) (v : Site d) (y : fvs_transBoxVerts d m v) : Prop :=
((y : Site d) - v) ∈ vertexBoundary d m
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:343
noncomputable def fvs_transEquiv (d m : ℕ) (v : Site d) :
boxVerts d m ≃ fvs_transBoxVerts d m v where
toFun := fun x => ⟨(x : Site d) + v, by
change ((x : Site d) + v - v) ∈ box d m
rw [add_sub_cancel_right]; exact x.2⟩
invFun := fun y => ⟨(y : Site d) - v, y.2⟩
left_inv := by intro x; apply Subtype.ext; simp
right_inv := by intro y; apply Subtype.ext; simp
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:311
Uses 13
F. Homogeneity from translated masses
LemmaEqual wired probabilities from eventually equal translated masses#✓fully proved
If the wired mass of t + v in v + Λ_m eventually equals the wired mass of t' in Λ_m,
the wired infinite-volume measure gives A_t and A_{t'} the same probability.
lemma med_wiredMultiHomogeneous_of_cofinal (v : Site d) (N : ℕ)
(t t' : Finset (Sym2 (boxVerts d N))) {p : ℝ} (hp : 0 < p) (hp1 : p < 1)
(htrans : ∀ᶠ m in atTop, ∀ (hNm : N ≤ m),
med_multiMassProb
(wiredFkProb (fvs_transBoxGraph d m v) (fvs_transBoxBoundary d m v) p 2)
((t.image (innerEdgeLE d hNm)).image (Sym2.map (fvs_transEquiv d m v)))
= med_multiMassProb (wiredFkProb (boxGraph d m) (boxBoundary d m) p 2)
(t'.image (innerEdgeLE d hNm))) :
(wiredInfiniteVolume d hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t.image (edgeIncl d N)))
= (wiredInfiniteVolume d hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t'.image (edgeIncl d N)))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
noncomputable def med_multiMassProb (μ : ConfigSpace (Sym2 V) → ℝ) (t : Finset (Sym2 V)) : ℝ :=
∑ ω : ConfigSpace (Sym2 V),
(med_genericMultiOpenEvent t).indicator (fun _ => (1 : ℝ)) ω * μ ω
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:115
noncomputable def wiredFkProb (p q : ℝ) (ω : ConfigSpace (Sym2 V)) : ℝ :=
wiredFkWeight G bdry p q ω / wiredFkZ G bdry p q
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:105
def fvs_transBoxGraph (d m : ℕ) (v : Site d) : SimpleGraph (fvs_transBoxVerts d m v) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:334
def fvs_transBoxBoundary (d m : ℕ) (v : Site d) (y : fvs_transBoxVerts d m v) : Prop :=
((y : Site d) - v) ∈ vertexBoundary d m
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:343
def innerEdgeLE (d : ℕ) {n m : ℕ} (h : n ≤ m) : Sym2 (boxVerts d n) → Sym2 (boxVerts d m) :=
Sym2.map (boxVertInclLE d h)
PhyslibExt/StatisticalMechanics/RandomCluster/WiredDomChain.lean:424
noncomputable def fvs_transEquiv (d m : ℕ) (v : Site d) :
boxVerts d m ≃ fvs_transBoxVerts d m v where
toFun := fun x => ⟨(x : Site d) + v, by
change ((x : Site d) + v - v) ∈ box d m
rw [add_sub_cancel_right]; exact x.2⟩
invFun := fun y => ⟨(y : Site d) - v, y.2⟩
left_inv := by intro x; apply Subtype.ext; simp
right_inv := by intro y; apply Subtype.ext; simp
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:311
def boxGraph (d n : ℕ) : SimpleGraph (boxVerts d n) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:142
def boxBoundary (d n : ℕ) (x : boxVerts d n) : Prop := (x : Site d) ∈ vertexBoundary d n
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:151
noncomputable def wiredInfiniteVolume (d : ℕ) {p q : ℝ}
(hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) :
ProbabilityMeasure (ConfigSpace (Sym2 (Site d))) :=
(CompactSpace.tendsto_subseq (fun n => wiredFiniteMeasure d n hp hp1 hq)).choose
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:217
Uses 22 · Used by 1
LemmaEqual free probabilities from eventually equal translated masses#✓fully proved
If the free mass of t + v in v + Λ_m eventually equals the free mass of t' in Λ_m,
the free infinite-volume measure gives A_t and A_{t'} the same probability.
lemma med_freeMultiHomogeneous_of_cofinal (v : Site d) (N : ℕ)
(t t' : Finset (Sym2 (boxVerts d N))) {p : ℝ} (hp : 0 < p) (hp1 : p < 1)
(htrans : ∀ᶠ m in atTop, ∀ (hNm : N ≤ m),
med_multiMassProb (fkProb (fvs_transBoxGraph d m v) p 2)
((t.image (innerEdgeLE d hNm)).image (Sym2.map (fvs_transEquiv d m v)))
= med_multiMassProb (fkProb (boxGraph d m) p 2) (t'.image (innerEdgeLE d hNm))) :
(freeInfiniteVolume d hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t.image (edgeIncl d N)))
= (freeInfiniteVolume d hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real
(cdc_multiOpenEvent (t'.image (edgeIncl d N)))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
noncomputable def med_multiMassProb (μ : ConfigSpace (Sym2 V) → ℝ) (t : Finset (Sym2 V)) : ℝ :=
∑ ω : ConfigSpace (Sym2 V),
(med_genericMultiOpenEvent t).indicator (fun _ => (1 : ℝ)) ω * μ ω
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:115
noncomputable def fkProb (p q : ℝ) (ω : ConfigSpace (Sym2 V)) : ℝ :=
fkWeight G p q ω / fkZ G p q
PhyslibExt/StatisticalMechanics/RandomCluster/RandomCluster.lean:172
def fvs_transBoxGraph (d m : ℕ) (v : Site d) : SimpleGraph (fvs_transBoxVerts d m v) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:334
def innerEdgeLE (d : ℕ) {n m : ℕ} (h : n ≤ m) : Sym2 (boxVerts d n) → Sym2 (boxVerts d m) :=
Sym2.map (boxVertInclLE d h)
PhyslibExt/StatisticalMechanics/RandomCluster/WiredDomChain.lean:424
noncomputable def fvs_transEquiv (d m : ℕ) (v : Site d) :
boxVerts d m ≃ fvs_transBoxVerts d m v where
toFun := fun x => ⟨(x : Site d) + v, by
change ((x : Site d) + v - v) ∈ box d m
rw [add_sub_cancel_right]; exact x.2⟩
invFun := fun y => ⟨(y : Site d) - v, y.2⟩
left_inv := by intro x; apply Subtype.ext; simp
right_inv := by intro y; apply Subtype.ext; simp
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:311
def boxGraph (d n : ℕ) : SimpleGraph (boxVerts d n) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:142
noncomputable def freeInfiniteVolume (d : ℕ) {p q : ℝ}
(hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) :
ProbabilityMeasure (ConfigSpace (Sym2 (Site d))) :=
(CompactSpace.tendsto_subseq (fun n => freeFiniteMeasure d n hp hp1 hq)).choose
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:199
Uses 20 · Used by 1
G. Placements and translation invariance
DefinitionWired placement for a shift via eventually equal box masses#✓fully proved
A wired placement for the shift g: every finite edge set s and its shift g⁻¹ s are
images of box edge sets t, t' of a common box Λ_N such that the wired mass of t + g in
g + Λ_m eventually equals the wired mass of t' in Λ_m. See also lmc_wiredPlacement.
def med_wiredPlacement {p : ℝ} (_hp : 0 < p) (_hp1 : p < 1) (g : Multiplicative (Site d)) : Prop :=
∀ s : Finset (Sym2 (Site d)),
∃ (N : ℕ) (t t' : Finset (Sym2 (boxVerts d N))),
s = t.image (edgeIncl d N)
∧ s.image (fun e => g⁻¹ • e) = t'.image (edgeIncl d N)
∧ (∀ᶠ m in atTop, ∀ (hNm : N ≤ m),
med_multiMassProb
(wiredFkProb (fvs_transBoxGraph d m (Multiplicative.toAdd g))
(fvs_transBoxBoundary d m (Multiplicative.toAdd g)) p 2)
((t.image (innerEdgeLE d hNm)).image
(Sym2.map (fvs_transEquiv d m (Multiplicative.toAdd g))))
= med_multiMassProb (wiredFkProb (boxGraph d m) (boxBoundary d m) p 2)
(t'.image (innerEdgeLE d hNm)))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
def edgeIncl (d n : ℕ) : Sym2 (boxVerts d n) → Sym2 (Site d) :=
Sym2.map (Subtype.val : boxVerts d n → Site d)
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:163
noncomputable def med_multiMassProb (μ : ConfigSpace (Sym2 V) → ℝ) (t : Finset (Sym2 V)) : ℝ :=
∑ ω : ConfigSpace (Sym2 V),
(med_genericMultiOpenEvent t).indicator (fun _ => (1 : ℝ)) ω * μ ω
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:115
noncomputable def wiredFkProb (p q : ℝ) (ω : ConfigSpace (Sym2 V)) : ℝ :=
wiredFkWeight G bdry p q ω / wiredFkZ G bdry p q
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:105
def fvs_transBoxGraph (d m : ℕ) (v : Site d) : SimpleGraph (fvs_transBoxVerts d m v) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:334
def fvs_transBoxBoundary (d m : ℕ) (v : Site d) (y : fvs_transBoxVerts d m v) : Prop :=
((y : Site d) - v) ∈ vertexBoundary d m
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:343
def innerEdgeLE (d : ℕ) {n m : ℕ} (h : n ≤ m) : Sym2 (boxVerts d n) → Sym2 (boxVerts d m) :=
Sym2.map (boxVertInclLE d h)
PhyslibExt/StatisticalMechanics/RandomCluster/WiredDomChain.lean:424
noncomputable def fvs_transEquiv (d m : ℕ) (v : Site d) :
boxVerts d m ≃ fvs_transBoxVerts d m v where
toFun := fun x => ⟨(x : Site d) + v, by
change ((x : Site d) + v - v) ∈ box d m
rw [add_sub_cancel_right]; exact x.2⟩
invFun := fun y => ⟨(y : Site d) - v, y.2⟩
left_inv := by intro x; apply Subtype.ext; simp
right_inv := by intro y; apply Subtype.ext; simp
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:311
def boxGraph (d n : ℕ) : SimpleGraph (boxVerts d n) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:142
def boxBoundary (d n : ℕ) (x : boxVerts d n) : Prop := (x : Site d) ∈ vertexBoundary d n
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:151
Uses 14 · Used by 1
DefinitionFree placement for a shift via eventually equal box masses#✓fully proved
A free placement for the shift g, defined as med_wiredPlacement with free masses.
def med_freePlacement {p : ℝ} (_hp : 0 < p) (_hp1 : p < 1) (g : Multiplicative (Site d)) : Prop :=
∀ s : Finset (Sym2 (Site d)),
∃ (N : ℕ) (t t' : Finset (Sym2 (boxVerts d N))),
s = t.image (edgeIncl d N)
∧ s.image (fun e => g⁻¹ • e) = t'.image (edgeIncl d N)
∧ (∀ᶠ m in atTop, ∀ (hNm : N ≤ m),
med_multiMassProb (fkProb (fvs_transBoxGraph d m (Multiplicative.toAdd g)) p 2)
((t.image (innerEdgeLE d hNm)).image
(Sym2.map (fvs_transEquiv d m (Multiplicative.toAdd g))))
= med_multiMassProb (fkProb (boxGraph d m) p 2) (t'.image (innerEdgeLE d hNm)))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev boxVerts (d n : ℕ) : Type := {x : Site d // x ∈ box d n}
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:131
def edgeIncl (d n : ℕ) : Sym2 (boxVerts d n) → Sym2 (Site d) :=
Sym2.map (Subtype.val : boxVerts d n → Site d)
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:163
noncomputable def med_multiMassProb (μ : ConfigSpace (Sym2 V) → ℝ) (t : Finset (Sym2 V)) : ℝ :=
∑ ω : ConfigSpace (Sym2 V),
(med_genericMultiOpenEvent t).indicator (fun _ => (1 : ℝ)) ω * μ ω
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:115
noncomputable def fkProb (p q : ℝ) (ω : ConfigSpace (Sym2 V)) : ℝ :=
fkWeight G p q ω / fkZ G p q
PhyslibExt/StatisticalMechanics/RandomCluster/RandomCluster.lean:172
def fvs_transBoxGraph (d m : ℕ) (v : Site d) : SimpleGraph (fvs_transBoxVerts d m v) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:334
def innerEdgeLE (d : ℕ) {n m : ℕ} (h : n ≤ m) : Sym2 (boxVerts d n) → Sym2 (boxVerts d m) :=
Sym2.map (boxVertInclLE d h)
PhyslibExt/StatisticalMechanics/RandomCluster/WiredDomChain.lean:424
noncomputable def fvs_transEquiv (d m : ℕ) (v : Site d) :
boxVerts d m ≃ fvs_transBoxVerts d m v where
toFun := fun x => ⟨(x : Site d) + v, by
change ((x : Site d) + v - v) ∈ box d m
rw [add_sub_cancel_right]; exact x.2⟩
invFun := fun y => ⟨(y : Site d) - v, y.2⟩
left_inv := by intro x; apply Subtype.ext; simp
right_inv := by intro y; apply Subtype.ext; simp
PhyslibExt/StatisticalMechanics/RandomCluster/FiniteVolumeShift.lean:311
def boxGraph (d n : ℕ) : SimpleGraph (boxVerts d n) :=
SimpleGraph.comap Subtype.val (hypercubicLattice d)
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:142
Uses 12 · Used by 1
LemmaWired translation invariance from wired placements of every shift#✓fully proved
The wired infinite-volume q = 2 measure is translation invariant if every shift has a wired
placement. See also flc_wiredIV_isTranslationInvariant, which proves invariance without
hypotheses.
lemma med_wiredIV_isTranslationInvariant_of_placement {p : ℝ} (hp : 0 < p) (hp1 : p < 1)
(hplace : ∀ g : Multiplicative (Site d), med_wiredPlacement hp hp1 g) :
ConfigSpace.IsTranslationInvariant (G := Multiplicative (Site d))
(wiredInfiniteVolume d hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d))))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def med_wiredPlacement {p : ℝ} (_hp : 0 < p) (_hp1 : p < 1) (g : Multiplicative (Site d)) : Prop :=
∀ s : Finset (Sym2 (Site d)),
∃ (N : ℕ) (t t' : Finset (Sym2 (boxVerts d N))),
s = t.image (edgeIncl d N)
∧ s.image (fun e => g⁻¹ • e) = t'.image (edgeIncl d N)
∧ (∀ᶠ m in atTop, ∀ (hNm : N ≤ m),
med_multiMassProb
(wiredFkProb (fvs_transBoxGraph d m (Multiplicative.toAdd g))
(fvs_transBoxBoundary d m (Multiplicative.toAdd g)) p 2)
((t.image (innerEdgeLE d hNm)).image
(Sym2.map (fvs_transEquiv d m (Multiplicative.toAdd g))))
= med_multiMassProb (wiredFkProb (boxGraph d m) (boxBoundary d m) p 2)
⋯
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:351
def IsTranslationInvariant (μ : Measure (ConfigSpace E)) : Prop :=
∀ g : G, MeasureTheory.MeasurePreserving (shift g : ConfigSpace E → ConfigSpace E) μ μ
MathlibExt/Probability/Configuration/Ergodicity.lean:89
noncomputable def wiredInfiniteVolume (d : ℕ) {p q : ℝ}
(hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) :
ProbabilityMeasure (ConfigSpace (Sym2 (Site d))) :=
(CompactSpace.tendsto_subseq (fun n => wiredFiniteMeasure d n hp hp1 hq)).choose
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:217
Uses 37
LemmaFree translation invariance from free placements of every shift#✓fully proved
The free infinite-volume q = 2 measure is translation invariant if every shift has a free
placement. See also bdp_freeIV_isTranslationInvariant, which proves invariance without
hypotheses.
lemma med_freeIV_isTranslationInvariant_of_placement {p : ℝ} (hp : 0 < p) (hp1 : p < 1)
(hplace : ∀ g : Multiplicative (Site d), med_freePlacement hp hp1 g) :
ConfigSpace.IsTranslationInvariant (G := Multiplicative (Site d))
(freeInfiniteVolume d hp hp1 (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d))))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def med_freePlacement {p : ℝ} (_hp : 0 < p) (_hp1 : p < 1) (g : Multiplicative (Site d)) : Prop :=
∀ s : Finset (Sym2 (Site d)),
∃ (N : ℕ) (t t' : Finset (Sym2 (boxVerts d N))),
s = t.image (edgeIncl d N)
∧ s.image (fun e => g⁻¹ • e) = t'.image (edgeIncl d N)
∧ (∀ᶠ m in atTop, ∀ (hNm : N ≤ m),
med_multiMassProb (fkProb (fvs_transBoxGraph d m (Multiplicative.toAdd g)) p 2)
((t.image (innerEdgeLE d hNm)).image
(Sym2.map (fvs_transEquiv d m (Multiplicative.toAdd g))))
= med_multiMassProb (fkProb (boxGraph d m) p 2) (t'.image (innerEdgeLE d hNm)))
PhyslibExt/StatisticalMechanics/RandomCluster/MultiEdgeDecay.lean:366
def IsTranslationInvariant (μ : Measure (ConfigSpace E)) : Prop :=
∀ g : G, MeasureTheory.MeasurePreserving (shift g : ConfigSpace E → ConfigSpace E) μ μ
MathlibExt/Probability/Configuration/Ergodicity.lean:89
noncomputable def freeInfiniteVolume (d : ℕ) {p q : ℝ}
(hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) :
ProbabilityMeasure (ConfigSpace (Sym2 (Site d))) :=
(CompactSpace.tendsto_subseq (fun n => freeFiniteMeasure d n hp hp1 hq)).choose
PhyslibExt/StatisticalMechanics/RandomCluster/InfiniteVolume.lean:199
Uses 35
Loading dependency explorer…
The dependency explorer needs JavaScript and its graph data.