diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-06-17 16:24:47 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2021-06-17 16:31:41 -0400 |
| commit | 0dd15451548abe63d70b061309b261b51df36313 (patch) | |
| tree | 460a63e5ba78aa7b4c6f31e46881b64ab8574c20 /doc/depth.md | |
| parent | ce25d03b14a02761f4014d56251e29b40f8536c2 (diff) | |
Add list and bracket indication in depth diagram
Diffstat (limited to 'doc/depth.md')
| -rw-r--r-- | doc/depth.md | 20 |
1 files changed, 15 insertions, 5 deletions
diff --git a/doc/depth.md b/doc/depth.md index cc079ad6..df05c7c6 100644 --- a/doc/depth.md +++ b/doc/depth.md @@ -3,13 +3,21 @@ # Depth <!--GEN -d ← 48‿40 +d ← 48‿38 a ← ⟨⟨@,⟨@,@,@⟩⟩,@,⟨@,@⟩⟩ g ← "g"At"font-family=BQN,monospace|font-size=16px|text-anchor=middle|fill=currentColor|stroke-width=0|stroke=currentColor|stroke-linecap=round" rc ← At "class=code|stroke-width=1.5|rx=12" lc ← "line"At"class=lilac|stroke-width=2" tc ← "text"At"dy=-0.2em|class=Number" +bc ← "path"At"class=bluegreen|stroke-width=2|style=fill:none|opacity=0.4" +dc ← "text"At"font-size=18px|text-anchor=start|opacity=0.9" + +Path ← bc Elt "d"≍○<⊢ +Brak ← { + P ← ∾"M l l "∾¨ ·FmtNum∘⥊ ∾ + Path (d×⟨0.6×𝕩-0.75,0.4⟩) (-⌾⊑⊸P ∾ P⟜⌽) -⌾⊑⊸≍5‿13 +} TN←tc Enc FmtNum TL←lc Elt"x2"‿"y2"≍˘·FmtNum 0‿18-˜d×≍⟜1 @@ -19,14 +27,16 @@ Tree←{ d←1+0⌈´ds ww←1⌈+´ws p←2÷˜(-ww)+`»⊸+ws - ⟨d,ww,⟨TN d⟩∾(TL¨p)∾∾p≍⟜1⊸Gtr¨e⟩ + ⟨d,ww,⟨TN d,Brak ww⟩∾(TL¨p)∾∾p≍⟜1⊸Gtr¨e⟩ } -dp‿wd‿tr ← {@⊸≢◶⟨0‿1‿⟨TN 0⟩, Tree𝕊¨⟩𝕩} a +n0 ← 0‿1‿⟨TN 0, Path"M h"(∾∾¨)⟜FmtNum (-∾4∾+˜)5.6⟩ +dp‿wd‿tr ← {@⊸≢◶⟨n0, Tree𝕊¨⟩𝕩} a -dim ← ⟨1+wd,1.3+dp⟩ ⋄ sh ← ⟨-2÷˜⊑dim,¯0.8⟩ +dim ← ⟨1.2+wd,1.3+dp⟩ ⋄ sh ← ⟨-2÷˜⊑dim,¯0.8⟩ -((∾˜d)×((-∾+˜)1.8‿0.4)+sh∾dim) SVG g Enc ⟨ +((∾˜d)×((-∾+˜)1.7‿0.4)+sh∾dim) SVG g Enc ⟨ "rect" Elt rc∾(Pos d×sh) ∾ "width"‿"height"≍˘FmtNum d×dim + (dc Attr Pos d×sh+0.4‿0.1) Enc "List depth" tr ⟩ --> |