2025 Day 7 Part 1

2025-12-15 21:52:35 -05:00 · 2025-12-15 21:52:35 -05:00 · 31029bdb3b
commit 31029bdb3b
parent 72ea0da3c3
1 changed files with 34 additions and 0 deletions
--- a/2025/day07.ua
+++ b/2025/day07.ua
@ -0,0 +1,34 @@
+~ "aoc.ua" ~ Lines
+
+Input ← ⊜∘ ⊸≠ @\n &fras "input/day07.txt"
+Input
+⊃(
+| =@^ ↘1
+| =@S ⊢
+)
+Manifold ←
+Beam     ←
+
+Split ← +⊃(⬚0↻1|⬚0↻¯1)
+
+# Count ? Manifold Beam
+Part₁ ← (
+  ⊙⊙0
+  ∧(
+    # Splitters Beam Count
+    ⊸↧
+    ⊸/+
+
+    # Taken Splits Beam Count
+    ⊃(⋅⊙∘|+⊙⋅⋅∘)
+    # Splits Beam Count'
+
+    ⊸Split
+    ⊙-
+    ≠₀+ # Beam' ? Forked Passthrough
+    # Beam' Count'
+  )
+  ◌
+)
+
+Part₁ Manifold Beam