diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-09-13 16:06:14 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-09-13 16:06:14 -0400 |
| commit | 948f014a6b363e12477e4e957e0fa44c5ffd3451 (patch) | |
| tree | de06bcbb8ca4824eab7ef2989841c7aa4a17116f /src/r.bqn | |
| parent | ca8a2b0a40577a48677fb5ef20be34b3db0aa106 (diff) | |
Compiler support for and usage of «»
Diffstat (limited to 'src/r.bqn')
| -rw-r--r-- | src/r.bqn | 7 |
1 files changed, 7 insertions, 0 deletions
@@ -492,6 +492,13 @@ Find←{ ⊐ ← SelfClas ⊘ (1 _search) ∊ ← ⊢_self ⊘ (0 _search˜) +ShiftBefore ← {!𝕨1⊸⌊⊸≤○=𝕩 ⋄ ( ≠𝕩)↑𝕨∾𝕩} +ShiftAfter ← {!𝕨1⊸⌊⊸≤○=𝕩 ⋄ (-≠𝕩)↑𝕩∾𝕨} +Nudge ← (1↑0↑⊢)⊸ShiftBefore +NudgeBack ← (1↑0↑⊢)⊸ShiftAfter +» ← Nudge ⊘ ShiftBefore +« ← NudgeBack ⊘ ShiftAfter + ReorderChk←{ "𝕨⍉𝕩: 𝕨 must have rank at most 1" ! 1≥=𝕨 "𝕨⍉𝕩: Length of 𝕨 must not exceed rank of 𝕩" ! 𝕨≤○≠≢𝕩 |