3 lines
88 B
Text
3 lines
88 B
Text
(define even? X -> (= 0 (shen.mod X 2)))
|
|
|
|
(define odd? X -> (not (= 0 (shen.mod X 2))))
|