From 14ba05fc6c24af5fe477a4f79ea0bc2a3f1ff6f7 Mon Sep 17 00:00:00 2001
From: Victor Martinez <49537445+JasterV@users.noreply.github.com>
Date: Wed, 12 Mar 2025 01:22:59 +0100
Subject: [PATCH] format

---
 src/Day1.hs | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/Day1.hs b/src/Day1.hs
index d8ceb57..be69493 100644
--- a/src/Day1.hs
+++ b/src/Day1.hs
@@ -27,10 +27,8 @@ partOne :: String -> IO (Either Error Int)
 partOne filepath = do
   result <- try (readFile filepath)
   case result of
-    Left readError ->
-      return $ Left (ReadFileError filepath readError)
-    Right contents ->
-      return $ calculateScore <$> BF.first ParseInputError (parseInput contents)
+    Left readError -> return $ Left (ReadFileError filepath readError)
+    Right contents -> return $ calculateScore <$> BF.first ParseInputError (parseInput contents)
   where
     -- To calculate the overall score we just need to
     -- sort the lists and calculate the distances between each element