[Haskell-beginners] Disjunction