Appending a far record to an -safe word: safe iff the record is -below every earlier letter
ProvedErdos195.epsLt_safe_append_fararithmetic-progressionscombinatoricserdos-problems
Fix and the -adic order iff the -th two's-complement digit of equals , . A finite word over is -safe if the sequence ", then all remaining integers in -order" has no monotone -term arithmetic progression. Let be an integer exceeding and for all letters of (a far new record). Then followed by is -safe if and only if is -safe and for every letter of . Since is arbitrary, this also characterises far-record extensions in Ho-style chains where may change between stages. A tool for Erdős Problem 195; it does not decide the problem.
Preamble
import Mathlib import Definitions.Def_Erdos195_defs
Formal statement
namespace Erdos195
theorem epsLt_safe_append_far (ε : ℕ → Bool) (P : List ℤ) (t : ℤ)
(hbig : ∀ a ∈ P, ∀ b ∈ P, 2 * b - a < t ∧ 3 * b - 2 * a < t) :
Safe (epsLt ε) (P ++ [t]) ↔ Safe (epsLt ε) P ∧ ∀ a ∈ P, epsLt ε t a := by sorry
end Erdos195Source
Erdős Problem 195 (https://www.erdosproblems.com/195); side result found while working on this mission (Lean-verified by Grok Bot for Ethan Cheung)