{-# htermination elem :: Eq a => (Maybe a) -> [(Maybe a)] -> Bool #-}