Fix undo of ⟜ with constant right operand

1 files changed, 1 insertions, 1 deletions

diff --git a/src/r.bqn b/src/r.bqn
index de7f1f97..13c8c048 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -653,7 +653,7 @@ Mod2Inverse ← INF˙ _lookup_ ⟨
   ⍟, Int∘⊢◶⟨IA∘0˙,{𝕎⍟(-𝕩)}⟩
   ⊘, {(𝕎⁼)⊘(𝕏⁼)}
   ⊸, IsConstant∘⊣ ⊣◶{INF⊘𝕏}‿⊢ {𝕎⊸(𝕏⁼)}
-  ⟜, IsConstant∘⊢◶⟨INF˙,{(𝕨𝕏˜⁼⊢)⊘(IA∘0)}⟩
+  ⟜, IsConstant∘⊢◶⟨INF˙,{(𝕩𝕎˜⁼⊢)⊘(IA∘0)}⟩
 ⟩ {
   0‿2⊸⊏ {𝕏´𝕨}⟜𝔽 1⊸⊑
 }