RosettaCodeData/Task/Leap-year/Standard-ML/leap-year.ml
2023-07-01 13:44:08 -04:00

2 lines
66 B
Standard ML

fun isLeapYear y =
y mod (if y mod 100 = 0 then 400 else 4) = 0