Compulsory witnesses for target-last absorption of after : and capped power-of-3 rays
ProvedErdos195.target_last_capsA tree witness is a function on the nodes , , of the binary tree of residues. For distinct integers with , put iff . 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. For letters before in , the pair is OPEN if neither nor occurs in . Let be any tree witness and let be a -safe word with . Then and . Moreover, both rays of powers of are capped by a double placed earlier: there are with
These are compulsory small witnesses for any target-last absorption of after . In particular such a word has an even letter and an even letter .
Formalization note: treeLt θ is from Definitions.Def_Erdos195_tree, and Safe is from Definitions.Def_Erdos195_defs. Positions are List.idxOf; the word is written (0 :: 1 :: -1 :: rest) ++ [2], and the hypothesis makes the last letter and its only occurrence.
import Mathlib import Definitions.Def_Erdos195_tree
namespace Erdos195
theorem target_last_caps (θ : ℕ → ℤ → Bool) (A rest : List ℤ)
(hA : A = (0 :: 1 :: -1 :: rest) ++ [2]) (h2 : (2 : ℤ) ∉ rest)
(hS : Safe (treeLt θ) A) :
(-3 : ℤ) ∈ A ∧ (-5 : ℤ) ∈ A ∧
(∃ m : ℕ, 1 ≤ m ∧ (3 : ℤ) ^ m ∈ A ∧ (3 : ℤ) ^ (m + 1) ∉ A ∧ 2 * (3 : ℤ) ^ m ∈ A ∧
A.idxOf (2 * (3 : ℤ) ^ m) < A.idxOf ((3 : ℤ) ^ m)) ∧
(∃ n : ℕ, 1 ≤ n ∧ -(3 : ℤ) ^ n ∈ A ∧ -(3 : ℤ) ^ (n + 1) ∉ A ∧ -2 * (3 : ℤ) ^ n ∈ A ∧
A.idxOf (-2 * (3 : ℤ) ^ n) < A.idxOf (-(3 : ℤ) ^ n)) := by sorry
end Erdos195