Rename functions to be more idiomatic.

2024-12-03 08:53:02 +00:00
parent 5d99f413de
commit 2ee7f6a3d3
5 changed files with 13 additions and 14 deletions
--- a/bin/day2403.ml
+++ b/bin/day2403.ml
@@ -22,7 +22,7 @@ let instrs_of_string s =
  List.rev (impl [] 0)

 let instrs_of_file fname =
-  Aoc.strings_from_file fname |> List.map instrs_of_string |> List.concat
+  Aoc.strings_of_file fname |> List.map instrs_of_string |> List.concat

 (** [mac_opt acc a b] returns [acc + a' * b'] if [a = Some a'] and 
    [b = Some b'].  If either [a] or [b] are [None] then the result is [acc]. *)