apl>" <------------------------- sam055.txt ---------------------------->


apl>" <--- Reduce ------------------------------------------------------>


apl>  v # 1 2 3 4 5


apl>  a # 1 -1 1 -1 1


apl>  +/v

15

apl>  X/v

120

apl>  S/v

5

apl>  _/v

3

apl>  +/L # v X a

1 -2 3 -4 5

3

apl>  %/v

1.875

apl>  X/L # v * a

1 0.5 3 0.25 5

1.875

apl>  +/I0

0

apl>  &/I0

1

apl>)off