13
edits
Unique: Difference between revisions
Jump to navigation
Jump to search
m
ditto
(Rip out the (wrong) model for unique.) |
m (ditto) |
||
| Line 89: | Line 89: | ||
<syntaxhighlight lang=apl> | <syntaxhighlight lang=apl> | ||
m ← {0∊⍴⍵: | m ← {0∊⍴⍵:⍵⍴⍨≠∘0@⎕io⊢⍴⍵ ⋄ ↑1/⊃(⊣,⊢⊢⍤/⍨(∧/∘.≢⍨))/⊂¨⊂⍤¯1⊢⍵} | ||
</syntaxhighlight> | </syntaxhighlight> | ||
{{Works in|[[Dyalog APL]]}} | {{Works in|[[Dyalog APL]]}} | ||