From 994a71edcd0353bddf71008fd5599c97098a966c Mon Sep 17 00:00:00 2001
From: Leah Neukirchen <leah@vuxu.org>
Date: Tue, 8 Dec 2020 17:40:58 +0100
Subject: day07

---
 day07.ijs | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100644 day07.ijs

(limited to 'day07.ijs')

diff --git a/day07.ijs b/day07.ijs
new file mode 100644
index 0000000..c0c7035
--- /dev/null
+++ b/day07.ijs
@@ -0,0 +1,20 @@
+load 'aoc.ijs'
+
+ex =: 3 : 0
+'n a b z' =. y
+(".`0:@.(-:&'no') n); a,' ',b
+)
+
+parse =: 3 : 0
+(<' 'joinstring 2 {. f),<ex"1 }. _4]\ f=.(<;._1)' ',y
+)
+
+d =: (parse every lines 'day07'), ('other bags.'); <0 2$''
+
+look =: 4 : '{. > }. y {~ ({."1 y) i. < x'
+
+part1 =: ([: +./ [: >@$:@> 1{"1 look&d)`1:@.(-:&'shiny gold')
+<: +/part1 every {."1 d   NB. 278 slow :/
+
+part2 =: [: >:@(+/) (>@{. * $:&>@}.)"1 @ look&d`0:@.(-:&'other bags.')
+<: part2 'shiny gold'  NB. 45158
-- 
cgit 1.4.1