13 lines
247 B
Haskell
13 lines
247 B
Haskell
module Main where
|
|
|
|
import Commons
|
|
import Part1
|
|
import Part2
|
|
|
|
|
|
main = do games <- parse
|
|
let part1Res = sum $ Part1.getPossibleIds games
|
|
print part1Res
|
|
let part2Res = sum $ Part2.getPower games
|
|
print part2Res
|