aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-01-30 10:59:37 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-01-30 10:59:37 -0500
commitc26a1b195e1846126e914875c88cd0a2cb5ef2c2 (patch)
tree41263fd31d549257b80020eb455179dbdec07248 /src
parent01044145c08b37da07ef0eec4bab1078aa95a57d (diff)
Fix permissive mixing issue in ˘⁼
Diffstat (limited to 'src')
-rw-r--r--src/r.bqn6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/r.bqn b/src/r.bqn
index 1b76cc58..00bfc2b8 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -769,9 +769,9 @@ Mod1Inverse ← INF˙ _lookup_ ⟨
∨, (¬√∘¬)⊘(-˜÷1-⊣)
¬, IA∘0⊘(+-1˙)
- ¨, {𝕏⁼¨ ⊣·IX 0<≡∘⊢}
- ⌜, {𝕏⁼⌜⊘(IA∘0)⊣·IX 0<≡∘⊢}
- ˘, {𝕏⁼˘ ⊣·IX 0<=∘⊢}
+ ¨, {𝕏⁼¨ ⊣·IX 0<≡∘⊢}
+ ⌜, {𝕏⁼⌜⊘(IA∘0) ⊣·IX 0<≡∘⊢}
+ ˘, {(IX∘IsArray⊸⊢𝕏⁼)˘ ⊣·IX 0<=∘⊢}
`, {(⊏∾¯1⊸↓𝕏⁼¨1⊸↓)⍟(1<≠)⊘(IA∘0)⊣·IX 0<=∘⊢}
⟩ {
0⊸⊑ {𝕏𝕨}⟜𝔽 1⊸⊑