Féjer-monotone sequences relative to a full-dimensional set converge (Motzkin–Schoenberg)
ProvedHeldKarp.Ascent.fejer_monotone_convergesLet and let be a sequence in . The sequence is Féjer-monotone relative to if, for every , the Euclidean distances form a nonincreasing sequence in . If has full dimension, i.e. contains a neighbourhood of some point (nonempty interior), then every sequence that is Féjer-monotone relative to converges:
Held and Karp quote this result of Motzkin and Schoenberg (their reference [12]) in the proof of Lemma 3 and do not prove it; it is what turns the distance-decrease of Lemma 2 into convergence of the relaxation iteration.
Formalization Note Points are real vectors indexed by Fin d; monotonicity is stated for squared Euclidean distances (sums of squares), which is equivalent. Convergence is in the product topology, which on is the Euclidean topology.
import Mathlib open Filter Topology
namespace HeldKarp.Ascent
/-- **Convergence of Féjer-monotone sequences** (Motzkin–Schoenberg, quoted in the proof of
Lemma 3 of Held & Karp, *The traveling-salesman problem and minimum spanning trees: Part II*,
Math. Programming 1 (1971), §2, p. 12 (PDF p. 7), from their reference [12]; unnumbered):
"Let A be a point set and {y^m} a sequence of points. Then {y^m} is Féjer-monotone relative to A
if, for every x ∈ A, the sequence {‖y^m − x‖} is monotone nonincreasing. It is shown in [12] that,
if A is of full dimension (i.e., contains a neighborhood) then any sequence which is
Féjer-monotone relative to A converges."
Formalization Note: points are real `d`-vectors `Fin d → ℝ`; `‖·‖` is the Euclidean norm (as
everywhere in the paper), and monotonicity of `‖y^m − x‖` is stated for its square, a sum of
squares (equivalent). "Contains a neighborhood" is `(interior A).Nonempty`. Convergence is in the
product topology on `Fin d → ℝ`, which is the Euclidean topology. The paper cites this result and
does not prove it. -/
theorem fejer_monotone_converges {d : ℕ} (A : Set (Fin d → ℝ)) (hA : (interior A).Nonempty)
(y : ℕ → Fin d → ℝ) (hy : ∀ x ∈ A, Antitone (fun m => ∑ i, (y m i - x i) ^ 2)) :
∃ p : Fin d → ℝ, Tendsto y atTop (𝓝 p) := by sorry
end HeldKarp.Ascent
Confirmed by the mission captain (proposal self-audit).
Confirmed by the moderator at approval.