Don't allow F`⁼ of unit

1 files changed, 4 insertions, 4 deletions

diff --git a/src/r.bqn b/src/r.bqn
index fca20c5e..4be31d51 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -637,10 +637,10 @@ Mod1Inverse ← INF˙ _lookup_ ⟨
     ∨, (¬√∘¬)⊘(-˜÷1-⊣)
     ¬, IA∘0⊘(+-1˙)
   ⟩
-  ¨, {𝕏⁼¨       ⊣·IA 0<≡∘⊢}
-  ⌜, {𝕏⁼⌜⊘(IA∘0)⊣·IA 0<≡∘⊢}
-  ˘, {𝕏⁼˘       ⊣·IA 0<=∘⊢}
-  `, {(⊏∾¯1⊸↓𝕏⁼¨1⊸↓)⍟(1<≠)⊘(IA∘0)}
+  ¨, {𝕏⁼¨       ⊣·IX 0<≡∘⊢}
+  ⌜, {𝕏⁼⌜⊘(IA∘0)⊣·IX 0<≡∘⊢}
+  ˘, {𝕏⁼˘       ⊣·IX 0<=∘⊢}
+  `, {(⊏∾¯1⊸↓𝕏⁼¨1⊸↓)⍟(1<≠)⊘(IA∘0)⊣·IX 0<=∘⊢}
 ⟩ {
   0⊸⊑ {𝕏𝕨}⟜𝔽 1⊸⊑
 }