$\huge{元氣ですかーーーーッ！！！}$
$\huge{元氣があればなんでもできる！}$
$\huge{闘魂とは己に打ち克つこと。}$
$\huge{そして闘いを通じて己の魂を磨いていく}$
$\huge{ことだと思います}$
はじめに
今年もいよいよやってまいりました！ 
Elixirで、Advent of code 2023の問題を解いてみます。
1日1題ずつ問題が出題されます。
実行時間は問われません。
What is Elixir ?
Elixirという素敵なプログラミング言語があるのですね。
その素敵具合は「Elixir Saves Pinterest $2 Million a Year In Server Costs」によく現れています。開発者も経営者もこの事実に瞠目することでしょう。 $2 Million/年の節約ですってよ！、奥さん。
Day 9: Mirage Maintenance
Day 9: Mirage Maintenanceを解いてみます。
問題はリンク先をご参照ください。
Google翻訳を使って問題を理解しました。
英文が（私にとって長く）なかなか意味がわかりませんでした。
今回は普通に問いてできました。法則みたいなものが見つかると早いです。正確に言うとたぶんこうかなあと適当に加算、減算をしたらうまくいきました。
私の答え Part 1
私の答えです。
折りたたんでおきます。
▶を押して開いてください。
私の答え
input = """
0 3 6 9 12 15
1 3 6 10 15 21
10 13 16 21 30 45
"""
defmodule Awesome do
def run(input) do
parse(input)
|> solve()
end
defp solve(list_of_lists) do
list_of_lists
|> Enum.map(fn list ->
list
|> steps()
|> do_solve()
end)
|> Enum.sum()
end
defp steps(list) do
Stream.iterate(0, & &1)
|> Enum.reduce_while([list], fn 0, [head | _] = acc ->
new_list = step(head)
{step_halt_or_cont(new_list), [new_list | acc]}
end)
end
defp step(list) do
list
|> Enum.reduce({nil, []}, fn
n, {nil, []} -> {n, []}
n, {before, acc} -> {n, [n - before | acc]}
end)
|> elem(1)
|> Enum.reverse()
end
defp all_zero?(list) do
list
|> Enum.all?(&(&1 == 0))
end
defp step_halt_or_cont(list) do
case all_zero?(list) do
true -> :halt
false -> :cont
end
end
defp do_solve(list_of_lists) do
list_of_lists
|> Enum.reduce(0, fn list, acc ->
acc + Enum.at(list, -1)
end)
end
defp parse(input) do
input
|> String.split("\n", trim: true)
|> Enum.map(fn s ->
s
|> String.split(" ")
|> Enum.map(&String.to_integer/1)
end)
end
end
Awesome.run(input)
私の答え Part 2
私の答えです。
折りたたんでおきます。
▶を押して開いてください。
私の答え
defmodule Awesome2 do
def run(input) do
parse(input)
|> solve()
end
defp solve(list_of_lists) do
list_of_lists
|> Enum.map(fn list ->
list
|> steps()
|> Enum.reverse()
|> do_solve()
end)
|> Enum.sum()
end
defp steps(list) do
Stream.iterate(0, & &1)
|> Enum.reduce_while([list], fn 0, [head | _] = acc ->
new_list = step(head)
{step_halt_or_cont(new_list), [new_list | acc]}
end)
end
defp step(list) do
list
|> Enum.reduce({nil, []}, fn
n, {nil, []} -> {n, []}
n, {before, acc} -> {n, [n - before | acc]}
end)
|> elem(1)
|> Enum.reverse()
end
defp all_zero?(list) do
list
|> Enum.all?(&(&1 == 0))
end
defp step_halt_or_cont(list) do
case all_zero?(list) do
true -> :halt
false -> :cont
end
end
defp do_solve([first_list | tail_list_of_lists]) do
tail_list_of_lists
|> Enum.with_index(1)
|> Enum.reduce(Enum.at(first_list, 0), fn {list, index}, acc ->
case rem(index, 2) do
1 -> acc - Enum.at(list, 0)
0 -> acc + Enum.at(list, 0)
end
end)
end
defp parse(input) do
input
|> String.split("\n", trim: true)
|> Enum.map(fn s ->
s
|> String.split(" ")
|> Enum.map(&String.to_integer/1)
end)
end
end
Awesome2.run(input)
解けました 
I just completed "Mirage Maintenance" - Day 9 - Advent of Code 2023 https://t.co/h6MIg7Tsop #AdventOfCode
— TORIFUKU Kaiou (@torifukukaiou) December 9, 2023
さいごに
Advent of code 2023のDay 9: Mirage MaintenanceをElixirで解きました。
Advent of code 2023は己との闘い、まさに闘魂です。
リポジトリにあげておきます。
人類は不老不死の霊薬を意味する素敵なプログラミング言語Elixirを手に入れました。並行処理を他のプログラミング言語よりも比較的容易に書くことができます。それはきっとコンピュータ資源を有効活用できることにつながるでしょう。巡り巡って世界平和に貢献できることでしょう。
さあ、そこのあなたもElixirの世界へようこそ。
手始めにエリクサーチなんていかがでしょうか。私のオススメです。
闘魂とは、 「己に打ち克つこと。そして闘いを通じて己の魂を磨いていくことである」 との猪木さんの言葉をそのまま胸に刻み込んでいます。
知っているだけで終わらせることなく、実行する、断行する、一歩を踏み出すことを自らの行動で示していきたいとおもいます。
アントニオ猪木さんのメッセージから元氣をもらったものとして、それを次代に語り継ぎ、自分自身が「闘魂」を体現するものでありたいとおもいます。
$\huge{元氣ですかーーーーッ！！！}$
$\huge{元氣があればなんでもできる！}$
$\huge{１、２、３ ぁっダァー！}$