aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-06-30 16:25:07 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-06-30 16:25:07 -0400
commit2fc6d6c1058e5cff348b675ea1b9005e1587d0dc (patch)
tree7a2354bf730543b1e43c7eed2223970f5104fb3c /src
parent3402e16ca056a8bac819a365ccd23d5a6e7b2394 (diff)
Fix argument shapes for ¨ in _search
Diffstat (limited to 'src')
-rw-r--r--src/r1.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/r1.bqn b/src/r1.bqn
index 49c752a9..d99c30f0 100644
--- a/src/r1.bqn
+++ b/src/r1.bqn
@@ -178,7 +178,7 @@ _search←{ # 0 for ∊˜, 1 for ⊐
i‿j←(k⊸×⌜↕)⌜n‿lx ⋄ {Red CC⟜𝕩⌜i}⌜j
}‿{
g←Reverse⍒𝕨
- i←g⊏˜(0⌈-⟜1)⌜(g⊏𝕨)⍋𝕩
+ i←g⊏˜(0⌈-⟜1)⌜⥊(g⊏𝕨)⍋𝕩
adj←ind⊑⟨1⊸-,⊣--⟜n⊸×⟩
i(⊣ Adj CC○(k⊸×))¨↕lx
} 𝕩