Balancing H-polytopes with a diameter-transfer map
ProvedHirsch.balanced_hpoly_transferLet be a nonempty bounded H-polytope cut out by linear inequalities . There exist an ambient dimension
(with natural-number subtraction) and a nonempty bounded H-polytope described by exactly inequalities, such that for every ,
In particular , and . When the construction pads tautological inequalities ; when it iterates a description-level Klee–Walkup wedge, replacing one inequality by and . Projection of the wedge sends vertices to vertices and edges to edges or points, so padded walks of a given length descend. The argument uses the given inequality description: redundant inequalities, lower-dimensional polytopes, and the zero-dimensional case are included.
This is formalization infrastructure for the classical wedge/-step reduction, not a new diameter bound. Combined with a polynomial bound on the balanced subfamily , it yields the unrestricted polynomial Hirsch conjecture with the same exponent.
Formalization Note The witnesses are an explicit H-description in EuclideanSpace ℝ (Fin D). Boundedness is Bornology.IsBounded. The identity uses Lean's truncated subtraction.
import Mathlib import Definitions.Def_Hirsch_model open scoped RealInnerProductSpace
namespace Hirsch
theorem balanced_hpoly_transfer (d n : ℕ)
(a : Fin n → EuclideanSpace ℝ (Fin d)) (b : Fin n → ℝ)
(hne : (Hpoly a b).Nonempty) (hbd : Bornology.IsBounded (Hpoly a b)) :
∃ (D : ℕ) (aQ : Fin (2 * D) → EuclideanSpace ℝ (Fin D)) (bQ : Fin (2 * D) → ℝ),
D = d + (n - 2 * d) ∧
(Hpoly aQ bQ).Nonempty ∧
Bornology.IsBounded (Hpoly aQ bQ) ∧
∀ L : ℕ, DiamLE (Hpoly aQ bQ) L → DiamLE (Hpoly a b) L := by sorry
end Hirsch