2 files changed, 0 insertions, 56 deletions
diff --git a/2021/day-02/day-02.ex b/2021/day-02/day-02.ex
deleted file mode 100644
index d37ab05..0000000
--- a/2021/day-02/day-02.ex
+++ /dev/null
@@ -1,32 +0,0 @@
-defmodule Day02 do
-  def part_one(data) do
-    data
-    |> Enum.reduce(%{pos: 0, dep: 0}, &method_one/2)
-    |> get_answer()
-  end
-
-  def part_two(data) do
-    data
-    |> Enum.reduce(%{pos: 0, dep: 0, aim: 0}, &method_two/2)
-    |> get_answer()
-  end
-
-  defp method_one({:forward, x}, s), do: %{s | pos: s.pos + x}
-  defp method_one({:up, x}, s), do: %{s | dep: s.dep - x}
-  defp method_one({:down, x}, s), do: %{s | dep: s.dep + x}
-
-  defp method_two({:forward, x}, s), do: %{s | pos: s.pos + x, dep: s.dep + s.aim * x}
-  defp method_two({:up, x}, s), do: %{s | aim: s.aim - x}
-  defp method_two({:down, x}, s), do: %{s | aim: s.aim + x}
-
-  defp get_answer(s), do: s.pos * s.dep
-end
-
-data =
-  File.read!("day-02/input.txt")
-  |> String.split("\n", trim: true)
-  |> Enum.map(&String.split/1)
-  |> Enum.map(fn [dir, amt] -> {String.to_atom(dir), String.to_integer(amt)} end)
-
-Day02.part_one(data) |> IO.inspect()
-Day02.part_two(data) |> IO.inspect()
diff --git a/2021/day-02/day-02.rkt b/2021/day-02/day-02.rkt
deleted file mode 100644
index 0bd0c3d..0000000
--- a/2021/day-02/day-02.rkt
+++ /dev/null
@@ -1,24 +0,0 @@
-#lang racket
-(require advent-of-code
-         threading
-         algorithms)
-
-(define motion-data
-  (~> (open-aoc-input (find-session) 2021 2 #:cache (string->path "./cache"))
-      (port->list read _)
-      (chunks-of _ 2)))
-
-;; part 1
-(for/fold ([depth 0] [position 0] #:result (* depth position)) ([motion (in-list motion-data)])
-  (match motion
-    [(list 'forward x) (values depth (+ position x))]
-    [(list 'up x) (values (- depth x) position)]
-    [(list 'down x) (values (+ depth x) position)]))
-
-;; part 2
-(for/fold ([aim 0] [depth 0] [position 0] #:result (* depth position))
-          ([motion (in-list motion-data)])
-  (match motion
-    [(list 'forward x) (values aim (+ depth (* aim x)) (+ position x))]
-    [(list 'up x) (values (- aim x) depth position)]
-    [(list 'down x) (values (+ aim x) depth position)]))