aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-08-03 22:01:45 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-08-03 22:01:45 -0400
commit046415773ace47b6b4e1a3747d115ef308548631 (patch)
tree68eb4bc104f91dee6ee1ff9e63d35fa93545763c
parente41b46f0dbb8630f861e02ffe7236718757c859b (diff)
Use list Join-to when possible
-rw-r--r--impl.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/impl.bqn b/impl.bqn
index 83a70461..caeab991 100644
--- a/impl.bqn
+++ b/impl.bqn
@@ -204,7 +204,7 @@ SelSub←{
Select←ToArray⊸(SelSub _onAxes_ 1)
⊏ ← 0⊸Select ⊘ Select
-JoinTo←{
+JoinTo←∨○(1≠=)◶∾‿{
s←𝕨Pair○≢𝕩
a←1⌈´k←≠¨s
! ∧´1≥a-k