4 lines
72 B
Text
4 lines
72 B
Text
comb:{[n;k]
|
|
f:{:[k=#x; :,x; :,/_f' x,'(1+*|x) _ !n]}
|
|
:,/f' !n
|
|
}
|