aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions
RosettaCodeData/Task/Long-year/J/long-year.j
Ingy döt Net f23f22d71c Initial data commit
2023-07-01 13:44:08 -04:00

3 lines
113 B
Text
Raw Permalink Blame History

p =: 1 4 _100 400&(7 | [: <. +/ @: %~)"1 0
ily =: (4=p) +. 3=p@:<:
ply =: (#~ ily)@:([ + 1+i.@:-~)
Reference in a new issue View git blame Copy permalink