Use native Reverse and vector Index Of

1 files changed, 4 insertions, 6 deletions

diff --git a/spec/dzref b/spec/dzref
index 23ea3390..3502106a 100755
--- a/spec/dzref
+++ b/spec/dzref
@@ -69,11 +69,10 @@ Windows←{
   𝕨{(∾⟜(𝕨≠⊸↓≢𝕩)∘≢⥊>)<¨⊸⊏⟜𝕩¨s(¬+⌜○↕⊢)⥊𝕨}⍟(0<≠𝕨)𝕩
 }
 
-Reverse ← {!1≤≠≢𝕩 ⋄ (-↕⊸¬≠𝕩)⊏𝕩}
-Rotate ← {!Int𝕨 ⋄ l←≠𝕩⋄(l|𝕨+↕l)⊏𝕩} _onAxes_ 0
+Rotate ← ⌽ _onAxes_ 0
 
 ↕ ↩ ↕              ⊘ Windows
-⌽ ← Reverse        ⊘ Rotate
+⌽ ↩ ⌽              ⊘ Rotate
 
 
 #⌜
@@ -106,7 +105,7 @@ Group←{
 ⊔ ← Group⟜(↕≠⚇1)   ⊘ Group
 
 # Searching
-IndexOf←{
+IndexOf←(1<⌈○(≠≢))◶⊐‿{
   c←1-˜≠≢𝕨
   ! 0≤c
   𝕨 (0<≠𝕨)◶⟨0⎉c∘⊢,((+´<˘)∧`)≢⎉c⎉c‿∞⟩ 𝕩
@@ -209,8 +208,7 @@ X←Raw←{≤4}
   ⍎"Type    ← ⟨⟩⥊0⊸⥊"
 
   '!' Mod "{𝕩 ⋄ ≤1}⍟¬"
-  '↕' Mod "↕"
-  '∾' Mod "∾"
+  Mod⟜⥊¨ "↕∾⌽⊐"
 
 
   # checks if line is a builtin redefinition