[Haskell-beginners] Guard in class def