Interestingly, in NARS200 I get all of the same results as in IBM APL 2 except the following:
⍋⊃z 1 3 2 4 On Tue, Jul 8, 2014 at 9:41 AM, Blake McBride <blake1...@gmail.com> wrote: > For what it is worth, IBM APL 2 gives: > > ⍋'AAA' 'Y' 'BBB' 'CC' > DOMAIN ERROR > ⍋'AAA' 'Y' 'BBB' 'CC' > ∧ > > Z←'AA' 'XX' 'AAA' 'XXX' > ⎕UCS¨Z > 65 65 88 88 65 65 65 88 88 88 > ⍋⎕UCS¨Z > DOMAIN ERROR > ⍋⎕UCS¨Z > ∧ > > ⊃Z > AA > XX > AAA > XXXX > ⍋⊃Z > DOMAIN ERROR > ⍋⊃Z > ∧ > > > I have no real preference regarding this. I am just providing this for > informational purposes. Please feel free with other tests you would like > me to perform. > > Thanks. > > Blake > > > > > On Tue, Jul 8, 2014 at 5:45 AM, Juergen Sauermann < > juergen.sauerm...@t-online.de> wrote: > >> Hi Elias, >> >> nice trick! >> >> /// Jürgen >> >> >> >> On 07/08/2014 08:58 AM, Elias Mårtenson wrote: >> >> By the way, I found a workaround to the string ordering. The workaround >> requires memory on the order of ↑(⍴V)×⌈/⍴¨V for a vector V. This should >> be enough justification for the proposed extension. >> >> Here's what I do: instead of doing the following: >> >> *z[⍋z←'foo' 'bar' 'test' 'aaaaaa']* >> ┌→──────────────────────────┐ >> │┌→──┐ ┌→──┐ ┌→───┐ ┌→─────┐│ >> ││bar│ │foo│ │test│ │aaaaaa││ >> │└───┘ └───┘ └────┘ └──────┘│ >> └∊──────────────────────────┘ >> >> I do this: >> >> *z[⍋⊃z←'foo' 'bar' 'test' 'aaaaaa']* >> ┌→──────────────────────────┐ >> │┌→─────┐ ┌→──┐ ┌→──┐ ┌→───┐│ >> ││aaaaaa│ │bar│ │foo│ │test││ >> │└──────┘ └───┘ └───┘ └────┘│ >> └∊──────────────────────────┘ >> >> Regards, >> Elias >> >> >> >> >>> >> >> >