Haskell server

It's pretty fast!