From 5e43e0bb0733c9fbd2db020afd8d57cf20dd9934 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Tue, 17 May 2022 08:02:10 -0400
Subject: Fix test for unknown identity value

---
 src/r1.bqn | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

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𝕩 }
 
-- 
cgit v1.2.3