trusted
183
edits
Reverse: Difference between revisions
Jump to navigation
Jump to search
m
→APL model: Fix alignment
m (Text replacement - " ⊢( *[^∘])" to " ⎕←$1") |
m (→APL model: Fix alignment) |
||
| (One intermediate revision by the same user not shown) | |||
| 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) ⌷[⍺] ⍵ ⍝ Reverse with indexing | ||
} | } | ||
</source> | </source> | ||