:load expl/Examples.hs
:set +simplify
:generalise flatapp
:quit
