[REBOL] Re: Sort Problem
From: louisaturk:eudoramail at: 15-Nov-2001 12:41
Max,
At 12:46 PM 11/15/2001 -0500, you wrote:
>Hi Dr. Louis,
>
>here is my solution!
>
>rebol []
>
>data: load %testdata.txt
>
>revorder: func [block /local tmp] [
> tmp: copy []
>
> foreach [name age] data[
> append tmp reduce [age name]
> ]
> tmp
>]
>
>data: to-block data
>data: revorder data
>data: sort/skip/reverse data 2
>data: revorder data
>probe data
>
>;-----------------------------------
>; --- here you save out or use data as you want!!!
>
>ask ""
>
>-MAx
That works beautifully! Many thanks! I'll be studying your code for a
while this morning to try to learn. Rebol and the people on the Rebol list
never cease to amaze me. Thanks again!
Louis
