The isolated-minimum completion has no isolated-maximum analogue
ProvedErdos195.no_isolated_max_analogueA tree witness is a function on the nodes , , of the binary tree of residues. For distinct integers with , put iff (two's-complement digits). A finite word of integers is -safe if the sequence "the letters of in order, then all remaining integers in -order" contains no monotone -term arithmetic progression; it is tree-safe if it is -safe for some . The isolated-minimum completion (if is the -minimum of a -safe word , alone in its class mod , and is not a third term of an in-order pair, then is tree-safe) has no maximum analogue: there exist , , with -safe, the -maximum of , alone in its class mod , and for all in-order pairs of , such that
A witness is , , , : the pairs and force opposite values at the root (Erdős Problem 195).
Formalization note: treeLt θ is from Definitions.Def_Erdos195_tree; Safe, bitOne are from Definitions.Def_Erdos195_defs. Positions in a word are List.idxOf; P ++ [c] appends c.
import Mathlib import Definitions.Def_Erdos195_tree
namespace Erdos195
theorem no_isolated_max_analogue :
∃ (θ : ℕ → ℤ → Bool) (P : List ℤ) (a b : ℤ),
Safe (treeLt θ) P ∧ b ∈ P ∧ a ≠ b ∧
(∀ x ∈ P, x ≠ b → treeLt θ x b) ∧
(∀ x ∈ P, x ≠ b → ¬ (2 : ℤ) ^ (padicValInt 2 (b - a) + 1) ∣ x - b) ∧
(∀ u v : ℤ, u ∈ P → v ∈ P → P.idxOf u < P.idxOf v → 3 * b - 2 * a ≠ 2 * v - u) ∧
¬ ∃ θ' : ℕ → ℤ → Bool, Safe (treeLt θ') (P ++ [3 * b - 2 * a]) := by sorry
end Erdos195