15 lines
909 B
Text
15 lines
909 B
Text
b=: '1'&= :.(' '-.~":)
|
|
task=: {{y,:x&smearright&.:b y}}
|
|
|
|
0 task '010000000000100000000010000000010000000100000010000010000100010010'
|
|
010000000000100000000010000000010000000100000010000010000100010010
|
|
010000000000100000000010000000010000000100000010000010000100010010
|
|
1 task '010000000000100000000010000000010000000100000010000010000100010010'
|
|
010000000000100000000010000000010000000100000010000010000100010010
|
|
011000000000110000000011000000011000000110000011000011000110011011
|
|
2 task '010000000000100000000010000000010000000100000010000010000100010010'
|
|
010000000000100000000010000000010000000100000010000010000100010010
|
|
011100000000111000000011100000011100000111000011100011100111011111
|
|
3 task '010000000000100000000010000000010000000100000010000010000100010010'
|
|
010000000000100000000010000000010000000100000010000010000100010010
|
|
011110000000111100000011110000011110000111100011110011110111111111
|