aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-08-12 20:38:54 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-08-12 21:02:26 -0400
commit2b99c84e96ad15b9104f00c7be0f228d2867a280 (patch)
tree021b985d2de0ba99499230ac03bbb9425bd3f058 /src
parenta91db82531cc2f9e58d2fb76bbc159d1f16c9b6b (diff)
Move ⊘ to the non-self-hosted part of the runtime
Diffstat (limited to 'src')
-rwxr-xr-xsrc/pr.bqn2
-rw-r--r--src/r.bqn3
2 files changed, 2 insertions, 3 deletions
diff --git a/src/pr.bqn b/src/pr.bqn
index e930e6c6..d9ae5ef4 100755
--- a/src/pr.bqn
+++ b/src/pr.bqn
@@ -24,7 +24,7 @@ Inc ← {
}
# Required functionality passed in as an argument
-pnam ← ⟨"IsArray","Type","Log","GroupLen","GroupOrd"⟩∾names⊏˜chr⊐"!+-×÷⋆⌊=≤≢⥊⊑↕⌜`"
+pnam ← ⟨"IsArray","Type","Log","GroupLen","GroupOrd"⟩∾names⊏˜chr⊐"!+-×÷⋆⌊=≤≢⥊⊑↕⌜`⊘"
E_isdef ← (3≤≠)◶⟨0,∧´⟨chr," ","←↩"⟩∊˜¨3⊸↑⟩
diff --git a/src/r.bqn b/src/r.bqn
index f2c688d1..0385c9c6 100644
--- a/src/r.bqn
+++ b/src/r.bqn
@@ -1,8 +1,7 @@
# BQN runtime. Requires:
-# IsArray Type Log !+-×÷⋆⌊=≤≢⥊⊑↕⌜`
+# IsArray Type Log !+-×÷⋆⌊=≤≢⥊⊑↕⌜`⊘
◶ ← {𝕨((𝕨𝔽𝕩)⊑𝕘){𝔽}𝕩} # LIMITED to number left operand result
-⊘ ← {𝕨((1{𝔽}𝕨)-0)◶𝔽‿𝔾 𝕩}
⊢ ← {𝕩}
⊣ ← {𝕩}⊘{𝕨}
˜ ← {𝕩𝔽𝕨⊣𝕩}