Having said that I think Quill looks nicer (https://getquill.io/) if you want a DSL like that.
https://tpolecat.github.io/doobie/docs/17-Quill.html
That's by far the best DB access layer I've ever worked with.