Problem 1: Sucess...  again

My first haskell progrem ಥ‿ಥ