/- Copyright 2026 The Formal Conjectures Authors. Licensed under the Apache License, Version 2.0 (the "License"); you may not use this file except in compliance with the License. You may obtain a copy of the License at https://www.apache.org/licenses/LICENSE-2.0 Unless required by applicable law or agreed to in writing, software distributed under the License is distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the License for the specific language governing permissions and limitations under the License. -/ import FormalConjectures.ErdosProblems.«170» import FormalConjecturesForMathlib.Combinatorics.Additive.DifferenceBasis

Sparse Ruler

A sparse ruler of length $L$ is a sequence of marks $0 = a_1 < a_2 < \dots < a_m = L$. A distance $k \in \mathbb{N}$ can be measured if there are $i, j \in {1, \dots, m}$, such that $k = a_j - a_i$.

One question concerns the structure of optimal rulers. Wichmann [Wi63] gave a parametric family of sparse rulers and conjectured that, beyond a small number of exceptions, every optimal ruler is of his type. The known exceptions occur at lengths $1, 13, 17, 23, 58$; the largest of these has $13$ segments, which motivates the bound below.

The asymptotic growth of the minimal number of marks of an optimal ruler of length $L$ — i.e. the limit of $l(n)^2 / n$, conjectured to lie in $[2.434\ldots, 3]$ — is the subject of FormalConjectures.ErdosProblems.«170» (there phrased via $F(N)/\sqrt{N}$), and is not restated here.

References:

    [Wi63] Wichmann, B. "A note on restricted difference bases." Journal of the London Mathematical Society 38 (1963): 465-466.

    Wikipedia

namespace SparseRuler

A ruler is described by its list of segment lengths (gaps) g, so that its marks are the partial sums $0 = m_0 < m_1 < \cdots < m_n = L$, where $n$ (g.length) is the number of segments and $L$ (g.sum) is the length.

def marks (g : List ) : Finset := (Finset.range (g.length + 1)).image (fun i => (g.take i).sum)

A ruler is complete (a perfect ruler) if its marks form a difference basis for ${0, 1, \ldots, L}$, i.e. every distance $k \le L$ is the difference of two marks. This is Finset.IsDifferenceBasis applied to the marks.

def IsComplete (g : List ) : Prop := (marks g).IsDifferenceBasis (Finset.range (g.sum + 1))

A complete ruler is minimal if no complete ruler of the same length $L$ has fewer marks (equivalently, fewer segments).

def IsMinimal (g : List ) : Prop := IsComplete g g' : List , IsComplete g' g'.sum = g.sum g.length g'.length

A complete ruler is maximal if no complete ruler with the same number of marks (equivalently, the same number of segments) has greater length.

def IsMaximal (g : List ) : Prop := IsComplete g g' : List , IsComplete g' g'.length = g.length g'.sum g.sum

A ruler is optimal if it is both minimal and maximal.

def IsOptimal (g : List ) : Prop := IsMinimal g IsMaximal g

The Wichmann ruler $W(r, s)$ [Wi63], given by its segment-length sequence $$1^r,; (r+1),; (2r+1)^r,; (4r+3)^s,; (2r+2)^{r+1},; 1^r,$$ where $a^b$ denotes $b$ consecutive segments of length $a$.

def wichmannGaps (r s : ) : List := List.replicate r 1 ++ [r + 1] ++ List.replicate r (2 * r + 1) ++ List.replicate s (4 * r + 3) ++ List.replicate (r + 1) (2 * r + 2) ++ List.replicate r 1

The Wichmann ruler $W(r, s)$ has $4r + s + 2$ segments, hence $4r + s + 3$ marks [Wi63].

@[category API, AMS 5] lemma wichmannGaps_length (r s : ) : (wichmannGaps r s).length = 4 * r + s + 2 := r:s:(wichmannGaps r s).length = 4 * r + s + 2 r:s:r + (0 + 1) + r + s + (r + 1) + r = 4 * r + s + 2 All goals completed! 🐙

The Wichmann ruler $W(r, s)$ has length $4r(r + s + 2) + 3(s + 1)$ [Wi63].

@[category API, AMS 5] lemma wichmannGaps_sum (r s : ) : (wichmannGaps r s).sum = 4 * r * (r + s + 2) + 3 * (s + 1) := r:s:(wichmannGaps r s).sum = 4 * r * (r + s + 2) + 3 * (s + 1) r:s:r * 1 + (r + 1 + 0) + r * (2 * r + 1) + s * (4 * r + 3) + (r + 1) * (2 * r + 2) + r * 1 = 4 * r * (r + s + 2) + 3 * (s + 1) All goals completed! 🐙

Wichmann's conjecture on optimal rulers. Every optimal ruler with more than $13$ segments is a Wichmann ruler $W(r, s)$ (up to reflection, i.e. reversing the segment list). Posed by Wichmann [Wi63]; the finitely many known exceptions all have at most $13$ segments (lengths $1, 13, 17, 23, 58$), and no further exceptions are known up to length $213$.

@[category research open, AMS 5] theorem declaration uses 'sorry'wichmann_conjecture {g : List } (hopt : IsOptimal g) (hseg : 13 < g.length) : r s : , g = wichmannGaps r s g = (wichmannGaps r s).reverse := g:List hopt:IsOptimal ghseg:13 < g.length r s, g = wichmannGaps r s g = (wichmannGaps r s).reverse All goals completed! 🐙 end SparseRuler