RosettaCodeData/Task/Natural-sorting/Zkl/natural-sorting-1.zkl
2017-09-25 22:28:19 +02:00

4 lines
141 B
Text

fcn dsuSort(x,orig){ // decorate-sort-undecorate sort
x.enumerate().sort(fcn([(_,a)],[(_,b)]){a<b})
.apply('wrap([(n,_)]){orig[n]});
}