blob: 8554d1ee6943571af973cabbf0d7c6b68d13fffe (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
IsAsciiNum ⇐ ('0'⊸≤∧≤⟜'9')
# based on leah2's function
ReadInt ⇐ {
𝕨 𝕊 𝕩: '-'=⊑𝕩? -𝕨 𝕊 1↓𝕩;
𝕨 𝕊 𝕩: (𝕨⊸×+⊣)´∘⌽-⟜'0'𝕩
}
ReadDec ⇐ 10⊸ReadInt
SplitOn ⇐ ((⊢ (-1˙)⍟⊣¨ +`∘(1⊸»<⊢))∘(≡¨)⊔⊢)
SplitAt ← ((⊣≤↕∘≠∘⊢)⊔⊢)
_fix ⇐ {𝕩 𝕊∘⊢⍟≢ 𝔽 𝕩}
ImportBqnLibs ⇐ {•Import 𝕩∾˜"/"∾˜¯1↓1⊑•SH "printenv"‿"BQNLIBS"}
|