module Exercise_4 where

{- G1 -}

hasFibonacciProperty :: [Integer] -> Bool
hasFibonacciProperty xs = undefined

{- G2 -}

{- Beweis -}

{- G3 -}

perms :: [Char] -> [[Char]]
perms cs = undefined

{- G4 -}

match :: [Char] -> [Char] -> Bool
match as bs = undefined

{- H1 -}

matchingWords :: [String] -> Bool
matchingWords ws = undefined

{- H2 -}

chunks :: [Int] -> [a] -> [[a]]
chunks xs as = undefined

-- QuickCheck-Tests

{- H3 -}

{- Beweis -}

{- H4 -}

{- Abgabe von Aufgabe 4 mit dem nächsten Blatt! -}