Some theorems about arithmetic.
Theorem:
(defthm evenp-of-1-less-when-not-evenp (implies (and (integerp x) (not (evenp x))) (evenp (1- x))))
Theorem:
(defthm evenp-of-3-less-when-not-evenp (implies (and (integerp x) (not (evenp x))) (evenp (- x 3))))