From 121eba870e6faee3eb0985b53451c6a76e74a6c5 Mon Sep 17 00:00:00 2001
From: DJ O'Leary <dijitol@proton.me>
Date: Tue, 2 Dec 2025 00:09:58 +0100
Subject: feat(2025d1p2): implement solution to problem

---
 2025/ocaml/test/application/dune           |  3 ++-
 2025/ocaml/test/application/test_d01p02.ml | 21 +++++++++++++++++++++
 2 files changed, 23 insertions(+), 1 deletion(-)
 create mode 100644 2025/ocaml/test/application/test_d01p02.ml

(limited to '2025/ocaml/test/application')

diff --git a/2025/ocaml/test/application/dune b/2025/ocaml/test/application/dune
index fc384d8..53166ad 100644
--- a/2025/ocaml/test/application/dune
+++ b/2025/ocaml/test/application/dune
@@ -1,6 +1,7 @@
 (tests
  (names
-   test_d01p01)
+   test_d01p01
+   test_d01p02)
  (libraries
    application
    domain
diff --git a/2025/ocaml/test/application/test_d01p02.ml b/2025/ocaml/test/application/test_d01p02.ml
new file mode 100644
index 0000000..e29c932
--- /dev/null
+++ b/2025/ocaml/test/application/test_d01p02.ml
@@ -0,0 +1,21 @@
+open Application.D01p02
+
+let example_data = {|L68
+L30
+R48
+L5
+R60
+L55
+L1
+L99
+R14
+L82|}
+
+let test_full_given_example () =
+  Alcotest.(check int) "full given example" 6 (solve example_data ())
+
+let () =
+  let open Alcotest in
+  run "D01p02"
+    [ ( "given-example"
+      , [test_case "full given example" `Quick test_full_given_example] ) ]
-- 
cgit v1.2.3