No percolation below the q = 2 random-cluster critical point
A. Monotonicity of the percolation probability in p
LemmaWired box-boundary connection probability is monotone in \(p\) at \(q = 2\)#✓fully proved
For q = 2, the wired infinite-volume probability that the origin is connected to the boundary
of the box of radius n is monotone in p.
lemma tzp_fkTheta_iv_monotone_boxBdry (n : ℕ) {p₁ p₂ : ℝ}
(hp₁ : 0 < p₁) (hp₁' : p₁ < 1) (hp₂ : 0 < p₂) (hp₂' : p₂ < 1) (hle : p₁ ≤ p₂) :
(wiredInfiniteVolume d hp₁ hp₁' (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real (boxBdryConnEvent d n)
≤ (wiredInfiniteVolume d hp₂ hp₂' (by norm_num : (0 : ℝ) < 2)
: Measure (ConfigSpace (Sym2 (Site d)))).real (boxBdryConnEvent d n)
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 26 · Used by 1
LemmaMonotonicity of \(\theta^1(p, 2)\) in \(p\)#✓fully proved
For q = 2, the wired percolation probability θ¹(p, 2) is monotone in p.
lemma tzp_fkTheta_monotone_in_p {p₁ p₂ : ℝ}
(hp₁ : 0 < p₁) (hp₁' : p₁ < 1) (hp₂ : 0 < p₂) (hp₂' : p₂ < 1) (hle : p₁ ≤ p₂) :
fkTheta d hp₁ hp₁' (by norm_num : (0 : ℝ) < 2) (q := 2)
≤ fkTheta d hp₂ hp₂' (by norm_num : (0 : ℝ) < 2) (q := 2)
noncomputable def fkTheta (d : ℕ) {p q : ℝ} (hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) : ℝ :=
((wiredInfiniteVolume d hp hp1 hq : ProbabilityMeasure (ConfigSpace (Sym2 (Site d)))) :
Measure (ConfigSpace (Sym2 (Site d)))).real (percolationEvent d)
PhyslibExt/StatisticalMechanics/RandomCluster/CriticalPoint.lean:57
Uses 7 · Used by 4
B. No percolation below the critical point
LemmaNo percolation below the critical point at \(q = 2\)#✓fully proved
For q = 2, there is no percolation below the critical point: θ¹(p, 2) = 0 for p < p_c(2,
d).
lemma tzp_fkTheta_eq_zero_of_lt_pc {p : ℝ} (hp : 0 < p) (hp1 : p < 1)
(hpc : p < FK.fkPc d 2) :
FK.fkTheta d hp hp1 (by norm_num : (0 : ℝ) < 2) (q := 2) = 0
noncomputable def fkPc (d : ℕ) (q : ℝ) : ℝ :=
sSup (fkSubcriticalSet d q)
PhyslibExt/StatisticalMechanics/RandomCluster/CriticalPoint.lean:88
noncomputable def fkTheta (d : ℕ) {p q : ℝ} (hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) : ℝ :=
((wiredInfiniteVolume d hp hp1 hq : ProbabilityMeasure (ConfigSpace (Sym2 (Site d)))) :
Measure (ConfigSpace (Sym2 (Site d)))).real (percolationEvent d)
PhyslibExt/StatisticalMechanics/RandomCluster/CriticalPoint.lean:57
Uses 8 · Used by 4
LemmaNo percolation for \(p \le p_c\) at \(q = 2\), given \(\theta^1(p_c, 2) = 0\)#✓fully proved
For q = 2, if θ¹(p_c, 2) = 0, then θ¹(p, 2) = 0 for
every p ≤ p_c(2, d).
lemma tzp_fkTheta_eq_zero_of_le_pc_of_pc
(hθpc : ∀ (hp : 0 < FK.fkPc d 2) (hp1 : FK.fkPc d 2 < 1),
FK.fkTheta d hp hp1 (by norm_num : (0 : ℝ) < 2) (q := 2) = 0) :
∀ (p : ℝ) (hp : 0 < p) (hp1 : p < 1), p ≤ FK.fkPc d 2 →
FK.fkTheta d hp hp1 (by norm_num : (0 : ℝ) < 2) (q := 2) = 0
noncomputable def fkPc (d : ℕ) (q : ℝ) : ℝ :=
sSup (fkSubcriticalSet d q)
PhyslibExt/StatisticalMechanics/RandomCluster/CriticalPoint.lean:88
noncomputable def fkTheta (d : ℕ) {p q : ℝ} (hp : 0 < p) (hp1 : p < 1) (hq : 0 < q) : ℝ :=
((wiredInfiniteVolume d hp hp1 hq : ProbabilityMeasure (ConfigSpace (Sym2 (Site d)))) :
Measure (ConfigSpace (Sym2 (Site d)))).real (percolationEvent d)
PhyslibExt/StatisticalMechanics/RandomCluster/CriticalPoint.lean:57
Loading dependency explorer…
The dependency explorer needs JavaScript and its graph data.