diff options
| -rw-r--r-- | doc/combinator.bqn | 2 | ||||
| -rw-r--r-- | md.bqn | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/doc/combinator.bqn b/doc/combinator.bqn index ab33b63b..678a8477 100644 --- a/doc/combinator.bqn +++ b/doc/combinator.bqn @@ -21,7 +21,7 @@ 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∾𝕩)⟩ } @@ -412,7 +412,7 @@ Markdown ← {filename𝕊𝕩: lInds +⎉1↩ 1‿0‿1‿0 unused ∧↩ include ∧↩ ¬ ≠` I2M ⥊ (¯1‿1+0‿3⊸⊏)˘ lInds linkGroup ← 1 -˜ (1‿0⥊˜≢)⊸(/ (⊣×>)○(+`I2M) ¬⊸/) ⥊lInds - links ← ProcLink¨˝˘ (lInds≠⊸∾2) (⊣⥊×´⊸↑) linkGroup ⊔ 𝕩 + links ← ProcLink¨˝˘ (lInds≠⊸≍2) (⊣⥊×´⊸↑) linkGroup ⊔ 𝕩 # Emphasis (still rudimentary) eMasks ← (unused ∧ 𝕩⊸=)¨ "*_" @@ -614,7 +614,7 @@ GetHighlights ← { GetMultiHighlights ← { start ← »⊸< 𝕨 groups ← (1 -˜ 𝕨 × +` start) ⊔ 𝕩 - <∘∾˘ ⍉ ((≠∾2˙) ⥊ ·> (/start) {𝕨⊸+⌾(1⊸⊑)𝕩}⟜GetHighlights¨ ⊢) groups + <∘∾˘ ⍉ ((≠≍2˙) ⥊ ·> (/start) {𝕨⊸+⌾(1⊸⊑)𝕩}⟜GetHighlights¨ ⊢) groups } |