diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-02-03 13:43:13 -0500 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-02-03 15:24:53 -0500 |
| commit | b2374aef747b4988417f896fdf33852dd57b9b07 (patch) | |
| tree | e04294eeefecca837026b82c2e8e96ff564d011e /dzref | |
| parent | ad582b5ef4184e26be86ef61be60c28e90b0bb7d (diff) | |
Rename Unique Mask to Mark Firsts
Diffstat (limited to 'dzref')
| -rwxr-xr-x | dzref | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -49,7 +49,7 @@ IndexOf←(1<⌈○=)◶⊐‿{ ! 0≤c 𝕨 (0<≠𝕨)◶⟨0⎉c∘⊢,(+˝∧`)≢⎉c⎉c‿∞⟩ 𝕩 } -UniqueMask←{ +MarkFirst←{ ! 1≤=𝕩 u←0↑𝕩 {(≠u)>⊑u IndexOf 𝕩}◶{u↩u∾𝕩⋄1}‿0˘𝕩 @@ -61,7 +61,7 @@ Find←{ } ⊐ ← ⊐ ⊘ IndexOf -∊ ← UniqueMask ⊘ (⊐˜<≠∘⊢) +∊ ← MarkFirst ⊘ (⊐˜<≠∘⊢) ⍷ ← ∊⊸/ ⊘ Find OccurrenceCount ← ⊐˜(⊢-⊏)⍋∘⍋ |
