RosettaCodeData/Task/Leap-year/Seed7/leap-year.seed7

const func boolean: isLeapYear (in integer: year) is
  return (year rem 4 = 0 and year rem 100 <> 0) or year rem 400 = 0;