A very simple Haskell eDSL