5 lines
84 B
Text
5 lines
84 B
Text
(let is_even (fun (i)
|
|
(= 0 (mod i 2))))
|
|
|
|
(let is_odd (fun (i)
|
|
(= 1 (mod i 2))))
|