[Haskell-beginners] Problem with defining functions and guarded rules