Fixtype of expression values and errors.
This is a sum-of-products (i.e., union) type, introduced by fty::defflexsum.
Theorem: not-errorp-when-expr-valuep
(defthm not-errorp-when-expr-valuep (implies (expr-valuep x) (not (errorp x))))