Skip to content

Prove termination of (optimized) diff algorithm implementation #37

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
ninioArtillero merged 8 commits into from
Aug 12, 2026
Merged

Prove termination of (optimized) diff algorithm implementation #37

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
8 commits
Select commit Hold shift + click to select a range
8eba64a
Ignore `dstep` to prove `addsnake` termination
ninioArtillero May 6, 2026
607c8d3
Add a benchmark with a larger size difference between inputs
facundominguez Jul 9, 2026
2825ba1
Refactor/optimize `dstep` by narrowing wave front to edit grid
ninioArtillero May 6, 2026
6590d8e
Prove `dstep` reduces distance to goal
ninioArtillero May 6, 2026
572638c
Refactor `ses` to use wave-front wise search for the endpoint
ninioArtillero May 6, 2026
52f18d4
`ses` termination proof
ninioArtillero May 6, 2026
bc324f5
Move and reflect step functions in the top level to reduce spec
ninioArtillero Aug 3, 2026
733f983
Amend docs and rearrange module to isolate LH specific machinery
ninioArtillero Aug 10, 2026
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
11 changes: 7 additions & 4 deletions bench/bench.hs
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,10 @@ doBenchMarks seed =
let rbools = randoms (mkStdGen seed) :: [Bool]
(s1000_1, rbools1) = splitAt 1000 rbools
(s1000_2, rbools2) = splitAt 1000 rbools1
in s1000_1 `deepseq` s1000_2 `deepseq` defaultMain [
bgroup "diff bool lists" $ [bench "1000 bools" $ nf (getDiff s1000_1) s1000_2]
]

s500_2 = take 500 s1000_2
in (s1000_1, s1000_2, s500_2) `deepseq` defaultMain
[ bgroup "diff bool lists"
[ bench "1000 bools" $ nf (getDiff s1000_1) s1000_2
, bench "1000/500 bools" $ nf (getDiff s1000_1) s500_2
]
]
Loading
Loading