diff options
Diffstat (limited to 'impl.bqn')
| -rw-r--r-- | impl.bqn | 7 |
1 files changed, 6 insertions, 1 deletions
@@ -256,7 +256,12 @@ Replicate ← {0<=𝕨}◶(⥊˜⟜≠Rep⊢)‿{!𝕨=○≠𝕩⋄𝕨Rep𝕩} #⌜ # LAYER 6: Everything else -Join←{ +Join←(1≠=)◶⟨∨´1≠=¨,1⟩◶{ + # List of lists + i←j←¯1⋄e←⟨⟩⋄a←𝕩 + {{e↩a⊑˜i↩𝕩⋄j↩¯1}⍟(i⊸≠)𝕩⋄(j↩j+1)⊑e}¨/≠¨𝕩 +}‿{ + # Multidimensional C←(<⟨⟩)⥊⊸∾⌜´⊢ # Cartesian array product ! IsArray 𝕩 s←≢¨𝕩 |
