haskell/beer-song: First working solution.