2 lines
78 B
OCaml
2 lines
78 B
OCaml
let is_leap_year ~year =
|
|
year mod (if year mod 100 = 0 then 400 else 4) = 0
|
let is_leap_year ~year =
|
|
year mod (if year mod 100 = 0 then 400 else 4) = 0
|