aboutsummaryrefslogtreecommitdiff
path: root/src/r0.bqn
diff options
context:
space:
mode:
Diffstat (limited to 'src/r0.bqn')
-rw-r--r--src/r0.bqn5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/r0.bqn b/src/r0.bqn
index a7b7f4c4..edde4d9b 100644
--- a/src/r0.bqn
+++ b/src/r0.bqn
@@ -2,8 +2,8 @@
# Fill _fillBy_
# +-×⌊=≤≢⥊⊑↕⌜⊘
# Provides:
-# ⌊⌈|<>≠≥⊢⊣∾↑↓⊏˙˜´∘○⊸⟜◶⍟
-# ^^^^^^^ ^^^^ ^ ^^ are limited, suitable for r1
+# ⌊⌈|<>≠≥⊢⊣∾⋈↑↓⊏˙˜´∘○⊸⟜◶⍟
+# ^^^^^^^ ^^^^^ ^ ^^ are limited, suitable for r1
⊢ ← {𝕩}
⊣ ← {𝕩}⊘{𝕨}
@@ -26,6 +26,7 @@ Box ← {𝕩Fill⟨⟩⥊⟨𝕩⟩}
| ← 0⊸≤◶-‿⊢
≠ ← (0<=)◶⟨1⋄0⊑≢⟩ # LIMITED to monadic case
+⋈ ← {⟨𝕩⟩} ⊘ {⟨𝕨,𝕩⟩} # LIMITED by not having a result fill
∾ ← {k←≠𝕨⋄k⊸≤◶⟨⊑⟜𝕨⋄-⟜k⊑𝕩˜⟩⌜↕k+≠𝕩} # LIMITED to two list arguments
↑ ← {⊑⟜𝕩⌜↕𝕨} # LIMITED to number 𝕨 and list 𝕩
↓ ← {(𝕨⊸+⊑𝕩˙)⌜↕(≠𝕩)-𝕨} # LIMITED to number 𝕨 and list 𝕩