From 0cecbf4d55a48a9c1c9bd3be8620fcd480f0d503 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Tue, 14 Jul 2020 11:20:37 -0400
Subject: =?UTF-8?q?=E2=8A=94=20now=20up=20to=20spec=20in=20dzaima/BQN?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 spec/dzref | 12 +-----------
 1 file changed, 1 insertion(+), 11 deletions(-)

(limited to 'spec')

diff --git a/spec/dzref b/spec/dzref
index 3f388f71..5ea46b4e 100755
--- a/spec/dzref
+++ b/spec/dzref
@@ -88,17 +88,7 @@ Join←{
   >i<¨⊸⊏¨l/𝕩
 }⍟(0<≠∘⥊)
 
-Group←{
-  ! IsArray 𝕩
-  Chk←{!1=≠≢𝕩⋄!∧´Int¨𝕩⋄!∧´¯1≤𝕩⋄≠𝕩}
-  l←(1<≡)◶Chk‿{!1=≠≢𝕩⋄Chk¨𝕩}𝕨
-  ! l≤○≠≢𝕩
-  ! ∧´l=l≠⊸↑≢𝕩
-  (𝕨⊸=/𝕩˜)¨↕1+¯1⌈´⚇1𝕨
-}
-
 ∾ ↩ Join           ⊘ ∾
-⊔ ← Group⟜(↕≠⚇1)   ⊘ Group
 
 # Searching
 IndexOf←(1<⌈○(≠≢))◶⊐‿{
@@ -169,7 +159,7 @@ ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩}
 X←Raw←{≤4}
 {
   chrs←⟨
-    "!∾↑↕⌽⍉⍋⍒⊐⊒∊⍷⊔"
+    "!∾↑↕⌽⍉⍋⍒⊐⊒∊⍷"
     ""
     "⚇"
   ⟩
-- 
cgit v1.2.3