RosettaCodeData/Task/Leap-year/YAMLScript/leap-year.ys

!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)
Data update 2025-02-27 18:35:13 -05:00			`!YS-v0`
Data update 2024-03-06 22:25:12 -08:00
Data update 2024-10-16 18:07:41 -07:00			`defn main(year=2024):`
			`say: "$year is $when-not(`
			`leap-year(year) 'not ')a`
			`leap year."`
Data update 2024-03-06 22:25:12 -08:00
			`defn leap-year(year):`
Data update 2024-10-16 18:07:41 -07:00			`(year % 4) == 0 &&:`
			`(year % 100):pos? \|\|:`
			`(year % 400).eq(0)`