Re: [Bug-apl] n wise reduction after 740

[Xiao-Yong Jin]

Excuse me if that wasn’t clear.  1+/⍳5 is the correct behavior.  Replacing + 
with {⍺+⍵} should give the exact result.
      1+/⍳5
1 2 3 4 5
      1{⍺+⍵}/⍳5
1 2 3 4 5

NARS is wrong in my opinion.

> On Jun 13, 2016, at 9:47 PM, Christian Robert <address@hidden> wrote:
> 
> How was that outputting *before* svn 740 ?
> 
> On 2016-06-13 22:11, Xiao-Yong Jin wrote:
>> Hello,
>> 
>> It breaks when the left argument is 1.  In addition, with the internal 
>> macros, the si stack is polluted.
>> 
>>      1+/⍳5
>> 1 2 3 4 5
> 
> NARS2000 give the exact same result:
> 
>      1+/⍳5
> 1 2 3 4 5
> 
> quite strange, not sure what this should output, so, in gnuapl:
> 
>      1+/⍳5
> 1 2 3 4 5
>      2+/⍳5
> 3 5 7 9
>      10+/⍳5
> DOMAIN ERROR
>      10+/⍳5
>      ^   ^
>      3+/⍳5
> 6 9 12
>      4+/⍳5
> 10 14
>      5+/⍳5
> 15
>      6+/⍳5
> 
>      7+/⍳5
> DOMAIN ERROR
>      7+/⍳5
>      ^  ^
> 
> I really don't know what this syntax is supposed to do, but it has a 
> fair/straight pattern.
> 
> 
>>      1{⍺+⍵}/⍳5
>> INDEX ERROR
>> μ-Z__pA_LO_REDUCE_X_B[5]  μ-T←⊂(⊃μ-B1[μ-H;μ-a-μ-M;μ-L])μ-LO⊃μ-T
>>                                 ^                         ^
> 
> NARS200 give here:
> 
>      1{⍺+⍵}/⍳5
> DOMAIN ERROR
>      1{⍺+⍵}/⍳5
>            ∧
> 
> my 2 cents, (still newbie and will be for years)
> 
> Xtian.
>>      )sis
>> μ-Z__pA_LO_REDUCE_X_B[5]  μ-T←⊂(⊃μ-B1[μ-H;μ-a-μ-M;μ-L])μ-LO⊃μ-T
>>                                 ^                         ^
>> ⋆  1{⍺+⍵}/⍳5
>>   ^
>> 
>>      )sinl
>> μ-Z__pA_LO_REDUCE_X_B[5]  μ-Z μ-A μ-LO μ-B μ-B1 μ-rho_Z μ-rho_B1 μ-T μ-H μ-M 
>> μ-L μ-a μ-N μ-I μ-I_max
>> ⋆
>> 
>> Best,
>> Xiao-Yong
>> 
>> 
>>