Script Library: 1240 scripts

Discussion posts for script multiple-key-sort.r

1
coccinelle
12-May-2006 14:58

Compare function are very slow. To achieve the same sort capability, 
a function like this is much more efficient :

multi-sort: func [
    serie [series!]
    order [block!]
    /local
][
    foreach local reverse order [
        either negative? local [

            serie: sort/skip/compare/reverse serie length? order abs local
        ] [

            serie: sort/skip/compare serie length? order reduce local
        ]
    ]
    serie
]

Example :
>> multi-sort [1 2 1 2 1 3 2 1 2 2] [-1 2]
== [2 1 2 2 1 2 1 2 1 3]
>> multi-sort [1 2 1 2 1 3 2 1 2 2] [1 -2]
== [1 3 1 2 1 2 2 2 2 1]
>>

2
johnsjvi95
9-Sep-2021 9:31

This is interesting! Will save this for future reference.

We’ll work with you to develop a maintenance schedule that fits your needs and budget.

Your truck’s brakes are vital to its safety and performance, so it’s important to have a reliable 24/7 emergency roadside brake service

Hi, Is there any way to sort a file in cshell by sort command, sorting it by multiple fields, like to sort it first by the second column.

I think this will be a great help for our company. Thanks for sharing this script to us.

We have the tools and experience to diagnose any kind of truck problem.

roofingwhangarei.nz

A reliable roof not only protects the structural integrity of homes but also safeguards residents and their belongings from the elements.

Discussion posts for script multiple-key-sort.r

This is interesting! Will save this for future reference.

Contents:

We’ll work with you to develop a maintenance schedule that fits your needs and budget.

Contents:

Your truck’s brakes are vital to its safety and performance, so it’s important to have a reliable 24/7 emergency roadside brake service

Contents:

Hi, Is there any way to sort a file in cshell by sort command, sorting it by multiple fields, like to sort it first by the second column.

Contents:

I think this will be a great help for our company. Thanks for sharing this script to us.

Contents:

We have the tools and experience to diagnose any kind of truck problem.

Contents:

roofingwhangarei.nz

Contents: