RosettaCodeData/Task/Combinations/J/combinations-8.j
2024-10-16 18:07:41 -07:00

7 lines
117 B
Text

combr1=: dyad define
if.(x=#y) +. x=1 do.
y
else.
(({.y) ,. (x-1) combr (}.y)) , (x combr }.y)
end.
)