From 5999573723a40eeb74a2e9eaf0d4a461b01c3321 Mon Sep 17 00:00:00 2001
From: Amneesh Singh <natto@weirdnatto.in>
Date: Mon, 2 Dec 2024 19:36:14 +0530
Subject: [PATCH] rename executables

Signed-off-by: Amneesh Singh <natto@weirdnatto.in>
---
 aoc2024.cabal          | 8 ++++----
 src/{P1.hs => Day1.hs} | 5 ++---
 src/{P2.hs => Day2.hs} | 2 +-
 3 files changed, 7 insertions(+), 8 deletions(-)
 rename src/{P1.hs => Day1.hs} (84%)
 rename src/{P2.hs => Day2.hs} (96%)

diff --git a/aoc2024.cabal b/aoc2024.cabal
index 1003cc5..172489c 100644
--- a/aoc2024.cabal
+++ b/aoc2024.cabal
@@ -19,14 +19,14 @@ library libaoc
   build-depends:   containers
   exposed-modules: AoC
 
-executable p1
+executable day1
   import:         common
   hs-source-dirs: src
-  main-is:        P1.hs
+  main-is:        Day1.hs
   build-depends:  libaoc
 
-executable p2
+executable day2
   import:         common
   hs-source-dirs: src
-  main-is:        P2.hs
+  main-is:        Day2.hs
   build-depends:  libaoc
diff --git a/src/P1.hs b/src/Day1.hs
similarity index 84%
rename from src/P1.hs
rename to src/Day1.hs
index 0ead37a..7005ebe 100644
--- a/src/P1.hs
+++ b/src/Day1.hs
@@ -1,9 +1,8 @@
 module Main where
 
 import qualified AoC as A (count, extract)
-import Control.Monad (void)
 import Data.List (sort)
-import Text.Parsec (digit, eof, many1, newline, parse, sepEndBy1, space, try, (<|>))
+import Text.Parsec (digit, many1, newline, parse, sepEndBy1, space)
 import Text.Parsec.String (Parser)
 
 parseLists :: Parser ([Int], [Int])
@@ -28,7 +27,7 @@ part2 xs ys = sum $ map (\x -> x * A.count x ys) xs
 main :: IO ()
 main =
   do
-    raw <- readFile "./inputs/p1.in"
+    raw <- readFile "./inputs/day1.in"
     -- parse the input
     let (xs', ys') = A.extract $ parse parseLists "" raw
     -- sort the lists
diff --git a/src/P2.hs b/src/Day2.hs
similarity index 96%
rename from src/P2.hs
rename to src/Day2.hs
index e980517..34642b1 100644
--- a/src/P2.hs
+++ b/src/Day2.hs
@@ -29,7 +29,7 @@ part2 = length . filter dampSafe
 main :: IO ()
 main =
   do
-    raw <- readFile "./inputs/p2.in"
+    raw <- readFile "./inputs/day2.in"
     -- parse the input
     let reports = A.extract $ parse parseReports "" raw
     putStr "Part 1: " >> print (part1 reports)