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