module Exercise_2 where
import Data.List

{- H1 -}

factorials :: [Integer] -> [Integer]
factorials ns = undefined

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

{- H2 -}

lookupTab :: [Integer] -> [(Integer, [Char])] -> [[[Char]]]
lookupTab keys tab = undefined

{- H3 -}

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

{- H4 -}

{-WETT-}
perms :: [Char] -> [[Char]]
perms [] = undefined
perms xs = undefined
{-TTEW-}