RosettaCodeData/Task/Combinations/J/combinations-5.j

4 lines
102 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
combr=: dyad define M.
if. (x>:y)+.0=x do. i.(x<:y),x else. (0,.x combr&.<: y),1+x combr y-1 end.
)