Exponential decay below the critical point
DefinitionBernoulli weight of a single edge#✓fully proved
The Bernoulli(p) weight of a single edge state: p for open, 1 - p for closed.
noncomputable def w1 (p : ℝ≥0) (hp : p ≤ 1) (b : Bool) : ℝ := (bernoulliMeasure p hp).real {b}
noncomputable def bernoulliMeasure (p : ℝ≥0) (hp : p ≤ 1) : Measure Bool :=
ProbabilityTheory.bernoulliMeasure true false ⟨p, p.2, hp⟩
MathlibExt/Probability/Configuration/ProductMeasure.lean:54
Uses 1 · Used by 4
DefinitionProduct weight of an edge configuration#✓fully proved
The product weight ∏_e w1(ω_e) of a configuration on a finite edge set.
noncomputable def W (p : ℝ≥0) (hp : p ≤ 1) (ω : ConfigSpace E) : ℝ := ∏ e, w1 p hp (ω e)
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
noncomputable def w1 (p : ℝ≥0) (hp : p ≤ 1) (b : Bool) : ℝ := (bernoulliMeasure p hp).real {b}
MathlibExt/Probability/Percolation/Exploration.lean:66
Uses 2 · Used by 4
DefinitionExpectation under Bernoulli product weights#✓fully proved
The expectation ∑_ω f(ω) W(ω) of f under the Bernoulli(p) product weights on a finite
edge set.
noncomputable def wsum (p : ℝ≥0) (hp : p ≤ 1) (f : ConfigSpace E → ℝ) : ℝ :=
∑ ω : ConfigSpace E, f ω * W p hp ω
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
noncomputable def W (p : ℝ≥0) (hp : p ≤ 1) (ω : ConfigSpace E) : ℝ := ∏ e, w1 p hp (ω e)
MathlibExt/Probability/Percolation/Exploration.lean:78
DefinitionOpen cluster of a site inside a set#✓fully proved
The open cluster C_S(o) of o inside S: sites of S joined to o by an open path in
S.
def clusterWithin (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (S : Set (Site d)) (o : Site d) :
Set (Site d) :=
{y | ∃ (hy : y ∈ S) (ho : o ∈ S), ConnectedWithin d ω S ⟨o, ho⟩ ⟨y, hy⟩}
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def ConnectedWithin (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (S : Set (Site d))
(x y : S) : Prop :=
(openSubgraphInduce d ω S).Reachable x y
MathlibExt/Combinatorics/SimpleGraph/Lattice/Clusters.lean:130
Uses 3 · Used by 3
DefinitionEdges from a subset into a set#✓fully proved
The set of edges {x, y} with x ∈ K and y ∈ S.
def incidentWithin (K S : Set (Site d)) : Set (Sym2 (Site d)) :=
{e | ∃ x ∈ K, ∃ y ∈ S, e = s(x, y)}
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
Uses 1 · Used by 2
DefinitionEvent that the cluster of the origin inside a set equals a given set#✓fully proved
The event {C_S(o) = K} that the open cluster of o inside S is exactly K.
def clusterEvent (d : ℕ) (S : Set (Site d)) (o : Site d) (K : Set (Site d)) :
Set (ConfigSpace (Sym2 (Site d))) :=
{ω | clusterWithin d ω S o = K}
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
def clusterWithin (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (S : Set (Site d)) (o : Site d) :
Set (Site d) :=
{y | ∃ (hy : y ∈ S) (ho : o ∈ S), ConnectedWithin d ω S ⟨o, ho⟩ ⟨y, hy⟩}
MathlibExt/Probability/Percolation/Exploration.lean:271
Uses 3 · Used by 2
DefinitionEdges joining a finite set to a region#✓fully proved
The finite set of edges {x, y} with x ∈ K and y ∈ S.
def incidentWithinFinset (K S : Finset (Site d)) : Finset (Sym2 (Site d)) :=
(K ×ˢ S).image (fun p => s(p.1, p.2))
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
Uses 1 · Used by 2
TheoremExploration independence of a cluster inside a set#✓fully proved
Exploration independence: for K ⊆ S finite and an event B depending only on edges in U,
disjoint from the edges between K and S, ℙ_p(C_S(o) = K, B) = ℙ_p(C_S(o) = K) ℙ_p(B).
theorem exploration_decomposition (p : ℝ≥0) (hp : p ≤ 1)
(S : Finset (Site d)) (o : Site d) (hoS : o ∈ (S : Set (Site d))) (K : Finset (Site d))
(B : Set (ConfigSpace (Sym2 (Site d)))) (U : Finset (Sym2 (Site d)))
(hdisj : Disjoint (incidentWithinFinset K S) U)
(hB : DependsOn (B.indicator (fun _ => (1 : ℝ))) (U : Set (Sym2 (Site d)))) :
(bernoulliProductMeasure (E := Sym2 (Site d)) p hp).real
(clusterEvent d (S : Set (Site d)) o (K : Set (Site d)) ∩ B)
= (bernoulliProductMeasure (E := Sym2 (Site d)) p hp).real
(clusterEvent d (S : Set (Site d)) o (K : Set (Site d)))
* (bernoulliProductMeasure (E := Sym2 (Site d)) p hp).real B
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
def incidentWithinFinset (K S : Finset (Site d)) : Finset (Sym2 (Site d)) :=
(K ×ˢ S).image (fun p => s(p.1, p.2))
MathlibExt/Probability/Percolation/Exploration.lean:376
noncomputable def bernoulliProductMeasure (p : ℝ≥0) (hp : p ≤ 1) :
Measure (ConfigSpace E) :=
Measure.infinitePi (fun _ : E => bernoulliMeasure p hp)
MathlibExt/Probability/Configuration/ProductMeasure.lean:85
def clusterEvent (d : ℕ) (S : Set (Site d)) (o : Site d) (K : Set (Site d)) :
Set (ConfigSpace (Sym2 (Site d))) :=
{ω | clusterWithin d ω S o = K}
MathlibExt/Probability/Percolation/Exploration.lean:354
Uses 20
DefinitionCrossing to the box exterior that avoids a cluster#✓fully proved
y ∉ C is joined by an open path avoiding C to a site outside Λ_{n-1}.
def offClusterCrossing (d : ℕ) (C : Set (Site d)) (y : Site d) (n : ℕ)
(ω : ConfigSpace (Sym2 (Site d))) : Prop :=
∃ v, v ∉ box d (n - 1) ∧ ∃ (hy : y ∉ C) (hv : v ∉ C),
ConnectedWithin d ω {z | z ∉ C} ⟨y, hy⟩ ⟨v, hv⟩
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
def box (d n : ℕ) : Set (Site d) := {x | ∀ i, (x i).natAbs ≤ n}
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:86
def ConnectedWithin (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (S : Set (Site d))
(x y : S) : Prop :=
(openSubgraphInduce d ω S).Reachable x y
MathlibExt/Combinatorics/SimpleGraph/Lattice/Clusters.lean:130
DefinitionOpen boundary edge of a cluster#✓fully proved
The edge {x, y} is open, with x ∈ C and y ∉ C.
def boundaryOpen (d : ℕ) (C : Set (Site d)) (x y : Site d)
(ω : ConfigSpace (Sym2 (Site d))) : Prop :=
x ∈ C ∧ y ∉ C ∧ IsOpenEdge d ω x y
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
def IsOpenEdge (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (x y : Site d) : Prop :=
(hypercubicLattice d).Adj x y ∧ ω s(x, y) = true
MathlibExt/Combinatorics/SimpleGraph/Lattice/Clusters.lean:45
Uses 3 · Used by 1
DefinitionCrossing inside the box that avoids a cluster#✓fully proved
y ∈ Λ_n \ C is joined by an open path inside Λ_n \ C to a site outside Λ_{n-1}.
def offClusterBoxCrossing (d : ℕ) (C : Set (Site d)) (y : Site d) (n : ℕ)
(ω : ConfigSpace (Sym2 (Site d))) : Prop :=
∃ z, z ∉ box d (n - 1) ∧ ∃ (hy : y ∈ box d n \ C) (hz : z ∈ box d n \ C),
ConnectedWithin d ω (box d n \ C) ⟨y, hy⟩ ⟨z, hz⟩
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
def box (d n : ℕ) : Set (Site d) := {x | ∀ i, (x i).natAbs ≤ n}
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:86
def ConnectedWithin (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (S : Set (Site d))
(x y : S) : Prop :=
(openSubgraphInduce d ω S).Reachable x y
MathlibExt/Combinatorics/SimpleGraph/Lattice/Clusters.lean:130
Uses 4 · Used by 1
DefinitionBox edges with no endpoint in a cluster#✓fully proved
The edges of Λ_n with no endpoint in C.
noncomputable def boxOffCEdges (d : ℕ) (C : Set (Site d)) (n : ℕ) :
Finset (Sym2 (Site d)) := by
classical
exact (edgesWithinFinset (boxFinset d n)).filter (fun e => ∀ z ∈ e, z ∉ C)
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
Uses 3 · Used by 1
DefinitionOne-arm event from the origin#✓fully proved
The event {0 ↔ ℤ^d \ Λ_{n-1}} that the origin is joined by an open path to a site outside
Λ_{n-1}.
def crossingEvent (d n : ℕ) : Set (ConfigSpace (Sym2 (Site d))) :=
{ω | ∃ v, Connected d ω (origin d) v ∧ v ∉ box d (n - 1)}
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def Connected (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (x y : Site d) : Prop :=
(openSubgraph d ω).Reachable x y
MathlibExt/Combinatorics/SimpleGraph/Lattice/Clusters.lean:75
def origin (d : ℕ) : Site d := fun _ => 0
MathlibExt/Probability/Percolation/Theta.lean:56
def box (d n : ℕ) : Set (Site d) := {x | ∀ i, (x i).natAbs ≤ n}
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:86
Uses 5 · Used by 17
p̃_c · Exponential decay from a one-step recursion · Sharpness of the phase transition, conditional form · Equality of the Duminil-Copin–Tassion threshold and \(p_c\) · Sharpness of the phase transition · Measurability of the percolation event · Wired probability that the origin connects to the outside of a box · Wired crossing probabilities converge to the percolation probability · Crossing events intersect to the percolation event · Box-boundary connection probability tends to percolation probability · Crossing probabilities converge to the percolation probability · Boundary connection inside \(\Lambda_n\) reaches outside \(\Lambda_{n-1}\) · Leaving \(\Lambda_n\) implies connecting to \(\partial\Lambda_n\) · Wired infinite-volume boundary connection tends to \(\theta^1(p, q)\)DefinitionOne-arm probability#✓fully proved
The one-arm probability ℙ_p(0 ↔ ℤ^d \ Λ_{n-1}).
noncomputable def crossProb (d : ℕ) (p : ℝ≥0) (hp : p ≤ 1) (n : ℕ) : ℝ :=
(bernoulliProductMeasure (E := Sym2 (Site d)) p hp).real (crossingEvent d n)
noncomputable def bernoulliProductMeasure (p : ℝ≥0) (hp : p ≤ 1) :
Measure (ConfigSpace E) :=
Measure.infinitePi (fun _ : E => bernoulliMeasure p hp)
MathlibExt/Probability/Configuration/ProductMeasure.lean:85
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def crossingEvent (d n : ℕ) : Set (ConfigSpace (Sym2 (Site d))) :=
{ω | ∃ v, Connected d ω (origin d) v ∧ v ∉ box d (n - 1)}
MathlibExt/Probability/Percolation/SubcriticalDecay.lean:56
Uses 4 · Used by 9
p̃_c · Exponential decay from a one-step recursion · Mean-field lower bound for \(\theta(p)\) from a differential inequality · One-arm probability as a function of a real density · Sharpness of the phase transition, conditional form · Equality of the Duminil-Copin–Tassion threshold and \(p_c\) · Exponential decay of the one-arm probability below the threshold · Sharpness of the phase transitionTheoremExponential decay from a one-step recursion#✓fully proved
If φ_p(S) < 1 and crossProb((k + 1)L) ≤ φ_p(S) · crossProb(kL) for all k, then
crossProb d p n ≤ C e^{-cn} for some c, C > 0.
theorem subcritical_decay (p : ℝ≥0) (hp : p ≤ 1) (S : Finset (Site d))
(_hS0 : origin d ∈ S) (hphi : phi d p hp S < 1)
(L : ℕ) (hL : 1 ≤ L)
(hstep : ∀ k, crossProb d p hp ((k + 1) * L) ≤ phi d p hp S * crossProb d p hp (k * L)) :
∃ c > 0, ∃ C > 0, ∀ n, crossProb d p hp n ≤ C * Real.exp (-c * n)
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def origin (d : ℕ) : Site d := fun _ => 0
MathlibExt/Probability/Percolation/Theta.lean:56
noncomputable def phi (d : ℕ) (p : ℝ≥0) (hp : p ≤ 1) (S : Finset (Site d)) : ℝ :=
(p : ℝ) * ∑ e ∈ boundaryEdges d S, connWithinProb d p hp S e.1
MathlibExt/Probability/Percolation/TildePc.lean:103
noncomputable def crossProb (d : ℕ) (p : ℝ≥0) (hp : p ≤ 1) (n : ℕ) : ℝ :=
(bernoulliProductMeasure (E := Sym2 (Site d)) p hp).real (crossingEvent d n)
MathlibExt/Probability/Percolation/SubcriticalDecay.lean:71
Uses 10
TheoremTranslation invariance of the Bernoulli product measure#✓fully proved
The Bernoulli product measure on {0, 1}^E is invariant under the shift action of G.
theorem bernoulli_translationInvariant (p : ℝ≥0) (hp : p ≤ 1) [Countable E] :
IsTranslationInvariant (G := G) (bernoulliProductMeasure (E := E) p hp)
def IsTranslationInvariant (μ : Measure (ConfigSpace E)) : Prop :=
∀ g : G, MeasureTheory.MeasurePreserving (shift g : ConfigSpace E → ConfigSpace E) μ μ
MathlibExt/Probability/Configuration/Ergodicity.lean:89
noncomputable def bernoulliProductMeasure (p : ℝ≥0) (hp : p ≤ 1) :
Measure (ConfigSpace E) :=
Measure.infinitePi (fun _ : E => bernoulliMeasure p hp)
MathlibExt/Probability/Configuration/ProductMeasure.lean:85
DefinitionOne-arm event from a shifted origin#✓fully proved
The event that y is joined by an open path to a site outside Λ_{n-1}.
def crossingEventFrom (d : ℕ) (y : Site d) (n : ℕ) : Set (ConfigSpace (Sym2 (Site d))) :=
{ω | ∃ v, Connected d ω y v ∧ v ∉ box d (n - 1)}
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
abbrev ConfigSpace (E : Type*) : Type _ := E → Bool
MathlibExt/Probability/Configuration/ConfigSpace.lean:40
def Connected (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (x y : Site d) : Prop :=
(openSubgraph d ω).Reachable x y
MathlibExt/Combinatorics/SimpleGraph/Lattice/Clusters.lean:75
def box (d n : ℕ) : Set (Site d) := {x | ∀ i, (x i).natAbs ≤ n}
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:86
Uses 4 · Used by 1
TheoremExponential decay below p̃_c#✓fully proved
Exponential decay below p̃_c (Duminil-Copin–Tassion 2016): if
φ_p(S) < 1 for some finite S ∋ 0, then ℙ_p(0 ↔ ℤ^d \ Λ_{n-1}) ≤ C e^{-cn} for some
c, C > 0.
theorem crossProb_exp_decay_of_phi_lt_one (p : ℝ≥0) (hp : p ≤ 1) (S : Finset (Site d))
(hoS : origin d ∈ (S : Set (Site d))) (hphi : phi d p hp S < 1)
(L : ℕ) (hL : 1 ≤ L) (hSbox : (S : Set (Site d)) ⊆ box d (L - 1)) :
∃ c > 0, ∃ C > 0, ∀ n, crossProb d p hp n ≤ C * Real.exp (-c * n)
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def origin (d : ℕ) : Site d := fun _ => 0
MathlibExt/Probability/Percolation/Theta.lean:56
noncomputable def phi (d : ℕ) (p : ℝ≥0) (hp : p ≤ 1) (S : Finset (Site d)) : ℝ :=
(p : ℝ) * ∑ e ∈ boundaryEdges d S, connWithinProb d p hp S e.1
MathlibExt/Probability/Percolation/TildePc.lean:103
def box (d n : ℕ) : Set (Site d) := {x | ∀ i, (x i).natAbs ≤ n}
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:86
noncomputable def crossProb (d : ℕ) (p : ℝ≥0) (hp : p ≤ 1) (n : ℕ) : ℝ :=
(bernoulliProductMeasure (E := Sym2 (Site d)) p hp).real (crossingEvent d n)
MathlibExt/Probability/Percolation/SubcriticalDecay.lean:71
Uses 43 · Used by 1
Loading dependency explorer…
The dependency explorer needs JavaScript and its graph data.