diff --git a/lib/init-7.scm b/lib/init-7.scm index 63251a28..a57826e5 100644 --- a/lib/init-7.scm +++ b/lib/init-7.scm @@ -1102,7 +1102,7 @@ (define (positive? x) (> x 0)) (define (negative? x) (< x 0)) (define (even? n) (= (remainder n 2) 0)) -(define (odd? n) (not (= (remainder n 1) 0))) +(define (odd? n) (not (= (remainder n 2) 0))) (define (abs x) (if (< x 0) (- x) x))