Reverse: Difference between revisions
Jump to navigation
Jump to search
(→APL model: Squad requires enclose of left arg) |
m (→APL model: Fix alignment) |
||
| Line 99: | Line 99: | ||
⍺ ← ¯1+≢⍴⍵ ⍝ Assume last axis | ⍺ ← ¯1+≢⍴⍵ ⍝ Assume last axis | ||
l ← ⍺ ⌷ ⍴⍵ ⍝ Length of reversed axis | l ← ⍺ ⌷ ⍴⍵ ⍝ Length of reversed axis | ||
(⊂l-1+⍳l) ⌷[⍺] ⍵ | (⊂l-1+⍳l) ⌷[⍺] ⍵ ⍝ Reverse with indexing | ||
} | } | ||
</source> | </source> | ||