4 lines
113 B
Text
4 lines
113 B
Text
|
p =: 1 4 _100 400&(7 | [: <. +/ @: %~)"1 0
|
||
|
|
ily =: (4=p) +. 3=p@:<:
|
||
|
|
ply =: (#~ ily)@:([ + 1+i.@:-~)
|