Well-Typed, a Haskell consultancy, seems to do quite a bit of work exclusively in Haskell.

For instance, they have developed an air traffic analysis tool for NATS[1] which they briefly blogged[2] about.

[1] http://www.nats.co.uk/

[2] http://www.well-typed.com/blog/39