The word is tree-safe and a true root release
ProvedErdos195.minus1_batch_safe_releasedA 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. An in-order pair of ( occurs before ) is open if and ; it lies at the node , , and forces there to equal . A root pair is one with odd (node ); is a true root release if every open root pair has even second entry, i.e. no open pair forces the value at the root. The ten-letter word is -safe for some tree witness and is a true root release. It extends the base word by a batch that contains the negative letter .
Formalization note: treeLt θ is from Definitions.Def_Erdos195_tree; Safe, bitOne are from Definitions.Def_Erdos195_defs. Positions are List.idxOf; the release property is stated as: every open in-order pair with has .
import Mathlib import Definitions.Def_Erdos195_tree
namespace Erdos195
theorem minus1_batch_safe_released :
let Q : List ℤ := [0, 1, 6, 3, -8, -2, -1, -70, -78, -36]
(∃ θ : ℕ → ℤ → Bool, Safe (treeLt θ) Q) ∧
∀ a b : ℤ, a ∈ Q → b ∈ Q → Q.idxOf a < Q.idxOf b → 2 * b - a ∉ Q → 3 * b - 2 * a ∉ Q →
(b - a) % 2 = 1 → b % 2 = 0 := by sorry
end Erdos195