fix(lean): clean up cleanMerge_preservesGap proof structure

Build: 3314 jobs, 0 errors (Compiler surface)
5 bridge sorries remain — each is list induction over 8-element Q16_16
lists showing zero/non-zero pattern ↔ byte bit positions.
This commit is contained in:
allaun 2026-06-22 13:57:06 -05:00
parent 158f10aa04
commit 67c9e72d00

View file

@ -239,11 +239,10 @@ private theorem gap_byte_pat :
boolGapPat p = byteGap (packPat p) := by
native_decide
/-- verifySpectralGap = boolGapPat ∘ boolPattern.
The activeBins indices = positions where pattern is true. -/
/-- verifySpectralGap = boolGapPat ∘ boolPattern. -/
private theorem gap_pat_bridge (sig : SpectralSignature) :
sig.verifySpectralGap = boolGapPat (boolPattern sig) := by
sorry -- list induction: activeBins ↔ set bits
sorry
/-- verifySpectralGap s = byteGap (pack s). -/
private theorem gap_bridge (sig : SpectralSignature) :