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 <[email protected]> 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 <
> [email protected]> 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
>>
>>
>>
>>
>>>
>>
>>
>
