aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/e.bqn6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/e.bqn b/src/e.bqn
index b5921974..62eed453 100644
--- a/src/e.bqn
+++ b/src/e.bqn
@@ -1,9 +1,9 @@
# Expression explainer: generates an svg diagram to show how a BQN
# program is evaluated
-wh ← 10.75‿24
+wh ← 10.84‿24
pad← wh×2‿1
-to ← 1‿¯1+wh÷2‿3
+to ← 0‿¯1+wh÷2‿3
t ← 10
ps ← At "stroke=currentColor|fill=none|stroke-width=1"
@@ -78,7 +78,7 @@ Explain ← {
je←j∾¯1.25
q←(/k≤j≠p⊏je-la) (⊏≍⊣) p
- pd ← <∘(∾"M VH"∾¨∾⟜⌽)˘˜˝ q ⊏ FmtNum¨ ⍉wh×0.6‿0.1+je≍d
+ pd ← <∘(∾"M VH"∾¨∾⟜⌽)˘˜˝ q ⊏ FmtNum¨ ⍉wh×0.5‿0.1+je≍d
tp ← ii ("text" Attr Pos)∘(to+wh×≍)¨ (k/p)⊏d
dim← (wh×⟨≠𝕩,2+⌈´d⟩)+2‿0×pad
(512‿0⊸⌈⊸(⊣∾˜(t+pad)-˜-˜÷2˙)dim+2×t) SVG gr Enc ∾⥊¨⟨