Upper bound theorem for simplicial spheres
AbbreviationEuclidean space \(\mathbb{R}^d\)#✓fully proved
For a natural number \(d\), the real Euclidean space \(\mathbb{R}^d\) of dimension \(d\) with its standard inner product; it is the ambient space of a \((d-1)\)-dimensional sphere.
abbrev E (d : ℕ) := EuclideanSpace ℝ (Fin d)
Definitionh-vector of the cyclic polytope#✓fully proved
For natural numbers \(n\), \(d\) and \(j\), let \(m = \min(j, d - j)\); the value is \(\binom{n - d - 1 + m}{m}\), where subtraction is truncated at \(0\). For \(n \ge d + 1\) and \(j \le d\) this is the entry \(h_j\) of the h-vector of the cyclic polytope \(C(n, d)\), namely \(h_j = \binom{n-d-1+j}{j}\) for \(j \le d/2\) and \(h_j = h_{d-j}\) otherwise. For \(j > d\) the value is \(1\).
def cyclicH (n d j : ℕ) : ℕ :=
Nat.choose (n - d - 1 + min j (d - j)) (min j (d - j))
Used by 1
DefinitionFace numbers of the cyclic polytope#✓fully proved
For natural numbers \(n\), \(d\) and \(k\), the value is
where subtraction is truncated at \(0\). The second binomial coefficient is the cyclic polytope h-vector entry \(h_j\), so for \(k < d\) and \(n \ge d + 1\) this sum is the inverse h-to-f transform of the h-vector of the cyclic polytope \(C(n, d)\), that is, the number of \(k\)-dimensional faces of \(C(n, d)\).
def cyclicPolytopeFaceCount (n d k : ℕ) : ℕ :=
∑ j ∈ Finset.range (k + 2),
Nat.choose (d - j) (k + 1 - j) * cyclicH n d j
def cyclicH (n d j : ℕ) : ℕ :=
Nat.choose (n - d - 1 + min j (d - j)) (min j (d - j))
WantedExt/Combinatorics/UpperBoundSimplicialSpheresWanted.lean:89
Uses 1 · Used by 1
TheoremUpper bound theorem for simplicial spheres#●ready to prove
Let \(d\), \(n\) and \(k\) be natural numbers with \(k < d\), and let \(X\) be a finite simplicial \((d-1)\)-sphere, that is, a finite geometric simplicial complex in \(\mathbb{R}^d\) whose underlying space is homeomorphic to the unit sphere of \(\mathbb{R}^d\). If \(X\) has \(n\) vertices, then the number of \(k\)-dimensional faces of \(X\) (faces with \(k + 1\) vertices) is at most
with subtraction truncated at \(0\); for \(n \ge d + 1\) this is the number of \(k\)-dimensional faces of the cyclic polytope \(C(n, d)\).
public theorem_wanted upper_bound_theorem_simplicial_spheres
{d n k : ℕ} (X : FiniteSimplicialSphere d)
(_hn : faceCount X 0 = n) (_hk : k < d) :
faceCount X k ≤ cyclicPolytopeFaceCount n d k
structure FiniteSimplicialSphere (d : ℕ) where
K : Geometry.SimplicialComplex ℝ (EuclideanSpace ℝ (Fin d))
finite_faces : K.faces.Finite
sphere_homeomorph :
Nonempty (K.space ≃ₜ Metric.sphere (0 : EuclideanSpace ℝ (Fin d)) 1)
WantedExt/Combinatorics/SimplicialSphereShared.lean:43
noncomputable def faceCount {d : ℕ} (X : FiniteSimplicialSphere d) (k : ℕ) : ℕ :=
{s : Finset (EuclideanSpace ℝ (Fin d)) | s ∈ X.K.faces ∧ s.card = k + 1}.ncard
WantedExt/Combinatorics/SimplicialSphereShared.lean:50
def cyclicPolytopeFaceCount (n d k : ℕ) : ℕ :=
∑ j ∈ Finset.range (k + 2),
Nat.choose (d - j) (k + 1 - j) * cyclicH n d j
WantedExt/Combinatorics/UpperBoundSimplicialSpheresWanted.lean:93
Sources
- R.P. Stanley, 'The upper bound conjecture and Cohen–Macaulay rings', Studies in Appl. Math. 54 (1975) 135–142. Conjecture: T.S. Motzkin (1957); polytope case: P. McMullen, 'The maximum numbers of faces of a convex polytope', Mathematika 17 (1970) 179–184. §142 in O. Knill, Some Fundamental Theorems in Mathematics (https://people.math.harvard.edu/~knill/graphgeometry/papers/fundamental.pdf). Problem
upper_bound_simplicial_spheresof the lean-eval benchmark.
Uses 3
Loading dependency explorer…
The dependency explorer needs JavaScript and its graph data.