module Main where

import Commons
import Part1
import Part2

main = do games <- parse
          let part1Res = sum (Part1.getPossibleIds games)
          putStrLn (show (part1Res))
          let part2Res = sum (Part2.getPower games)
          putStrLn (show (part2Res))