!YS-v0
defn main(year=2024):
say: "$year is $when-not(
leap-year(year) 'not ')a
leap year."
defn leap-year(year):
(year % 4) == 0 &&:
(year % 100):pos? ||:
(year % 400).eq(0)