From a0bec0cf4d5d0ec9d9ebf0a4ce237f2266982cea Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Wed, 3 Nov 2021 21:48:42 -0400
Subject: =?UTF-8?q?Replace=20=E2=89=8D=E2=97=8B<=20with=20=E2=8B=88=20in?=
 =?UTF-8?q?=20drawing=20and=20REPL=20sources?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 doc/combinator.bqn | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'doc')

diff --git a/doc/combinator.bqn b/doc/combinator.bqn
index f8369506..fe0f7879 100644
--- a/doc/combinator.bqn
+++ b/doc/combinator.bqn
@@ -30,13 +30,13 @@ DrawComp ← {𝕊𝕩:(names⊏˜comps⊐𝕩)𝕊𝕩; names 𝕊 spel:
   ops ← •BQN∘⥊¨ spel
   m2  ← ¬spel∊"˙˜"
   isC ← spel='˙'
-  _symb ← {𝕗<⊸∾≍○<}
+  _symb ← {𝕗<⊸∾⋈}
   lrand ← isC⊏⟨"𝔽"_symb,"𝕗"⟩
   lrsp  ← isC⊏"𝔽"‿"𝕗"
 
   app ← m2 {o←𝕩⊑ops⋄𝕨◶{𝕩_o}‿{𝕩_o_("𝔾"_symb)}𝕩⊑lrand}¨ ↕sh
   res ← >{⟨𝕏"𝕩","𝕨"𝕏"𝕩"⟩}¨app
-  map ← ⟨⟩⊸{(1<≡)◶(≍(𝕨∾0)≍○<⊢)‿((𝕨≍○<⊑)∾⟜∾·𝕊¨˜⟜(𝕨⊸∾¨((2×↕)- -⟜1)∘≠)1↓⊢)𝕩}¨res
+  map ← ⟨⟩⊸{(1<≡)◶(≍(𝕨∾0)⋈⊢)‿((𝕨⋈⊑)∾⟜∾·𝕊¨˜⟜(𝕨⊸∾¨((2×↕)- -⟜1)∘≠)1↓⊢)𝕩}¨res
   path‿name ← <˘⍉⁼><˘∘⍉¨map
 
   notBase ← (1<≠)◶⟨1,0≠¯1⊸⊑⟩¨¨ path
-- 
cgit v1.2.3