summaryrefslogtreecommitdiff
path: root/2025/ocaml/test/application
diff options
context:
space:
mode:
authorDJ O'Leary <dijitol@proton.me>2025-12-02 00:09:58 +0100
committerDJ O'Leary <dijitol@proton.me>2025-12-02 00:09:58 +0100
commit121eba870e6faee3eb0985b53451c6a76e74a6c5 (patch)
treea7a05c04df4902595b80abfdf3eff53a7d348c81 /2025/ocaml/test/application
parent6174e9bb0eeddb57f50c31d6de67c6327f4f39c7 (diff)
feat(2025d1p2): implement solution to problem
Diffstat (limited to '2025/ocaml/test/application')
-rw-r--r--2025/ocaml/test/application/dune3
-rw-r--r--2025/ocaml/test/application/test_d01p02.ml21
2 files changed, 23 insertions, 1 deletions
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] ) ]