Sort disjoint sublist: Difference between revisions

m
→‎{{header|Factor}}: change word name and stack effect to indicate the word mutates
(Added Wren)
m (→‎{{header|Factor}}: change word name and stack effect to indicate the word mutates)
Line 853:
 
=={{header|Factor}}==
<lang factor>: disjoint-sort! ( values indices -- seqvalues' )
over <enumerated> nths unzip swap [ natural-sort ] bi@
pick [ set-nth ] curry 2each ;</lang>
1,808

edits