Yesod in Production
joelt.io
joelt.io
And then you have Persistent, which works in its own monad (I'm not sure if it works as a second level cache, because it's not terribly well documented) and with a good helping of Template Haskell tries to be an ORM. Unfortunately, it's not terribly powerful (numeric IDs only, no complex joins, and it doesn't look like you're expected to write the mapping between your model and the table(s) yourself, so forget about legacy databases).