Dixit Joel Neely (00.11 05.01.2004): >[...] >adjacent elements are now different. Finally, for your example: > > example: [[4 1 7 "nicsrg" 5 6 3 8 2 9] [3 1 2 "sicrtg" 9 8 4 7 6 5] > [9 3 7 "iscgtn" 6 2 8 5 4 1] [1 3 8 "inctrg" 5 2 9 4 6 7] > [9 6 5 "ngsirt" 8 2 1 3 7 4] [3 7 8 "igtnrs" 4 1 2 9 5 6] > [6 4 8 "gnrsit" 2 3 9 1 5 7] [9 5 4 "sntgir" 6 7 8 2 1 3] > [6 7 4 "gstinr" 1 5 2 3 9 8] [7 9 2 "sgcnit" 5 1 8 3 6 4]] > example: riffle sort/compare example func [a b][a/4/3 < b/4/3] > foreach item example [print mold item] > >which gives: > > [6 4 8 "gnrsit" 2 3 9 1 5 7] > [1 3 8 "inctrg" 5 2 9 4 6 7] > [9 6 5 "ngsirt" 8 2 1 3 7 4] > [3 1 2 "sicrtg" 9 8 4 7 6 5] > [3 7 8 "igtnrs" 4 1 2 9 5 6] > [4 1 7 "nicsrg" 5 6 3 8 2 9] > [6 7 4 "gstinr" 1 5 2 3 9 8] > [7 9 2 "sgcnit" 5 1 8 3 6 4] > [9 5 4 "sntgir" 6 7 8 2 1 3] > [9 3 7 "iscgtn" 6 2 8 5 4 1] > >where adjacent (sub-)blocks differ in the third character of the >fourth element.
And whereby my problem seems to be solved. Thanks, Joel! HY Prętera censeo Carthaginem esse delendam -- To unsubscribe from this list, just send an email to [EMAIL PROTECTED] with unsubscribe as the subject.
