Best shuffle: Difference between revisions

m
J: simplify
(J: simplify)
m (J: simplify)
Line 68:
<lang j>bestShuf =: verb define
yy=. (\:#&>)@:(<@I.@=) y
y {~ C.~ (;yy) </.~ (i.#y) |~ #>{. yy
)
 
6,962

edits