:load expl/Examples.hs
:set +accum
:set +simplify
:generalise hanoi
-- TODO: write a :test
:quit
