diff options
| author | Marshall Lochbaum <mwlochbaum@gmail.com> | 2022-06-05 15:06:39 -0400 |
|---|---|---|
| committer | Marshall Lochbaum <mwlochbaum@gmail.com> | 2022-06-05 15:06:39 -0400 |
| commit | d6b2e28359a2e0f5f8a0f98782b30d34c18138a1 (patch) | |
| tree | 12f2174c44961889f9c17f0dd84f1b6aeefc319a /spec | |
| parent | 7e5d0fcc39fd8a683fc7010af064849b454b432b (diff) | |
Simplify First, since it now errors on empty to match Pick
Diffstat (limited to 'spec')
| -rw-r--r-- | spec/reference.bqn | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/spec/reference.bqn b/spec/reference.bqn index 4e9a0a88..e2780130 100644 --- a/spec/reference.bqn +++ b/spec/reference.bqn @@ -165,7 +165,7 @@ Pick1←{ } Pickd←(∨´∘⥊IsArray¨∘⊣)◶Pick1‿{Pickd⟜𝕩¨𝕨} Pick←IsArray◶⥊‿⊢⊸Pickd -First←(0<≠)◶⟨!∘0,0⊸⊑⟩∘Deshape +First←0⊑Deshape match←{¬∘(0⊑𝕨)◶(1⊑𝕨)‿𝕩}´⟨ ⟨≠○IsArray , 0⟩ |