Index Of

From NARS2000
Revision as of 02:35, 11 April 2008 by Sudleyplace (talk | contribs)
Jump to navigationJump to search

Dyadic iota (L⍳R) is extended to allow 1<⍴⍴L, returning a nested array of shape ⍴R whose items are each integer vectors of length ⍴⍴R, suitable for use as indices to L.

For example, in origin-1

      M←2 3⍴'abcdef'
 1 1  2 3

This extension is implemented via an internal magic function:

    ∇ Z←L #DydIota R;⎕IO;O
[1]   O←⎕IO ⋄ ⎕IO←0
[2]   Z←⊂[0] O+(1+⍴L)⊤(¯1↓,(1+⍴L)↑L)⍳R