summaryrefslogtreecommitdiff
path: root/2025/ocaml/lib/application/d04p01.ml
blob: 4bf38adce6ee77860ff7b5b273862081235f43b8 (plain)
1
2
3
4
let solve input () =
  let matrix = Domain.Matrix.M.of_string input in
  Logs.debug (fun m -> m "\n%s" @@ Domain.Matrix.M.pp (fun s -> s) matrix) ;
  0