From 976048a85403fbb0751c34fa42703a3c47f6e918 Mon Sep 17 00:00:00 2001
From: DJ O'Leary <dijitol@proton.me>
Date: Sat, 27 Jun 2026 00:11:43 +0200
Subject: refactor!: change repo directory structure for ocaml

---
 ocaml/lib/application/d03p01.ml | 23 -----------------------
 1 file changed, 23 deletions(-)
 delete mode 100644 ocaml/lib/application/d03p01.ml

(limited to 'ocaml/lib/application/d03p01.ml')

diff --git a/ocaml/lib/application/d03p01.ml b/ocaml/lib/application/d03p01.ml
deleted file mode 100644
index 522f5d0..0000000
--- a/ocaml/lib/application/d03p01.ml
+++ /dev/null
@@ -1,23 +0,0 @@
-open Domain.D03p01
-
-let err_empty_input = "input is empty"
-
-let to_lines s =
-  s |> String.split_on_char '\n' |> List.map String.trim
-  |> List.filter (fun l -> l <> "")
-
-let solve input () =
-  if input = "" then Error err_empty_input
-  else
-    let answer =
-      input |> to_lines |> List.to_seq
-      |> Seq.map BatteryBank.of_string
-      |> Seq.mapi (fun idx bb ->
-          let joltage = BatteryBank.highest_joltage bb in
-          Logs.debug (fun m ->
-              m "%d line=%s highest_joltage=%d" (idx + 1) (BatteryBank.pp bb)
-                joltage ) ;
-          joltage )
-      |> Seq.fold_left ( + ) 0
-    in
-    Ok answer
-- 
cgit v1.2.3