module HAD.Y2014.M04.D15.Exercise where

{- | lowestFreeInt
   Find the lowest non-negative integer not in the list
  
   (Thanks to @clementd for this one)

   Example:

   >>> lowestFreeInt [0..10]
   11

   >>> lowestFreeInt [1..10]
   0

   >>> lowestFreeInt $ [0..998] ++ [1000..9999]
   999

-}
lowestFreeInt :: [Int] -> Int
lowestFreeInt = undefined
