From f0648b62674f054df9df20f9e875099c547329e4 Mon Sep 17 00:00:00 2001
From: Matthew Gretton-Dann <matt@gretton-dann.org.uk>
Date: Tue, 3 Dec 2024 08:08:32 +0000
Subject: [PATCH] Correct part numbers

---
 lib/aoc.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/aoc.ml b/lib/aoc.ml
index 05a23c4..a5b537e 100644
--- a/lib/aoc.ml
+++ b/lib/aoc.ml
@@ -10,7 +10,7 @@ let main prep parts =
     | [| _; fname |] ->
         let lines = prep fname in
         let do_part i (fmt, fn) =
-          Printf.printf "Part %d = %s\n" i (fmt (fn lines))
+          Printf.printf "Part %d = %s\n" (i + 1) (fmt (fn lines))
         in
         List.iteri do_part parts;
         exit 0