(i24p x) → *
Function: i24p$inline
(defun i24p$inline (x) (declare (xargs :guard t)) (signed-byte-p 24 x))