Task

Determine whether a given year is a leap year in the Gregorian calendar.



See also

 Leap year (wiki)


to multiple? :n :d
  output equal? 0 modulo :n :d
end
to leapyear? :y
  output ifelse multiple? :y 100 [multiple? :y 400] [multiple? :y 4]
end