CRUD prototype for Yesod