Spiral matrix: Difference between revisions
m
→{{header|RPL}}: typo
m (→{{header|RPL}}: simplified code) |
m (→{{header|RPL}}: typo) |
||
Line 4,923:
« { 0 1 } → n step
« { 1 1 } n DUP 2 →LIST -1 CON <span style="color:grey">@ empty cell = -1</span>
OVER j PUT
DUP2 SWAP step ADD
|