module Exercise_2 where
import Data.List
import Test.QuickCheck


{- H1 -}

count :: [Char] -> Char -> Integer
count cs c = undefined

{- H2 -}

reverseLookup :: Integer -> [(String, Integer)] -> [String]
reverseLookup size tab = undefined

prop1 = undefined

prop2 = undefined

prop3 = undefined

prop4 = undefined

{- H3 -}

wordsOfLength :: [Char] -> Integer -> [[Char]]
wordsOfLength alphabet n = undefined

{- H4 -}

{-WETT-}
palindromesOfRadius :: [Char] -> Integer -> [[Char]]
palindromesOfRadius alphabet radius = undefined
{-TTEW-}