FGL binder that checks whether X is syntactically an integer.
(check-integerp ans x) → *
See fgl-syntactic-checker-binders and see binder for details.
Function:
(defun check-integerp (ans x) (declare (xargs :guard t)) (let ((__function__ 'check-integerp)) (declare (ignorable __function__)) (and (integerp x) ans t)))
Theorem:
(defthm check-integerp-implies-integerp (implies (check-integerp ans x) (integerp x)) :rule-classes :forward-chaining)