From b2374aef747b4988417f896fdf33852dd57b9b07 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Wed, 3 Feb 2021 13:43:13 -0500
Subject: Rename Unique Mask to Mark Firsts

---
 dzref | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'dzref')

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 ← ⊐˜(⊢-⊏)⍋∘⍋
-- 
cgit v1.2.3