RosettaCodeData/Task/Even-or-odd/ArkScript/even-or-odd.ark

6 lines
84 B
Plaintext

(let is_even (fun (i)
(= 0 (mod i 2))))
(let is_odd (fun (i)
(= 1 (mod i 2))))