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