interestingHashes :: String -> [String]
interestingHashes prefix = map (Data.ByteString.Char8.unpack . encode) . filter startsWithZeros . map (applyHash prefix) $ [1..]
interestingHashes :: String -> [String]
interestingHashes prefix = map (Data.ByteString.Char8.unpack . encode) . filter startsWithZeros . map (applyHash prefix) $ [1..]
interestingHashes prefix = map (Data.ByteString.Char8.unpack . encode) . filter startsWithZeros . map (applyHash prefix) $ [1..]