diff --git a/2020/day03/day03.hs b/2020/day03/day03.hs
index 61d7271..5c5e8e3 100644
--- a/2020/day03/day03.hs
+++ b/2020/day03/day03.hs
@@ -1,7 +1,7 @@
 main :: IO ()
 main = do
   input <- map (concat . repeat) . lines <$> readFile "input"
-  print $ day3 input ((3,1))
+  print $ day3 input (3,1)
   let slopes = [(1,1),(3,1),(5,1),(7,1),(1,2)]
   print $ product $ map (day3 input) slopes