#reduce default (bool × unit × nat)
#reduce default (bool × bool × bool × bool)