trusted
183
edits
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> |