Revision as of 04:43, 5 June 2023 (view source) Promovicz (talk \| contribs) m (→‎{{header\|K}}: Adjust) ← Older edit		Revision as of 06:22, 5 June 2023 (view source) Promovicz (talk \| contribs) (→‎{{header\|K}}: Compact, Works with Kona) Newer edit →
Line 2,185: =={{header\|K}}== === K3 === {{works with\|Kona}} Leap year ~~test~~predicate: ~~<syntaxhighlight lang="k"> leapyear:{(+/~x!'4 100 400)!2}</syntaxhighlight>~~ <syntaxhighlight lang="k"> ~~leapyear'1996~~lyp:{(+/~x!'4 100 400)!62} lyp'1996+!6 1 0 0 0 1 0</syntaxhighlight> Leap year selection: <syntaxhighlight lang="k"> ~~leapyears~~lys:{a@&~~leapyear~~lyp'a:x}~~</syntaxhighlight>~~ ~~<syntaxhighlight~~ ~~lang="k">~~ ~~leapyears~~lys@1900,1994,1996,1997,2000 1996 2000</syntaxhighlight>

Leap year: Difference between revisions

Leap year (view source)