From ef621d0fdb1f6880f00f9b7f997ebf555a5621e3 Mon Sep 17 00:00:00 2001
From: tristan <tristan@tristans.cloud>
Date: Sat, 14 Dec 2024 12:48:29 +0000
Subject: [PATCH] 2024 day 14 part 2 in nix

---
 2024/14/solution.nix | 29 ++++++++++++++++++++++++++---
 1 file changed, 26 insertions(+), 3 deletions(-)

diff --git a/2024/14/solution.nix b/2024/14/solution.nix
index 298de7d..c14b1cc 100644
--- a/2024/14/solution.nix
+++ b/2024/14/solution.nix
@@ -1,6 +1,6 @@
 {lib, ...}: input: let
   inherit (lib.strings) trim splitString toIntBase10;
-  inherit (builtins) match elemAt filter length;
+  inherit (builtins) match elemAt filter length genList concatStringsSep;
   # real
   width = 101;
   height = 103;
@@ -45,12 +45,31 @@
       x = if x < 0 then width + x else x;
       y = if y < 0 then height + y else y;
     };
-    # inherit vel;
   };
 
+  printMap = robots: genList (y:
+    genList (x:
+      robots
+        |> filter ({pos,...}: pos == {inherit x y;})
+        |> length
+        |> (amt: if amt == 0 then "." else toString amt)
+    ) width
+    |> concatStringsSep ""
+  ) height
+  |> concatStringsSep "\n";
+
+  anim = {start, period}: 100 |> genList (i: let
+    seconds = (i * period) + start;
+  in robots |> map (pass (seconds)) |>
+  (room: ''
+    seconds: ${toString seconds}
+    ${printMap room}
+  '')
+  ) |> concatStringsSep "\n";
+
 in {
 
-  inherit width height pass getQuadrants robots;
+  inherit width height pass getQuadrants robots printMap;
 
   part1result = robots 
     |> map (pass 100)
@@ -58,4 +77,8 @@ in {
     |> ({tl, tr, dr, dl}: (length tl) * (length tr) * (length dr) * (length dl))
   ;
 
+  part2result = # figured these settings out after observing the first 500 seconds:
+    anim {start = 14; period = 101;}
+  |> builtins.toFile "robots-anim";
+
 }