aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-04-13 16:21:43 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-04-13 16:21:43 -0400
commit82d6df9ff37f4e09b7d98b5a27eba56bdbef55e9 (patch)
tree717e5c2fab0bb7c9d8eab97cedf68c552965527a /src
parent3b2e2bea46dc22959c81d6d064a376543b042b23 (diff)
Fix fill issue in Occurrence Count
Diffstat (limited to 'src')
-rw-r--r--src/r.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/r.bqn b/src/r.bqn
index 621b3548..65cf5bca 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -684,7 +684,7 @@ ProgressiveIndexOf ← 0 Fill {
c←1-˜=𝕨
"⊒: Rank of 𝕨 must be at least 1" ! 0≤c
"⊒: Rank of 𝕩 must be at least cell rank of 𝕨" ! c≤=𝕩
- 𝕨⊐○(((≢∾2˙)⥊≍˘⟜OccurrenceCount∘⥊) 𝕨⊸⊐)𝕩
+ 𝕨⊐○(((≢∾2˙)⥊≍˘⟜OccurrenceCount⍟(0<≠)∘⥊) 𝕨⊸⊐)𝕩
}
⊏ ↩ FirstCell ⊘ (ToArray⊸(SelSub _onAxes_ 1)) _fillBy_ ⊢