Rules about ifix.
Theorem: ifix-when-integerp
(defthm ifix-when-integerp (implies (integerp x) (equal (ifix x) x)))
Theorem: integerp-of-ifix
(defthm integerp-of-ifix (integerp (ifix x)))