:load expl/Examples.hs
:set +simplify
:generalise pepper'
-- Non-exhaustive patterns
-- :test pepper' on "pepper' Z [0, 1, 2, 3]"
:quit
