Counting connected contours
A. Failure of the origin bound
DefinitionTwo-site set \(\{0, p\}\)#✓fully proved
The two-site set {0, p}.
noncomputable def pcc_pairCluster (p : Site d) : Finset (Site d) := {origin d, p}
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def origin (d : ℕ) : Site d := fun _ => 0
PhyslibExt/CondensedMatter/IsingModel/Peierls.lean:195
Uses 2
B. Connected clusters
DefinitionNearest-neighbour graph restricted to a set#✓fully proved
The nearest-neighbour graph restricted to K.
noncomputable def latticeOn (K : Set (Site d)) : SimpleGraph (Site d) where
Adj x y := (hypercubicLattice d).Adj x y ∧ x ∈ K ∧ y ∈ K
symm := ⟨fun _ _ ⟨h1, h2, h3⟩ => ⟨h1.symm, h3, h2⟩⟩
loopless := ⟨fun _ h => (hypercubicLattice d).irrefl h.1⟩
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def hypercubicLattice (d : ℕ) : SimpleGraph (Site d) where
Adj := NearestNeighbour d
symm := ⟨fun _ _ h => nearestNeighbour_symm d h⟩
loopless := nearestNeighbour_irrefl d
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:76
Uses 2 · Used by 7
DefinitionConnected cluster through the origin in the nearest-neighbour graph#✓fully proved
K is connected in the nearest-neighbour graph.
def IsConnectedCluster (K : Finset (Site d)) : Prop :=
origin d ∈ K ∧ ∀ x ∈ K, (latticeOn (↑K : Set (Site d))).Reachable (origin d) x
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
def origin (d : ℕ) : Site d := fun _ => 0
PhyslibExt/CondensedMatter/IsingModel/Peierls.lean:195
noncomputable def latticeOn (K : Set (Site d)) : SimpleGraph (Site d) where
Adj x y := (hypercubicLattice d).Adj x y ∧ x ∈ K ∧ y ∈ K
symm := ⟨fun _ _ ⟨h1, h2, h3⟩ => ⟨h1.symm, h3, h2⟩⟩
loopless := ⟨fun _ h => (hypercubicLattice d).irrefl h.1⟩
PhyslibExt/CondensedMatter/IsingModel/PeierlsContourCount.lean:227
Uses 3 · Used by 8
DefinitionConnected clusters in the box containing the origin#✓fully proved
The connected finite sets of sites in Λ_n containing the origin.
noncomputable def connClusterFamily (n : ℕ) : Finset (Finset (Site d)) :=
(clusterFamily (d := d) n).filter (fun K => IsConnectedCluster K)
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
noncomputable def clusterFamily (n : ℕ) : Finset (Finset (Site d)) :=
(boxFinset d n).powerset
PhyslibExt/CondensedMatter/IsingModel/PeierlsContours.lean:422
def IsConnectedCluster (K : Finset (Site d)) : Prop :=
origin d ∈ K ∧ ∀ x ∈ K, (latticeOn (↑K : Set (Site d))).Reachable (origin d) x
PhyslibExt/CondensedMatter/IsingModel/PeierlsContourCount.lean:233
Uses 3 · Used by 8
DefinitionPeierls series bound on the connected-cluster contour sum#✓fully proved
The sum of e^{-2β |∂K|} over connected clusters is at most the Peierls series.
def ConnectedContourCountBound (d n : ℕ) (β : ℝ) : Prop :=
∑ K ∈ connClusterFamily (d := d) n,
Real.exp (-(2 * β) * (contourLen (↑K) (bondFinsetTouch d n) : ℝ))
≤ peierlsBound d β
noncomputable def connClusterFamily (n : ℕ) : Finset (Finset (Site d)) :=
(clusterFamily (d := d) n).filter (fun K => IsConnectedCluster K)
PhyslibExt/CondensedMatter/IsingModel/PeierlsContourCount.lean:237
noncomputable def contourLen (K : Set (Site d)) (B : Finset (Sym2 (Site d))) : ℕ :=
(crossEdges K B).card
PhyslibExt/CondensedMatter/IsingModel/PeierlsContours.lean:116
noncomputable def bondFinsetTouch (d n : ℕ) : Finset (Sym2 (Site d)) :=
(bondPairsTouch d n).image (fun p => s(p.1, p.2))
PhyslibExt/CondensedMatter/IsingModel/InfiniteVolume.lean:114
noncomputable def peierlsBound (d : ℕ) (β : ℝ) : ℝ :=
∑' ℓ : ℕ, (ℓ : ℝ) * (2 * d : ℝ) ^ ℓ * Real.exp (-(2 * β) * ℓ)
PhyslibExt/CondensedMatter/IsingModel/PeierlsCriterion.lean:71
Loading dependency explorer…
The dependency explorer needs JavaScript and its graph data.