From 0e2a3c81ac725e8a0a53edf950d4baf4fb45fe5f Mon Sep 17 00:00:00 2001
From: George Thomas <georgefsthomas@gmail.com>
Date: Tue, 9 Dec 2025 13:34:48 +0000
Subject: [PATCH] Correct error message

---
 haskell/Puzzles/Day9.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/haskell/Puzzles/Day9.hs b/haskell/Puzzles/Day9.hs
index 740cc15..a6b8aeb 100644
--- a/haskell/Puzzles/Day9.hs
+++ b/haskell/Puzzles/Day9.hs
@@ -13,7 +13,7 @@ puzzle =
             [ TL.show
                 . maximum
                 . fmap ((\(V2 x y) -> x * y) . (+ 1) . fmap abs . uncurry (-))
-                . fromMaybe (error "empty input")
+                . fromMaybe (error "input too small")
                 . nonEmpty
                 . allUnorderedPairs False
             ]