aboutsummaryrefslogtreecommitdiff
path: root/impl.bqn
diff options
context:
space:
mode:
Diffstat (limited to 'impl.bqn')
-rw-r--r--impl.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/impl.bqn b/impl.bqn
index df067c0f..d05ff710 100644
--- a/impl.bqn
+++ b/impl.bqn
@@ -407,7 +407,7 @@ OccurrenceCount ← ⊐˜(⊢-⊏)⍋∘⍋
ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩}
⊒ ← OccurrenceCount⊘ ProgressiveIndexOf
-⊑ ↩ (0¨∘≢)⊸Pick ⊘ Pick
+⊑ ↩ (0⊑⥊) ⊘ Pick
◶ ↩ {𝕨((𝕨𝔽𝕩)⊑𝕘){𝔽}𝕩} # Same definition, new Pick
inverse ← {(⊑(0⊏𝕩)⊐<) ⊑ ((1⊏𝕩)∾⟨!∘0⟩)˜} ⍉ (2∾˜2÷˜≠)⊸⥊ ⟨