Clean up bins diagram

1 files changed, 10 insertions, 7 deletions

diff --git a/doc/order.md b/doc/order.md
index 409c022b..195452b1 100644
--- a/doc/order.md
+++ b/doc/order.md
@@ -129,18 +129,21 @@ tx ← ↕∘≠ xt ⋄ y ← +`0.5‿1.6‿0.8
 dim ← ⟨1.5+≠xt, 0.5+¯1⊑y⟩ ⋄ sh ← ¯1.8‿0
 ig ← "fill=currentColor|font-size=16|opacity=0.8|class=Number"
 pa ← "path"At"class=green|style=fill:none|stroke-width=2|stroke-linecap=round|opacity=0.9"
+
 PD ← ∾∾¨⟜FmtNum
-brk ← "m vv"PD 3×2‿¯6‿7‿¯1
+brk ← "m vm "PD 3×2‿¯6‿7‿0‿¯1
 dot ← "hm hm h"⊸PD¨ (⊑d)×dl←(0.4⌾(¯1⊸⊑)⋈1⌾⊑) 7⥊0.12‿0.1‿0
-Paths ← lg Ge Line∘+⟜(≍˘⟜-0.2⋈˜0.04×·÷´-˝˘)¨
+bin ← ∾("M "PD d×(-0.27+´⊑dl)⋈0.25+⊑y)⌾⊑⥊(<brk)≍˘dot(1⌽⌽⊸∾)3⥊<"h"PD⟨6-˜⊑d⟩
+
+qu ← <˘Text⟜""""¨ (2↑y)⋈˜¨¯0.25≍˘0.75-˜≠¨wt‿xt
+tt ← qu ∾¨⌾(2⊸↑) y (⋈˜¨⟜(↕≠)Text¨⊢)¨ ⟨wt,xt,FmtNum b⟩
 
 ((∾˜d)×((-∾+˜)1‿0.2)+sh∾dim) SVG g Ge ⟨
   "rect" Elt rc ∾ sh Rp dim
-  Paths (⋈¨⟜tx˘(0.6-˜b⊸⊏)⊸≍tx) ≍¨⟜<˘ (0.3∾0.03ׯ1‿2‿0)+⌾⥊2↕y
-  pa Elt "d"⋈∾("M "PD d×(-0.27+´⊑dl)⋈0.4+⊑y)⌾⊑⥊(<brk)≍˘dot(1⌽⌽⊸∾)3⥊<"h"PD⟨6-˜⊑d⟩
-  mg Ge (1‿1‿0⊏ci) "class="⊸∾⊸Ge¨ y (⋈˜¨⟜(↕≠)Text¨⊢)¨ ⟨wt,xt,FmtNum b⟩
-  mg Ge (1‿1⊏ci) "class="⊸∾⊸Ge¨ Text⟜""""¨ (2↑y)⋈˜¨¯0.25≍˘0.75-˜≠¨wt‿xt
-  ig Ge ((⋈⟜(0.25+⊑y)¨-⟜0.6) Text¨ FmtNum) ↕1+≠wt
+  lg Ge (⋈¨⟜tx˘(0.6-˜b⊸⊏)⊸≍tx) (Line≍+·≍˘⟜-0.04×÷○(-´)⋈5˙)¨⟜<˘ 2↕0.34⊸+⌾⊑y
+  pa Elt "d"‿bin
+  mg Ge (1‿1‿0⊏ci) "class="⊸∾⊸Ge¨ tt
+  ig Ge ((⋈⟜(0.39+⊑y)¨-⟜0.6) Text¨ FmtNum) ↕1+≠wt
   cg Ge (¯0.8≍¨y) Text⟜Highlight¨ "𝕨"‿"𝕩"‿"𝕨⍋𝕩"
 ⟩
 }