From eeac7dd581f7a575cead857ab576beaee2cf5355 Mon Sep 17 00:00:00 2001 From: Marshall Lochbaum Date: Sat, 5 Sep 2020 08:03:14 -0400 Subject: =?UTF-8?q?dzaima/BQN=20now=20fully=20supports=20=E2=8C=BD?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- dzref | 20 ++------------------ 1 file changed, 2 insertions(+), 18 deletions(-) (limited to 'dzref') diff --git a/dzref b/dzref index 9f5a6ecf..4bf766ae 100755 --- a/dzref +++ b/dzref @@ -21,19 +21,6 @@ _depthOp_←{ Nat←IsArray◶⟨0⊸≤∧⌊⊸=,0⟩ -_onAxes_←{ - F←𝔽 - (𝔾<≡)∘⊣◶{ # One axis - ! 1≤=𝕩 - 𝕨F𝕩 - }‿{ # Multiple axes - ! 1≥=𝕨 - ! 𝕨≤○≠≢𝕩 - R←{(⊑𝕨)F(1↓𝕨)⊸R˘𝕩}⍟{0<≠𝕨} - 𝕨R𝕩 - } -} - Windows←{ ! IsArray 𝕩 ! 1≥=𝕨 @@ -44,10 +31,7 @@ Windows←{ 𝕨{(∾⟜(𝕨≠⊸↓≢𝕩)∘≢⥊>)<¨⊸⊏⟜𝕩¨s(¬+⌜○↕⊢)⥊𝕨}⍟(0<≠𝕨)𝕩 } -Rotate ← ⌽ _onAxes_ 0 - ↕ ↩ ↕ ⊘ Windows -⌽ ↩ ⌽ ⊘ Rotate #⌜ @@ -99,7 +83,7 @@ ProgressiveIndexOf ← {𝕨⊐○(≍˘⟜OccurrenceCount𝕨⊸⊐)𝕩} X←Raw←{F:≤4} {v: chrs←⟨ - "∾↕⌽⊐⊒∊⍷" + "∾↕⊐⊒∊⍷" "" "⚇" ⟩ @@ -122,7 +106,7 @@ X←Raw←{F:≤4} ⍎¨ ⟨ "IsArray ← 0≠≡" - ⟩∾Mod⟜⥊¨ "↕∾⌽⊐" + ⟩∾Mod⟜⥊¨ "↕∾⊐" # checks if line is a builtin redefinition -- cgit v1.2.3