aboutsummaryrefslogtreecommitdiff
path: root/src/r1.bqn
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2021-12-15 08:41:37 -0500
committerMarshall Lochbaum <mwlochbaum@gmail.com>2021-12-15 08:41:37 -0500
commitca078aa60a5c1724eaccf6744a9d59ea1fcc1241 (patch)
tree5e6ee8607b970595a2f9a00a612693cf2a0ccbda /src/r1.bqn
parent712dba28fd97bb4e3a1b207f93327191259f7db2 (diff)
Fix ⊑'s handling of atom in nested 𝕨
Diffstat (limited to 'src/r1.bqn')
-rw-r--r--src/r1.bqn2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/r1.bqn b/src/r1.bqn
index 6faf7897..6501c2d4 100644
--- a/src/r1.bqn
+++ b/src/r1.bqn
@@ -253,7 +253,7 @@ Pick1←{
i←0⋄𝕨{i↩(𝕩NormIndP𝕨)+𝕩×i}¨s
i⊑⥊𝕩
}⟜ToArray
-Pickd←(IsSimple⥊∘⊣)◶{Pickd⟜𝕩⌜𝕨}‿Pick1
+Pickd←IsArray◶⟨1,IsSimple⥊⟩∘⊣◶{Pickd⟜𝕩⌜𝕨}‿Pick1
Pick←IsArray∘⊣◶Pick0‿Pickd
_multiAxis←{