A spindle can be pushed to be row-simple away from its apices
ProvedHirsch.spindle_prepare_row_simpleLet be a bounded spindle with apices (every row tight at exactly one of them), , and no padded walk of length from to . Then there are normals with all right-hand sides such that is bounded, still a spindle with the same apices , every vertex other than has exactly tight rows, and there is still no padded walk of length from to .
This is the preprocessing Santos performs before the final perturbation in the proof of Theorem 2.6 ('if that is not the case, we first push to a generic point'). Rows tight at are pushed one at a time by convex combinations within the hyperplane , likewise at ; each push is a graph contraction by the pushing lemma, so walk lower bounds are preserved, and a finite polynomial-avoidance argument makes every mixed -subset of augmented rows nonsingular, which forces row-simplicity away from the apices. Redundant rows are allowed throughout.
import Mathlib import Definitions.Def_Hirsch_model open scoped RealInnerProductSpace open WithLp EuclideanSpace
namespace Hirsch
theorem spindle_prepare_row_simple
(d n : ℕ) (hd : 0 < d)
(a : Fin n → EuclideanSpace ℝ (Fin d)) (b : Fin n → ℝ)
(u v : EuclideanSpace ℝ (Fin d)) (hb : ∀ i, 0 < b i)
(hbd : Bornology.IsBounded (Hpoly a b))
(hu : u ∈ Set.extremePoints ℝ (Hpoly a b))
(hv : v ∈ Set.extremePoints ℝ (Hpoly a b))
(hsp : ∀ i, (⟪a i, u⟫ = b i) ↔ ⟪a i, v⟫ ≠ b i)
(hlong : ∀ w : ℕ → EuclideanSpace ℝ (Fin d),
¬ (w 0 = u ∧ w d = v ∧
∀ l < d, w l = w (l + 1) ∨ Adj (Hpoly a b) (w l) (w (l + 1)))) :
∃ a0 : Fin n → EuclideanSpace ℝ (Fin d),
Bornology.IsBounded (Hpoly a0 (fun _ => 1)) ∧
u ∈ Set.extremePoints ℝ (Hpoly a0 (fun _ => 1)) ∧
v ∈ Set.extremePoints ℝ (Hpoly a0 (fun _ => 1)) ∧
(∀ i, (⟪a0 i, u⟫ = 1) ↔ ⟪a0 i, v⟫ ≠ 1) ∧
(∀ x ∈ Set.extremePoints ℝ (Hpoly a0 (fun _ => 1)),
x ≠ u → x ≠ v →
(Finset.univ.filter (fun i : Fin n => ⟪a0 i, x⟫ = 1)).card = d) ∧
∀ w : ℕ → EuclideanSpace ℝ (Fin d),
¬ (w 0 = u ∧ w d = v ∧
∀ l < d, w l = w (l + 1) ∨
Adj (Hpoly a0 (fun _ => 1)) (w l) (w (l + 1))) := by sorry
end Hirsch