haskell/meetup: First working solution.