diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-09-01 11:56:10 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2020-09-01 11:56:10 -0400 |
| commit | 74f441158d2c035e8d9a050ddc898de456ee593a (patch) | |
| tree | 6930ca606f5e2142bb4ba8a7d4fd4e62c4a6b2b9 /src | |
| parent | c23d80bb6081e83e06bd5f269ecc8596aff0de0e (diff) | |
Identity for ¬ is 1
Diffstat (limited to 'src')
| -rw-r--r-- | src/r.bqn | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -202,7 +202,7 @@ _sort ← {(𝕗⊑⟨Cmp,Cmp˜⟩)_grade_𝕗 ⊸ Select} + ↩ + _perv - ↩ - _perv ¬ ← 1+- -identity ← (0⊑⟨"Identity not found"!0˜⟩) {(0⊑𝕨){𝕗=𝕩}◶𝕩‿(1⊑𝕨)}´ ⟨+‿0,-‿0,×‿1,÷‿1,⋆‿1,√‿1,∧‿1,∨‿0,|‿0,⌊‿∞,⌈‿¯∞,<‿0,≤‿1,=‿1,≥‿1,>‿0,≠‿0⟩ +identity ← (0⊑⟨"Identity not found"!0˜⟩) {(0⊑𝕨){𝕗=𝕩}◶𝕩‿(1⊑𝕨)}´ ⟨+‿0,-‿0,×‿1,÷‿1,⋆‿1,√‿1,∧‿1,∨‿0,¬‿1,|‿0,⌊‿∞,⌈‿¯∞,<‿0,≤‿1,=‿1,≥‿1,>‿0,≠‿0⟩ Deshape←IsArray◶{⟨𝕩⟩}‿⥊ Reshape←{ |