RosettaCodeData/Task/Even-or-odd/Racket/even-or-odd-2.rkt
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

5 lines
86 B
Racket

(define (my-even? x)
(= (modulo x 2) 0))
(define (my-odd? x)
(= (modulo x 2) 1))