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