aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xdzref16
1 files changed, 1 insertions, 15 deletions
diff --git a/dzref b/dzref
index c4a5c4e9..f117ddd4 100755
--- a/dzref
+++ b/dzref
@@ -90,20 +90,6 @@ Find←{
∊ ← UniqueMask ⊘ (⊐˜<≠∘⊢)
⍷ ← ∊⊸/ ⊘ Find
-ReorderAxes←{
- 𝕩↩<⍟(0=≡)𝕩
- ! 1≥=𝕨
- 𝕨↩⥊𝕨
- ! 𝕨≤○≠≢𝕩
- ! ∧´Nat¨⥊𝕨
- r←(=𝕩)-+´¬∊𝕨
- ! ∧´𝕨<r
- 𝕨↩𝕨∾𝕨(¬∘∊˜/⊢)↕r
- (𝕨⊸⊏⊑𝕩˜)¨↕⌊´¨𝕨⊔≢𝕩
-}
-Transpose←(=-1˜)⊸ReorderAxes⍟(0<=)
-⍉ ← Transpose ⊘ ReorderAxes
-
OccurrenceCount ← ⊐˜(⊢-⊏)⍋∘⍋
ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩}
@@ -113,7 +99,7 @@ ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩}
X←Raw←{F:≤4}
{v:
chrs←⟨
- "!∾↕⌽⍉⊐⊒∊⍷"
+ "!∾↕⌽⊐⊒∊⍷"
""
"⚇"