diff options
Diffstat (limited to 'doc')
| -rw-r--r-- | doc/combinator.bqn | 6 | ||||
| -rw-r--r-- | doc/functional.md | 2 |
2 files changed, 4 insertions, 4 deletions
diff --git a/doc/combinator.bqn b/doc/combinator.bqn index fe0f7879..fa4466f7 100644 --- a/doc/combinator.bqn +++ b/doc/combinator.bqn @@ -17,11 +17,11 @@ n ← Text∘‿2⥊⟨"y",FmtNum h-37, "fill","currentColor"⟩ case ← (¯1‿1×w÷4.6) ("g"At"font-size=21px|font-family=BQN,monospace")_trans¨ 25 lt← Text∘‿2⥊⟨"y",FmtNum h-105, "font-size","19px"⟩ -FromPath ← ≠≍+´ +FromPath ← ≠⋈+´ Connect ← { e ← FromPath ¯1↓𝕨 curve ← ⟨1‿1.3, 1‿1.25‿0.9‿1, 0.5‿1.25‿1‿0⟩ - c ← 𝕨 ((1=≠)⊸∧⟜(2=⊑))◶⟨⟩‿(⊑⊸((⊣(⊢×≢∘⊢⥊1≍⊣)curve⊑˜×)○×)⟜(1⊸⊑)) 𝕩 + c ← 𝕨 ((1=≠)⊸∧⟜(2=⊑))◶⟨⟩‿(⊑⊸((⊣(⊢×≢∘⊢⥊1⋈⊣)curve⊑˜×)○×)⟜(1⊸⊑)) 𝕩 "path" Elt ps∾⟨"d",∾("M"∾(2÷˜≠c)⊏"LQC")∾⟜(Fmt Pnt˘⌾(∘‿2⊸⥊))¨e‿(c∾𝕩)⟩ } @@ -42,7 +42,7 @@ DrawComp ← {𝕊𝕩:(names⊏˜comps⊐𝕩)𝕊𝕩; names 𝕊 spel: notBase ← (1<≠)◶⟨1,0≠¯1⊸⊑⟩¨¨ path path ↓¨¨˜↩ -¬notBase vv ← (1↓⌽↓"𝕨"‿"𝕩") ∾˜¨⎉1 notBase /¨ name - vl ← (2 ≍⚇0 ⟨0⟩‿⟨¯1,1⟩) ∾˜¨⎉1 notBase FromPath¨∘/¨ path + vl ← (2 ⋈⚇0 ⟨0⟩‿⟨¯1,1⟩) ∾˜¨⎉1 notBase FromPath¨∘/¨ path vp ← Pnt¨¨ vl g ← (20+h×⊢)⊸Groups⟜(5+w×0.5+⊢)○↕´ sh diff --git a/doc/functional.md b/doc/functional.md index 071ecd2c..54989fae 100644 --- a/doc/functional.md +++ b/doc/functional.md @@ -73,7 +73,7 @@ To ← { } 0‿0‿512‿512 SVG gr Enc ∾⟨ - ⥊<("text"Attr"font-size"‿"24"∾Pos 256‿38) Enc """Functional programming""" + ⋈("text"Attr"font-size"‿"24"∾Pos 256‿38) Enc """Functional programming""" ('0'+↕∘≠)⊸(Circ¨) cat Enc˜⟜("text" Attr ·Pos 10⊸×)´¨ pl ∾To¨ arr |