8 lines
116 B
Text
8 lines
116 B
Text
|
combr=: dyad define
|
||
|
|
if.(x=#y) +. x=1 do.
|
||
|
|
y
|
||
|
|
else.
|
||
|
|
(({.y) ,. (x-1) combr (}.y)) , (x combr }.y)
|
||
|
|
end.
|
||
|
|
)
|