ocaml: phase 5.1 twosum.ml baseline (LeetCode #1 one-pass hashmap, index sum = 5)
Some checks failed
Test, Build, and Deploy / test-build-deploy (push) Failing after 25s

Walks list with List.iteri, checking if target - x is already in
the hashtable; if yes, the earlier index plus current is the
answer; otherwise record the current pair.

  twosum [2;7;11;15] 9   = (0, 1)   2+7
  twosum [3;2;4]     6   = (1, 2)   2+4
  twosum [3;3]       6   = (0, 1)   3+3

Sum of i+j over each pair: 1 + 3 + 1 = 5.

Tests Hashtbl.find_opt + add (the iter-99 cleanup), List.iteri, and
tuple destructuring on let-binding (iter 98 'let (i, j) = twosum
... in').

63 baseline programs total.
This commit is contained in:
2026-05-09 13:15:05 +00:00
parent 50981a2a9b
commit 0eef5bc8e6
3 changed files with 29 additions and 0 deletions

View File

@@ -60,6 +60,7 @@
"zip_unzip.ml": 1000,
"sieve.ml": 15,
"sum_squares.ml": 385,
"twosum.ml": 5,
"unique_set.ml": 9,
"validate.ml": 417,
"word_count.ml": 3