(i04 x) → *
Function: i04$inline
(defun i04$inline (x) (declare (xargs :guard (integerp x))) (mbe :logic (logext 4 x) :exec (fast-logext 4 x)))