7 lines
156 B
Text
7 lines
156 B
Text
isLeapYear := proc(year)
|
|
if not year mod 4 = 0 or (year mod 100 = 0 and not year mod 400 = 0) then
|
|
return false;
|
|
else
|
|
return true;
|
|
end if;
|
|
end proc:
|