— Day 1: Trebuchet?! —

Mix.install([{:kino, "~> 0.11.3"}])

– Part One –

You try to ask why they can’t just use a weather machine (“not powerful enough”) and where they’re even sending you (“the sky”) and why your map looks mostly blank (“you sure ask a lot of questions”) and hang on did you just say the sky (“of course, where do you think snow comes from”) when you realize that the Elves are already loading you into a trebuchet (“please hold still, we need to strap you in”).

As they’re making the final adjustments, they discover that their calibration document (your puzzle input) has been amended by a very young Elf who was apparently just excited to show off her art skills. Consequently, the Elves are having trouble reading the values on the document.

The newly-improved calibration document consists of lines of text; each line originally contained a specific calibration value that the Elves now need to recover. On each line, the calibration value can be found by combining the first digit and the last digit (in that order) to form a single two-digit number.

For example:

1abc2
pqr3stu8vwx
a1b2c3d4e5f
treb7uchet

In this example, the calibration values of these four lines are 12, 38, 15, and 77. Adding these together produces 142.

Consider your entire calibration document. What is the sum of all of the calibration values?

– Part Two –

Your calculation isn’t quite right. It looks like some of the digits are actually spelled out with letters: one, two, three, four, five, six, seven, eight, and nine also count as valid “digits”.

Equipped with this new information, you now need to find the real first and last digit on each line. For example:

two1nine
eightwothree
abcone2threexyz
xtwone3four
4nineeightseven2
zoneight234
7pqrstsixteen

In this example, the calibration values are 29, 83, 13, 24, 42, 14, and 76. Adding these together produces 281.

What is the sum of all of the calibration values?

calibration_input = Kino.Input.textarea("calibration")

defmodule Trebuchet do
  def extract_integers(s) do
    [head | tail] =
      ~r/\d/
      |> Regex.scan(s)
      |> List.flatten()

    Integer.parse(head <> List.last(tail, head))
  end

  def part_one(calibration_input) do
    calibration_input
    |> Kino.Input.read()
    |> String.split()
    |> Enum.reduce(0, fn s, acc ->
      {value, _} = extract_integers(s)
      acc + value
    end)
  end

  @words [
    {"one", "1"},
    {"two", "2"},
    {"three", "3"},
    {"four", "4"},
    {"five", "5"},
    {"six", "6"},
    {"seven", "7"},
    {"eight", "8"},
    {"nine", "9"}
  ]

  def convert_words_to_values(s) do
    Enum.reduce(@words, s, fn {word, value}, acc ->
      String.replace(acc, word, String.first(word) <> value <> String.last(word))
    end)
  end

  def part_two(calibration_input) do
    calibration_input
    |> Kino.Input.read()
    |> String.split()
    |> Enum.map(&amp;convert_words_to_values/1)
    |> Enum.reduce(0, fn s, acc ->
      {value, _} = extract_integers(s)
      acc + value
    end)
  end
end

Trebuchet.part_one(calibration_input)

Trebuchet.part_two(calibration_input)