diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-07-12 18:40:56 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-07-12 18:40:56 -0400 |
| commit | ff9a4c2abd72ed4308f145f540673a9318404738 (patch) | |
| tree | d02057c88469279a58891328487f2d3514b13029 /dc.bqn | |
| parent | a0e7f830446fa863b9fcfb2e5843962a5597e0f5 (diff) | |
Don't need to count left operands to find operator shift
Diffstat (limited to 'dc.bqn')
| -rwxr-xr-x | dc.bqn | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -148,7 +148,7 @@ DParse ← {nv‿r𝕊𝕩: r-↩ps∨a⋄op←r≥2⋄ro←op∨1⌽r=3 tr←(⌈`↕∘≠⊸ׯ1⌽ps)⊏ro∨r≥1 tf←(a≤○(⌈`(1+↕∘≠)⊸×)ps)∧(⊢∧2(|<≤)ps(⊢-⌈`∘×)+`)¬ro - opa←op>1↓0∾˜ps∨a⋄os←0⌈1-˜⌽↕∘≠⊸(⊣-⌈`∘×)⌽¬ro∨¯1⌽op + opa←op>1↓0∾˜ps∨a⋄os←⌽↕∘≠⊸(⊣-⌈`∘×)⌽¬ro oa←⌽/opa⋄fa←/(tf∨¬tr)∧(ro∧1⌽opa)<(r=1)∨op<¯1⌽opa dy←fa⊏1↓0∾˜(tr∧r≥0)∨r=0 n←𝕩≥vi+nv⋄id←/n<𝕩≥vi⋄cn←/n∨𝕩≤¯1⊑bC⋄u←⍷ob←cn⊏𝕩 |
