Plane-section recurrence for facet access:
OpenHirsch.section_access_recurrenceLet () be a bounded simple H-polytope with rows, all with nonzero normal, let be a vertex and a row met by . Suppose every bounded H-polytope in with rows has facet access at most : from any vertex, some vertex on any given nonempty row is reachable by a padded walk of length . Then some vertex of on row is reachable from by a padded walk of length .
Proof idea. A generic 2-plane through and a relative interior point of the face of row cuts in a convex polygon with at most sides, each in a facet of , with a vertex and an edge on row . Consecutive sides lie in facets sharing a vertex of the polygon, hence (by simplicity) sharing a ridge. The shorter boundary arc gives a dual path of at most facets from a facet through to row ; lifting each dual step costs one -dimensional facet access inside the current facet, via Hirsch.facet_walk.
This is a geometric recurrence unavailable in the connected-layer-family abstraction (it uses convexity of plane sections). It is sharp in dimension two and unfolds to , so it does not by itself give a uniform polynomial.
Formalization Note Simplicity is assumed through the tight-row count; the general case reduces to it by the platform's push/perturbation lemmas (Hirsch.spindle_prepare_row_simple).
import Mathlib import Definitions.Def_Hirsch_model import Definitions.Def_Hirsch_walk open scoped RealInnerProductSpace
namespace Hirsch
theorem section_access_recurrence (d n : ℕ) (hd : 2 ≤ d)
(A : ℕ)
(IH : ∀ (a' : Fin (n - 1) → EuclideanSpace ℝ (Fin (d - 1))) (b' : Fin (n - 1) → ℝ),
Bornology.IsBounded (Hpoly a' b') →
∀ u' ∈ Set.extremePoints ℝ (Hpoly a' b'),
∀ i' : Fin (n - 1), a' i' ≠ 0 → (∃ x' ∈ Hpoly a' b', ⟪a' i', x'⟫ = b' i') →
∃ z' ∈ Set.extremePoints ℝ (Hpoly a' b'), ⟪a' i', z'⟫ = b' i' ∧ Reach (Hpoly a' b') A u' z')
(a : Fin n → EuclideanSpace ℝ (Fin d)) (b : Fin n → ℝ)
(hbd : Bornology.IsBounded (Hpoly a b)) (hane : ∀ i, a i ≠ 0)
(hsimple : ∀ x ∈ Set.extremePoints ℝ (Hpoly a b),
(Finset.univ.filter (fun i : Fin n => ⟪a i, x⟫ = b i)).card = d)
(u : EuclideanSpace ℝ (Fin d)) (hu : u ∈ Set.extremePoints ℝ (Hpoly a b))
(i : Fin n) (hi : ∃ x ∈ Hpoly a b, ⟪a i, x⟫ = b i) :
∃ z ∈ Set.extremePoints ℝ (Hpoly a b), ⟪a i, z⟫ = b i ∧
Reach (Hpoly a b) ((n / 2) * A) u z := by sorry
end Hirsch