6 lines
75 B
Text
6 lines
75 B
Text
|
floyd=: verb define
|
||
|
|
for_j. i.#y do.
|
||
|
|
y=. y <. j ({"1 +/ {) y
|
||
|
|
end.
|
||
|
|
)
|