Alternative definition of uchar-integerp as integer range.
Theorem: uchar-integerp-alt-def
(defthm uchar-integerp-alt-def (equal (uchar-integerp x) (and (integerp x) (<= 0 x) (<= x (uchar-max)))))