7 lines
218 B
BQN
7 lines
218 B
BQN
|
#!/usr/bin/env BQN
|
|||
|
|
# SPDX-License-Identifier: AGPL-3.0-or-later
|
|||
|
|
# SPDX-FileCopyrightText: 2023 Rampoina <rampoina@protonmail.com>
|
|||
|
|
|
|||
|
|
FindIdx⇐/○⥊⟜(↕≢)∘⍷
|
|||
|
|
SplitOnEmpty⇐{𝕩⊔˜(⊢-˜+`׬)0=≠¨𝕩}
|