Cubical Sperner lemma: a fully labelled small grid simplex exists
ProvedPlasticity.Ext.Brouwer.spernerLet label the grid with numbers such that a point whose -th coordinate is does not carry label , and a point whose -th coordinate is carries a label at most . Then there are grid points , any two within of each other in every coordinate, that carry all the labels .
Applied to finer and finer grids, it gives Brouwer's fixed-point theorem for the cube.
Preamble
import Mathlib.Data.Fin.Basic
Formal statement
namespace Plasticity.Ext.Brouwer
theorem sperner (n p : ℕ) (L : (Fin n → Fin (p + 1)) → ℕ)
(hL : ∀ v, L v ≤ n ∧ ∀ k : Fin n, (v k = 0 → L v ≠ k.1) ∧ (v k = Fin.last p → L v ≤ k.1)) :
∃ I : Fin (n + 1) → (Fin n → Fin (p + 1)),
(∀ a b k, (I a k : ℕ) ≤ (I b k : ℕ) + 1) ∧ ∀ c ≤ n, ∃ a, L (I a) = c := by sorry
end Plasticity.Ext.BrouwerSource
H. W. Kuhn, Some combinatorial lemmas in topology, IBM J. Res. Dev. 4 (1960), 518–524; ported from harfe/fixed-point-theorems-lean4 (MIT)