(n04p x) → *
Function: n04p$inline
(defun n04p$inline (x) (declare (xargs :guard t)) (unsigned-byte-p 4 x))
