diff options
Diffstat (limited to 'spec/reference.bqn')
| -rw-r--r-- | spec/reference.bqn | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/spec/reference.bqn b/spec/reference.bqn index 8d872dad..d3f84ec9 100644 --- a/spec/reference.bqn +++ b/spec/reference.bqn @@ -377,7 +377,9 @@ Replicate ← {0<=𝕨}◶(⥊˜⟜≠Rep⊢)‿{!𝕨=○≠𝕩⋄𝕨Rep𝕩} { Identity ↩ 𝕨˙⊸=◶Identity‿𝕩 }´¨ ⟨ ∨‿0 , ∧‿1 ⟩ -Join←(0<=)◶{!IsArray𝕩⋄>𝕩}‿{ +JoinEmpty ← ({!𝕨≤○≠𝕩⋄𝕨≠⊸((𝕨×≠⊸↑)∾↓)𝕩}○≢⥊⊢)⟜Fill + +Join←(0<≠∘⥊)◶⟨JoinEmpty, (0<=)◶{!IsArray𝕩⋄>𝕩}‿{ ! IsArray 𝕩 s←≢¨𝕩 a←(≢𝕩){(s⊑˜(j=𝕩)⊸×)¨↕𝕨}¨j←↕r←=𝕩 @@ -389,7 +391,7 @@ Join←(0<=)◶{!IsArray𝕩⋄>𝕩}‿{ ! s≡(<t)∾⌜´h⥊¨¨l i←(<⟨⟩)∾⌜´h{((↕¯1⊸⊑)-𝕩/𝕨⥊¨»)+`𝕩}¨l >i<¨⊸⊏⍟(0<≠∘⊣)¨l/𝕩 -}⍟(0<≠∘⥊) +}⟩ Group←{ ! IsArray 𝕩 |