stringDigits :: String -> Int -> Int
stringDigits num digit = length (filter (== intToDigit digit) num)
stringDigits :: String -> Int -> Int
stringDigits num digit = length (filter (== intToDigit digit) num)
stringDigits num digit = length (filter (== intToDigit digit) num)