5 lines
65 B
Text
5 lines
65 B
Text
let is_even d =
|
|
(d mod 2) = 0
|
|
|
|
let is_odd d =
|
|
(d mod 2) <> 0
|