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