summaryrefslogtreecommitdiff
path: root/2025/ocaml/lib/presentation/cli.ml
diff options
context:
space:
mode:
authorDJ O'Leary <dijitol@proton.me>2025-12-01 14:24:35 +0100
committerDJ O'Leary <dijitol@proton.me>2025-12-01 14:24:35 +0100
commitc725cde0c8badeea5a2b720778a0d68c5054c9c9 (patch)
tree80fbfa9bbddaa049c88edaa7832b6a540748badb /2025/ocaml/lib/presentation/cli.ml
parent04dfeb70d2663b6e46fc29bc72a0fde2b65ed1e6 (diff)
feat(2025d1p1): implement application logic and apply to example
Diffstat (limited to '2025/ocaml/lib/presentation/cli.ml')
-rw-r--r--2025/ocaml/lib/presentation/cli.ml15
1 files changed, 14 insertions, 1 deletions
diff --git a/2025/ocaml/lib/presentation/cli.ml b/2025/ocaml/lib/presentation/cli.ml
index 08b1552..6344d07 100644
--- a/2025/ocaml/lib/presentation/cli.ml
+++ b/2025/ocaml/lib/presentation/cli.ml
@@ -1,6 +1,19 @@
+let day_1_example = {|L68
+L30
+R48
+L5
+R60
+L55
+L1
+L99
+R14
+L82|}
+
let run_day = function
| 1 ->
- Application.Day_1.run ()
+ let answer = Application.Day_1.solve day_1_example () in
+ Logs.app (fun m -> m "%d" answer) ;
+ 0
| _ ->
failwith "day not implemented"