From 9dc45458d6387ec043f2a2031baa742eea5f6f55 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Fri, 3 Jul 2020 18:23:29 -0400
Subject: No need for parens around modified assignment function

---
 dc.bqn | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/dc.bqn b/dc.bqn
index 3467cebf..6e449e49 100755
--- a/dc.bqn
+++ b/dc.bqn
@@ -39,12 +39,12 @@ Tokenize←{
   id←⍷args∾(bA∊˜w/c)⍒⊸⊏i←(1-˜l×+`w)⊔c
   nv←+´bA∊˜⊑¨id
   c↩(w∨¬l∨c∊bW)/(vi+id⊐i)_ur_ w(vi+(≠id)+lu⊐lit)_ur_ cl c
-  c(/˜)↩¬(1∾1∾˜2⊸↓)⊸∧c∊bS
+  c/˜↩¬(1∾1∾˜2⊸↓)⊸∧c∊bS
   ⟨c,nv,nv-≠args,(nv↓id)∾lu⟩
 }
 
 Parse←{
-  a←𝕩∊(2↑bG)⋄at←1⌽a⋄𝕩(/˜)↩¬a⋄a(/˜)↩¬at
+  a←𝕩∊(2↑bG)⋄at←1⌽a⋄𝕩/˜↩¬a⋄a/˜↩¬at
   l←≠𝕩⋄sep←𝕩∊bS⋄𝕩↩(bF⊑˜⥊chF⊐<'⊣')¨_ur_ sep 𝕩⋄sep∨↩𝕩=2⊑bB
   o←𝕩=0⊑bB⋄c←𝕩=1⊑bB⋄v←a-˜𝕩≥vi⋄f←¬o∨c∨v∨sep
   na←(2×sep)+f×1+l↑0∾c∨v
@@ -81,7 +81,7 @@ f64←127-3
 GenFn←{
   ⟨⟩GenFn𝕩;
   ⟨t,nVar,nLoc,lits⟩←𝕨Tokenize𝕩
-  t(⊏˜)↩⍋+`-´<˘(2‿3⊏bB)=⌜t
+  t⊏˜↩⍋+`-´<˘(2‿3⊏bB)=⌜t
   nd←+´c←t=3⊑bB
   t↩((vi+nVar+≠lits)+↕∘≠)_ur_ c t
   ⟨a,na⟩←Parse t
-- 
cgit v1.2.3