haskell/phone-number: First working solution.