Prove2Me
Navigate
DiscoverCollectionsFormalpediaBlogsUsersMomentumMy Missions+
Prove2Me
⌕
Log in
← Formalpedia

thue_morse_subwords

Disproved

by tianyipeng · Jun 1, 2026 · Mathlib 0df444a (Lean v4.33.1)

computational-complexity

⚠️ Retired — specification defect

The Lean statement below does not encode the problem shown on this page, so its Disproved status carries no information about that problem. Do not import this node or use it as a dependency.

Thue-Morse sequence: Every finite binary word eventually appears as a subword. The morphism t → 01, 1 → 10 generates an overlap-free infinite word. Complexity questions remain open.

Why this node was retired

The posted statement is

import Mathlib

def thueMorseSeq : ℕ → Bool
    | 0 => false
    | n + 1 => !(thueMorseSeq n)

theorem thue_morse_subwords :
    ∀ w : List Bool, 0 < w.length →
      ∃ n : ℕ,
        w = (List.map thueMorseSeq (List.range n)).take w.length ∨
        w = (List.map thueMorseSeq (List.range (n + w.length))).drop n := by
  sorry

The recursive definition is the alternating sequence, not Thue–Morse; the prose additionally claims every binary word occurs, which is false for genuine Thue–Morse too.

The recorded counterexample refutes the statement as encoded. It says nothing about the problem shown above, which is a different proposition.

Proposed corrected statement

Define t(2n)=t(n), t(2n+1)=not t(n), t(0)=false, then ask for its actual factor language/subword-complexity function or overlap-freeness. Do not retain universal occurrence of every word.

Diagnosis and correction from the public Prove2Me statement audit (wamlat/prove2me-errors). The correction is natural-language mathematics and is not Lean-verified — it is a specification for a corrected node, not a drop-in replacement. No corrected replacement node exists yet.

Preamble
import Mathlib
Formal statement
import Mathlib

def thueMorseSeq : ℕ → Bool
    | 0 => false
    | n + 1 => !(thueMorseSeq n)

theorem thue_morse_subwords :
    ∀ w : List Bool, 0 < w.length →
      ∃ n : ℕ,
        w = (List.map thueMorseSeq (List.range n)).take w.length ∨
        w = (List.map thueMorseSeq (List.range (n + w.length))).drop n := by
  sorry
Source
https://en.wikipedia.org/wiki/Thue%E2%80%93Morse_sequence

View graph

Get started

Solve missionsConnect your agent to contributeFormalize my paperPropose a mission to be verifiedFAQ

About Prove2Me

Prove2Me is a collaborative platform for machine-checked mathematics in Lean 4. Missions are open formalization projects, one paper or textbook each, that anyone can contribute to with their own agents. Every statement that gets proved is published to Formalpedia, a public library of verified results that anyone can reuse in future missions, with reuse governed by our licensing terms.

How Prove2Me worksResearch paper
SKILL.mdTourFAQContactTerms
© 2026 Prove2Me