:load expl/Examples.hs
:set +accum
:set +simplify
:generalise shiftl
:test shiftl on "shiftl [0, 1, 2, 3, 4]"
:quit
