2023-11-28 22:21:26 +01:00
|
|
|
module Main where
|
|
|
|
|
|
2023-11-29 22:58:49 +01:00
|
|
|
import qualified Data.Text as T
|
|
|
|
|
import Utils (readInput)
|
|
|
|
|
|
|
|
|
|
import qualified Day01
|
|
|
|
|
import qualified Day02
|
2023-11-28 22:21:26 +01:00
|
|
|
|
|
|
|
|
main :: IO ()
|
|
|
|
|
main = do
|
2023-11-29 22:58:49 +01:00
|
|
|
text <- readInput 1
|
|
|
|
|
putStrLn $ T.unpack text
|
