(n04 x) → *
Function: n04$inline
(defun n04$inline (x) (declare (xargs :guard (integerp x))) (mbe :logic (loghead 4 x) :exec (logand 15 x)))