Haskell JSON webservice