Set consolidation: Difference between revisions
Content added Content deleted
m (→{{header|J}}) |
m (→{{header|J}}: restore proper handling of consolidate 'ab';'bd') |
||
Line 1,039: | Line 1,039: | ||
<lang J>consolidate=:4 :0/ |
<lang J>consolidate=:4 :0/ |
||
b=. y 1&e.@e.&> x |
b=. y 1&e.@e.&> x |
||
(~.;x,b#y); |
(1,-.b)#(~.;x,b#y);y |
||
)</lang> |
)</lang> |
||