I think the current name of `excluded-middle` in `Relation.Nullary.Negation` is a bit disingenous. I think `¬¬-excluded-middle` would be better.