aboutsummaryrefslogtreecommitdiff
path: root/dzref
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-02-03 13:43:13 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-02-03 15:24:53 -0500
commitb2374aef747b4988417f896fdf33852dd57b9b07 (patch)
treee04294eeefecca837026b82c2e8e96ff564d011e /dzref
parentad582b5ef4184e26be86ef61be60c28e90b0bb7d (diff)
Rename Unique Mask to Mark Firsts
Diffstat (limited to 'dzref')
-rwxr-xr-xdzref4
1 files changed, 2 insertions, 2 deletions
diff --git a/dzref b/dzref
index 0bf42f37..32aad9d6 100755
--- a/dzref
+++ b/dzref
@@ -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 ← ⊐˜(⊢-⊏)⍋∘⍋