Transpose | Index << >> |
y←3 4⍴⍳12 y 1 0⍉y 0 1⍉y 0 0⍉y 0 1 2 3 0 4 8 0 1 2 3 0 5 10 4 5 6 7 1 5 9 4 5 6 7 8 9 10 11 2 6 10 8 9 10 11 3 7 11 x← 2 1 2 0 1 y← ? 11 7 5 3 2 ⍴ 100 z← x⍉y (i j k)← ?⍴z v← ?⍴z z[i;j;k] = y[k;j;k;i;j] z[⊂v] = y[⊂v[x]] 1 1 ⍝ x← 2 1 2 0 1 |