warnings

glguy · Dec 11, 2023 · 3d09104 · 3d09104
1 parent 1f76bef
commit 3d09104
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/solutions/src/2023/11.hs b/solutions/src/2023/11.hs
@@ -30,7 +30,6 @@ module Main where
 
 import Advent (getInputLines, counts)
 import Advent.Coord (coordLines, Coord(C))
-import Data.List (inits, tails)
 import Data.Map (Map)
 import Data.Map qualified as Map
 
@@ -68,7 +67,7 @@ solve1' ::
   Int         {- ^ current location               -} ->
   [(Int,Int)] {- ^ remaining locations and counts -} ->
   Int         {- ^ total distances traveled       -}
-solve1' ex _ _ acc _ [] = acc
+solve1' _ _ _ acc _ [] = acc
 solve1' ex l r acc here ((there,m):xs) =
   solve1' ex (l+m) (r-m) (acc + crossings * distance) there xs
   where