Fix test for unknown identity value

1 files changed, 1 insertions, 1 deletions

diff --git a/src/r1.bqn b/src/r1.bqn
index 5c15fbef..73050a70 100644
--- a/src/r1.bqn
+++ b/src/r1.bqn
@@ -47,7 +47,7 @@ ScalId ← @ _lookup_ ⟨
 ⟩
 TabId ← {
   id ← (4=0⊸⊑)◶⟨0,(IsTable 2⊸⊑)⟩◶⟨@,ScalId 1⊸⊑⟩ Decompose 𝕩
-  "´: Identity not found" ! @≠id ⋄ <id
+  "´: Identity not found" ! @>id ⋄ <id
 }
 Identity ← { 𝕨 @⊸=◶⟨⊢⊘Reshape,TabId𝕩˙⟩ ScalId𝕩 }