[Haskell-beginners] cascade of if statements