(pseudo-var-p x) → *
Function:
(defun pseudo-var-p (x) (declare (xargs :guard t)) (let ((__function__ 'pseudo-var-p)) (declare (ignorable __function__)) (and x (symbolp x))))
Theorem:
(defthm pseudo-var-p-compound-recognizer (equal (pseudo-var-p x) (and x (symbolp x))) :rule-classes :compound-recognizer)