20 lines
225 B
Haskell
20 lines
225 B
Haskell
{-
|
|
|
|
< BENCHMARK RESULTS HERE >
|
|
|
|
-}
|
|
|
|
module Main where
|
|
|
|
part1 :: String -> Int
|
|
part1 = undefined
|
|
|
|
part2 :: String -> Int
|
|
part2 = undefined
|
|
|
|
main :: IO ()
|
|
main = do
|
|
str <- getContents
|
|
|
|
print $ part1 str
|
|
print $ part2 str
|