6 lines
105 B
Text
6 lines
105 B
Text
|
to ack :i :j
|
||
|
|
if :i = 0 [output :j+1]
|
||
|
|
if :j = 0 [output ack :i-1 1]
|
||
|
|
output ack :i-1 ack :i :j-1
|
||
|
|
end
|