8 lines
147 B
Text
8 lines
147 B
Text
spiral =: ,~ $ [: /: }.@(2 # >:@i.@-) +/\@# <:@+: $ (, -)@(1&,)
|
|
|
|
spiral 5
|
|
0 1 2 3 4
|
|
15 16 17 18 5
|
|
14 23 24 19 6
|
|
13 22 21 20 7
|
|
12 11 10 9 8
|