applyHash :: String -> Int -> ByteString
applyHash prefix x = hash . Data.ByteString.Char8.pack $ prefix ++ show x
applyHash :: String -> Int -> ByteString
applyHash prefix x = hash . Data.ByteString.Char8.pack $ prefix ++ show x
applyHash prefix x = hash . Data.ByteString.Char8.pack $ prefix ++ show x