aboutsummaryrefslogtreecommitdiff
path: root/svg.bqn
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-11-03 21:48:42 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-11-03 21:48:42 -0400
commita0bec0cf4d5d0ec9d9ebf0a4ce237f2266982cea (patch)
tree71a9e4c10a19aed749f5583052fe54072e77a7f3 /svg.bqn
parentfeafc455d067b3c6ab4a969db050a13540d4bd8a (diff)
Replace ≍○< with ⋈ in drawing and REPL sources
Diffstat (limited to 'svg.bqn')
-rw-r--r--svg.bqn4
1 files changed, 2 insertions, 2 deletions
diff --git a/svg.bqn b/svg.bqn
index be859fec..0334f5cf 100644
--- a/svg.bqn
+++ b/svg.bqn
@@ -22,9 +22,9 @@ FmtNums ← {
m‿p←"-."-'0'
s←𝕩<0⋄a←|𝕩⋄v←⌊0.5+k×a
⊔⟜('0'⊸+)´<∘∾˘⍉∾⟨
- ≍≍○<⟜(m¨)/s
+ ≍⋈⟜(m¨)/s
↕∘≠⊸{f←b≤𝕩⋄(∨´f)◶⟨≍,𝕊⟜(⌊÷⟜b)○(f⊸/)´∾b⊸|⌾(⊑⌽)⟩𝕨‿𝕩}⌊v÷k
- p¨⌾(⊑⌽)∘⊏⊸∾⍟(0<≠)↕∘≠⊸{f←×𝕩↩k|𝕩⋄𝕨(∨´f)◶⟨↕0‿2,(≍○<⟜(⌊÷⟜k)∾𝕊)⟜(b⊸×)○(f⊸/)⟩𝕩}v
+ p¨⌾(⊑⌽)∘⊏⊸∾⍟(0<≠)↕∘≠⊸{f←×𝕩↩k|𝕩⋄𝕨(∨´f)◶⟨↕0‿2,(⋈⟜(⌊÷⟜k)∾𝕊)⟜(b⊸×)○(f⊸/)⟩𝕩}v
}
FmtNum ← (2⌊≡)◶(⊑FmtNums∘⥊)‿(FmtNums⌾⥊)‿{𝕩⋄!0}