Left–right paths cross every column
DefinitionProjection of an induced open subgraph to the lattice#✓fully proved
The graph homomorphism from the open subgraph induced on R to the lattice ℤ²
(forgetting R).
def projHom (ω : ConfigSpace (Sym2 (Site 2))) (R : Set (Site 2)) :
(openSubgraphInduce 2 ω R) →g (hypercubicLattice 2) where
toFun := fun v => (v : Site 2)
map_rel' := by
intro a b hab
simp only [openSubgraphInduce_adj] at hab
exact openSubgraph_le ω hab
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 openSubgraphInduce (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (S : Set (Site d)) :
SimpleGraph S :=
(openSubgraph d ω).induce S
MathlibExt/Combinatorics/SimpleGraph/Lattice/Clusters.lean:120
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
DefinitionWalk in an induced open subgraph as a lattice walk#✓fully proved
A walk in the open subgraph induced on R, mapped to a walk in the lattice ℤ².
def liftWalk (ω : ConfigSpace (Sym2 (Site 2))) (R : Set (Site 2)) {x y : R}
(w : (openSubgraphInduce 2 ω R).Walk x y) :
(hypercubicLattice 2).Walk (x : Site 2) (y : Site 2) :=
w.map (projHom ω R)
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 openSubgraphInduce (d : ℕ) (ω : ConfigSpace (Sym2 (Site d))) (S : Set (Site d)) :
SimpleGraph S :=
(openSubgraph d ω).induce S
MathlibExt/Combinatorics/SimpleGraph/Lattice/Clusters.lean:120
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
def projHom (ω : ConfigSpace (Sym2 (Site 2))) (R : Set (Site 2)) :
(openSubgraphInduce 2 ω R) →g (hypercubicLattice 2) where
toFun := fun v => (v : Site 2)
map_rel' := by
intro a b hab
simp only [openSubgraphInduce_adj] at hab
exact openSubgraph_le ω hab
MathlibExt/Probability/Percolation/Universality/VSeparates.lean:47
DefinitionHalf-plane left of a column#✓fully proved
The half-plane {z ∈ ℤ² : z_0 ≤ k}.
def colLeq (k : ℤ) : Set (Site 2) := {z | z 0 ≤ k}
abbrev Site (d : ℕ) : Type := Fin d → ℤ
MathlibExt/Combinatorics/SimpleGraph/Lattice/HypercubicLattice.lean:55
Uses 1
Loading dependency explorer…
The dependency explorer needs JavaScript and its graph data.