From 40f7a8ee9abd9cb7c5471d0ca6dfae5782a63b8e Mon Sep 17 00:00:00 2001
From: George Thomas <georgefsthomas@gmail.com>
Date: Tue, 2 Dec 2025 14:27:14 +0000
Subject: [PATCH] Format

---
 app/Main.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/app/Main.hs b/app/Main.hs
index bbcbd27..ef63188 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -32,11 +32,11 @@ main =
 
 puzzleTest :: FilePath -> Puzzle -> TestTree
 puzzleTest t Puzzle{number, parser, parts} =
-            withResource (parseFile $ "inputs/" <> t <> "/" <> pt) mempty \input ->
-                testGroup pt $
-                    zip (map show [1 :: Int ..]) parts <&> \(n, pp) ->
-                        goldenVsString n ("outputs/" <> t <> "/" <> pt <> "/" <> n) $
-                            BL.fromStrict . encodeUtf8 . pp <$> input
+    withResource (parseFile $ "inputs/" <> t <> "/" <> pt) mempty \input ->
+        testGroup pt $
+            zip (map show [1 :: Int ..]) parts <&> \(n, pp) ->
+                goldenVsString n ("outputs/" <> t <> "/" <> pt <> "/" <> n) $
+                    BL.fromStrict . encodeUtf8 . pp <$> input
   where
     pt = show number
     parseFile fp =