From 99de1c4d409203de40b51abe4f999b4d4a206e75 Mon Sep 17 00:00:00 2001
From: George Thomas <georgefsthomas@gmail.com>
Date: Tue, 6 Jan 2026 19:44:50 +0000
Subject: [PATCH] Add `pretty-simple` to prelude

---
 haskell/Main.hs | 1 -
 haskell/Pre.hs  | 2 ++
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/haskell/Main.hs b/haskell/Main.hs
index e804462..84c0572 100644
--- a/haskell/Main.hs
+++ b/haskell/Main.hs
@@ -15,7 +15,6 @@ import Puzzles.Day6 qualified as Day6
 import Puzzles.Day7 qualified as Day7
 import Puzzles.Day8 qualified as Day8
 import Puzzles.Day9 qualified as Day9
-import Text.Pretty.Simple (pPrintForceColor)
 
 main :: IO ()
 main = do
diff --git a/haskell/Pre.hs b/haskell/Pre.hs
index 002a0f5..e03416b 100644
--- a/haskell/Pre.hs
+++ b/haskell/Pre.hs
@@ -37,6 +37,7 @@ module Pre (
     module Text.Megaparsec,
     module Text.Megaparsec.Char,
     module Text.Megaparsec.Char.Lexer,
+    module Text.Pretty.Simple,
     Puzzle (..),
     digit,
     digitsToInt,
@@ -128,6 +129,7 @@ import Safe
 import Text.Megaparsec hiding (Pos, State, Stream, many, some)
 import Text.Megaparsec.Char
 import Text.Megaparsec.Char.Lexer (decimal)
+import Text.Pretty.Simple (pPrint, pPrintForceColor, pShow)
 
 data Puzzle = forall input outputs. (KnownNat (Length outputs), NFData input) => Puzzle
     { number :: Word