day 1!

.gitignore

@@ -0,0 +1 @@
+*.in

day01.ua

@@ -0,0 +1,38 @@
+PartI ← (
+  ▽×⊃(≤@9|≥@0|∘) # digits only
+  parse⊟⊃(⊢|⊢⇌)  # add them together
+)
+
+PartII ← (
+  .
+  ⊐≡⌕⊙¤ {"one" "two" "three"
+         "four" "five" "six"
+         "seven" "eight" "nine"}
+  /+≡×+1⇡9
+  ≡((⋅∘|+@0⊙;)>0.)
+  PartI
+)
+
+$ 1abc2
+$ pqr3stu8vwx
+$ a1b2c3d4e5f
+$ treb7uchet
+
+⊜PartI≠@\n.
+/+
+
+$ two1nine
+$ eightwothree
+$ abcone2threexyz
+$ xtwone3four
+$ 4nineeightseven2
+$ zoneight234
+$ 7pqrstsixteen
+
+⊜PartII≠@\n.
+/+
+
+&fras "day01.in"
+
+⊜(⊟⊃(PartI|PartII))≠@\n.
+/+