-- 5. For when we want to drop the Nothing values from
--    our list. 

-- catMaybes [Just 1, Nothing, Just 2]
-- [1, 2]

-- let xs = take 3 $ repeat Nothing
-- catMaybes xs
-- []

catMaybes :: [Maybe a] -> [a]
catMaybes [] = []
catMaybes :: [Maybe a] -> [a]
catMaybes [] = []
catMaybes [] = []