[Haskell-beginners] Ambogous error in returning value