diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-04-25 21:33:55 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-04-25 21:33:55 -0400 |
| commit | 9e068983753ef76949ede559984c5c787a3a9a3e (patch) | |
| tree | b079fdd8e9531ea82add884cdd1b17faf17cb529 /src | |
| parent | c15a166a65d55c806aea9f28f8b5bfc36954a757 (diff) | |
Use arithmetic for preliminary dyadic ⌊⌈
Diffstat (limited to 'src')
| -rw-r--r-- | src/r.bqn | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -29,8 +29,8 @@ ToArray ← Box⍟(1-IsArray) ≥ ← ≤˜ < ← Box ⊘ (1-≥) > ← (1-≤) -⌊ ↩ ⌊ ⊘ (>⊑{𝕨‿𝕩}) -⌈ ← -∘⌊∘- ⊘ (<⊑{𝕨‿𝕩}) +⌊ ↩ ⌊ ⊘ (⊣-≥×-) +⌈ ← -∘⌊∘- ⊘ (⊣-≤×-) | ← 0⊸≤◶-‿⊢ ≠ ← (0<=)◶⟨1⋄0⊑≢⟩ # LIMITED to monadic case |