aboutsummaryrefslogtreecommitdiff
path: root/dzref
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-09-04 18:11:10 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-09-04 18:32:36 -0400
commit399c717259ae8b310a3503d4098acec3b9b65486 (patch)
treef62d0f31fde8829574ec8c4b733d2903e289e597 /dzref
parent4d61bd6a5546e4ec6687042882afa04ad37bf700 (diff)
Affine characters and newer primitives added to dzaima/BQN
Diffstat (limited to 'dzref')
-rwxr-xr-xdzref8
1 files changed, 3 insertions, 5 deletions
diff --git a/dzref b/dzref
index 9194afa9..f51e4ca1 100755
--- a/dzref
+++ b/dzref
@@ -1,7 +1,6 @@
#!/usr/bin/env dbqn
impl ← "
-Λ™ ← {𝕩⋄𝕗}
#⌜
# LAYER 4: Operators
@@ -87,7 +86,7 @@ Find←{
𝕨 β‰‘βŽ‰r (≒𝕨) β†•βŽ‰r 𝕩
}
-⊐ ← !∘0 ⊘ IndexOf
+⊐ ← ⊐ ⊘ IndexOf
∊ ← UniqueMask ⊘ (⊐˜<β‰ βˆ˜βŠ’)
⍷ ← ∊⊸/ ⊘ Find
@@ -100,8 +99,8 @@ ProgressiveIndexOf ← {π•¨βŠβ—‹(β‰Λ˜βŸœOccurrenceCountπ•¨βŠΈβŠ)𝕩}
X←Raw←{F:≀4}
{v:
chrsβ†βŸ¨
- "!βˆΎβ†•βŒ½βŠβŠ’βˆŠβ·"
- "Λ™"
+ "βˆΎβ†•βŒ½βŠβŠ’βˆŠβ·"
+ ""
"βš‡"
⟩
nc ← β‰ Β¨chrs
@@ -123,7 +122,6 @@ X←Raw←{F:≀4}
⍎¨ ⟨
"IsArray ← 0≠≑"
- '!' Mod "{𝕩 β‹„ ≀1}⍟¬"
⟩∾Mod⟜β₯ŠΒ¨ "β†•βˆΎβŒ½βŠ"