apl>" <-APL2-------------------- sam186.txt ---------------------------->


apl>" <- More Disclose, origin 1 --------------------------------------->


apl>Lio # 1


apl>`X(1 2 3 4) (5 6 7 8) (9 10 11 12)

1  2  3  4
5  6  7  8
9 10 11 12

apl>`X[1](1 2 3 4) (5 6 7 8) (9 10 11 12)

1 5  9
2 6 10
3 7 11
4 8 12

apl>`X[2](1 2 3 4) (5 6 7 8) (9 10 11 12)

1  2  3  4
5  6  7  8
9 10 11 12

apl>`X[3](1 2 3 4) (5 6 7 8) (9 10 11 12)

`X[3](1 2 3 4) (5 6 7 8) (9 10 11 12)
^ 123 - Invalid axes.

apl>)off