This is a real corner case, so probably not worth much attention. I was experimenting with writing a version of tree-seq using reduction rather than sequences. Here's what I came up with:
However, using it resulted in an exception:
The exception is not thrown if preserving-reduced is given a 1 argument arity, ie: