5 lines
141 B
AppleScript
5 lines
141 B
AppleScript
on leap_year(y)
|
|
return y mod 4 is equal to 0 and (y mod 100 is not equal to 0 or y mod 400 is equal to 0)
|
|
end leap_year
|
|
|
|
leap_year(1900)
|