6 lines
187 B
Plaintext
6 lines
187 B
Plaintext
N ← memo(/+⍉°√⊥10) # memoize, because we get many repeated 1s
|
|
|
|
°△ 1e4_1e3 # chunk the input
|
|
wait≡pool⍥₁₀N # thread each chunk of size 1e3
|
|
-⊃(⧻⊚=1|-₁⧻♭)
|