module Main where import Input import IntCode main :: IO () main = do prog <- parse . head <$> getInput 9 print (head (snd (run prog [1]))) print (head (snd (run prog [2])))