From ca4cabe18c71b3ca58cf39b6f8463610f44c4dd5 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Sun, 3 Apr 2022 21:05:54 -0400
Subject: =?UTF-8?q?Support=20=CB=98=20and=20=E2=8E=89=20with=20constant=20?=
 =?UTF-8?q?=F0=9D=95=98=20in=20structural=20Under?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

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

(limited to 'test')

diff --git a/test/cases/under.bqn b/test/cases/under.bqn
index e4cdf496..f831edeb 100644
--- a/test/cases/under.bqn
+++ b/test/cases/under.bqn
@@ -52,6 +52,10 @@
 "aec"‿"db" ≡ ⌽⌾(1⊑¨⊢) "abc"‿"de"
 "dbe"‿"ac" ≡ ⌽˘⌾(0‿¯1⊑⌜⊢) "abc"‿"de"
 ("bac"≍"def") ≡ ⌽˘⌾((-⟜1¨≢)⊸↑) "abc"≍"def"
+"acbd" ≡ ⍉⌾(>2⊸↑⋈2⊸↓) "abcd"
+("dbc"≍"aef") ≡ ⌽⌾(⊏˘) "abc"≍"def"
+("aef"≍"dbc") ≡ ⌽⌾(2‿1⊏⎉1⊢) "abc"≍"def"
+("abe"≍"dcf") ≡ ⌽⌾(2‿1⊏⎉¯1⊢) "abc"≍"def"
 # Fills
 ! % ⌽⌾(1↓4↑⊢)"abc"
 
-- 
cgit v1.2.3