module Part1 where

import Commons


getHashes :: [Instruction] -> [Int]
getHashes = foldr (\ h -> (:) (getHash (raw h) 0)) [0]