From b89219e387ff00005c1011fe09ce40e97ed0cc29 Mon Sep 17 00:00:00 2001 From: Amneesh Singh Date: Sun, 17 Dec 2023 17:33:49 +0530 Subject: [PATCH] day 9: remove imports Signed-off-by: Amneesh Singh --- day09.hs | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/day09.hs b/day09.hs index 0a7948d..ab09a4d 100644 --- a/day09.hs +++ b/day09.hs @@ -1,17 +1,13 @@ -import Data.Either (rights) -import Data.Map qualified as M import Data.Text qualified as T -import Data.Text.Read qualified as TR import Lib (readFile', tRead) -import Text.Parsec main :: IO () main = do input <- map (map tRead . T.words) . T.lines <$> readFile' "day09.in" - + putStr "Q1: " print . sum $ map (sum . map last . extrap) input - + putStr "Q2: " print . sum $ map (sum . map last . extrap . reverse) input