Remove stray `def`.
Remove stray `def`.

There is a Default instance for a -> b, given a default instance for b
-- so we were just returning the default value for the union, which is
a results.

Now the tests are hanging. Progress?

zenhack/haskell-capnp