-- Name (number): -- Name (number): module Practicum1 where -- Ex. 1 toDigitsRev :: Integer -> [Integer] toDigitsRev = undefined -- Ex. 2 doubleSecond :: (Num a) => [a] -> [a] doubleSecond = undefined -- Ex. 3 sumDigits :: [Integer] -> Integer sumDigits = undefined -- Ex. 4 validate :: Integer -> Bool validate = undefined -- Ex. 5 readCC :: String -> Integer readCC = undefined -- Ex. 6 showCC :: Integer -> String showCC = undefined -- Ex. 7 lookupIssuer :: String -> Integer -> IO String lookupIssuer = undefined -- Ex. 8 checkCC :: String -> IO () checkCC = undefined -- Ex. 9: BONUS! Leave undefined if you do not do it. toDigitsRevG :: (Integral a) => a -> a -> [a] toDigitsRevG = undefined