day1.ua

f ← +×10:∩⊢⇌.▽≠0./+×♭⍉⊟.+1⇡9
Solve ← /+≡f ⍉⊞(□⊐⌕) {"one" "1" "two" "2" "three" "3" "four" "4" "five" "5" "six" "6" "seven" "7" "eight" "8" "nine" "9"}
Parse ← ⊜□≠, @\n

$ two1nine
$ eightwothree
$ abcone2threexyz
$ xtwone3four
$ 4nineeightseven2
$ zoneight234
$ 7pqrstsixteen

Solve Parse