(def (even? x) (if (= x 0) #t (odd? (- x 1)))) (def (odd? x) (if (= x 0) #f (even? (- x 1))))