blob: 37c518d1fd61e5ba174fa23cbf57a140d4d9f707 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
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"}
Xor ⇐ (¬⊸∧∨∧⟜¬)
|
