[Haskell-beginners] Bool -> a -> Maybe a, or something similar