From 9ebac7b4fc344e52a39db2082e2fa848691c9bdd Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Thu, 14 Jan 2021 16:41:49 -0500
Subject: Do a full traversal on indices for structural Under

---
 test/cases/under.bqn | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'test')

diff --git a/test/cases/under.bqn b/test/cases/under.bqn
index acef50b7..68455733 100644
--- a/test/cases/under.bqn
+++ b/test/cases/under.bqn
@@ -32,10 +32,12 @@
 "bdca" ≡ 1⊸⌽⌾(1‿3‿0⊸⊏)"abcd"
 #! % 1⊸⌽⌾(1‿3‿3‿0⊸⊏)"abcd"
 ((¯1⋆2∧⌜○(⌽0=↕)3)⊸× ≡ -⌾(1‿2⊑⊢))↕2‿3
+((0‿3≍1‿2)⊸+ ≡ ⟨1,2‿3⟩⊸+⌾(⟨1‿0,⟨1‿1,0‿1⟩⟩⊸⊑))↕2‿2
 # Compound
 (1+↕3) ≡ 1⊸↓⌾(@⊢·⊑<)↕4
 "210abc" ≡ ⌽⌾((2÷˜≠)⊸↑)"012abc"
 "bac"‿'d' ≡ ⌽⌾(2↑⊑)"abc"‿'d'
+(⌽¨⌾(<2‿3⊸⊏) ≡ ⌽⌾(2‿3⊸⊏)) "abcdef"
 
 # Computational
 3 % 1⊸+⌾-4
-- 
cgit v1.2.3