aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/e.bqn4
-rw-r--r--src/p.bqn4
2 files changed, 4 insertions, 4 deletions
diff --git a/src/e.bqn b/src/e.bqn
index 9184a228..5909027b 100644
--- a/src/e.bqn
+++ b/src/e.bqn
@@ -88,7 +88,7 @@ Explain ← {
(512‿0⊸⌈⊸(⊣∾˜(t+pad)-˜-˜÷2˙)dim+2×t) SVG gr Enc ∾⥊¨⟨
<"rect" Elt rc∾(Pos-pad)∾"width"‿"height"≍˘FmtNum dim
<"text" Enc src
- ("path" Elt ps∾"d"≍○<⊢)¨ pd
- gt Enc ⟨gb,gf⟩ Enc¨ (1⊸⊑¨ ≍○<○(tp Enc¨⊢) ∾¨) toks
+ ("path" Elt ps∾"d"⋈⊢)¨ pd
+ gt Enc ⟨gb,gf⟩ Enc¨ (1⊸⊑¨ ⋈○(tp Enc¨⊢) ∾¨) toks
}
diff --git a/src/p.bqn b/src/p.bqn
index a3fa568f..7907edae 100644
--- a/src/p.bqn
+++ b/src/p.bqn
@@ -12,12 +12,12 @@ pg ← At "class=red|style=fill:none|stroke-width=1"
pc ← At "class=red|r=4"
rc ← At "class=code|stroke-width=1|rx=5"
gr ← "g" At "font-family=BQN,monospace|font-size=18px"
-Path ← "path" Elt ⊣∾"d"≍○<⊢
+Path ← "path" Elt ⊣∾"d"⋈⊢
Pair ← {
"•Plot: 𝕨 and 𝕩 must consist of rows of numbers" ! 𝕨 ⊢⊘∧○((1≤=)◶⟨0,∧´∘⥊@⊸>⟩) 𝕩
"•Plot: 𝕨 and 𝕩 must have the same length" ! 𝕨 1⊘(≡○(¯1⊑≢)) 𝕩
- ⥊ 𝕨 (< (↕¯1⊑≢)⊘⊣ ≍○< ⊢)⎉1 𝕩
+ ⥊ 𝕨 (< (↕¯1⊑≢)⊘⊣ ⋈ ⊢)⎉1 𝕩
}
PairRec ← {
d ← 𝕨≍○≡𝕩