From 8ca091e841ae891bfd556cf55e519a1ccf014281 Mon Sep 17 00:00:00 2001
From: Leah Neukirchen <leah@vuxu.org>
Date: Sat, 18 Dec 2021 17:07:40 +0100
Subject: day17

---
 day17.bqn | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 day17.bqn

(limited to 'day17.bqn')

diff --git a/day17.bqn b/day17.bqn
new file mode 100644
index 0000000..f85adbf
--- /dev/null
+++ b/day17.bqn
@@ -0,0 +1,10 @@
+lx‿ux←209‿238 ⋄ ly‿uy←¯86‿¯59
+
+# •Show ÷⟜2 (⊣ × -⟜1) |⊑y
+•Show +´↕|ly
+
+Check ← { ⟨⟨x,y⟩,⟨vx,vy⟩⟩: { (lx≤x)∧(x≤⊑ux)∧(ly≤y)∧(y≤uy) ? 1 ;
+                             y < ly ? 0 ;
+                             Check ⟨⟨x+vx, y+vy⟩, ⟨vx-×vx, vy-1⟩⟩ } }
+
+•Show +´ ⥊ {Check ⟨0,0⟩‿𝕩}¨ (<1⋈ly)+↕⟨ux,2×|ly⟩
-- 
cgit 1.4.1