Further improve the DSL to make writing the story in plain haskell
rather pleasant.