From 29b676419f3ff693569fdc5bca5f55adfff913f4 Mon Sep 17 00:00:00 2001
From: Jay Foad <jay.foad@gmail.com>
Date: Sun, 30 Dec 2018 10:14:51 +0000
Subject: [PATCH] Day 7 part 2.

---
 p7.dyalog | 1 +
 1 file changed, 1 insertion(+)

diff --git a/p7.dyalog b/p7.dyalog
index 79050ed..cdc76cb 100644
--- a/p7.dyalog
+++ b/p7.dyalog
@@ -1,3 +1,4 @@
 ⎕IO←0
 p←5 36∘.⌷⊃⎕NGET'p7.txt'1
 ⎕A{0=≢⍺:⍬ ⋄ s,(⍺~s)∇⍵/⍨(⊣⌿⍵)≠s←⊃⍺~⊢⌿⍵}p ⍝ part 1
+⍬{0=≢,w←⍵/⍨~(⊣⌿⍵)∊⍺~a←' '@(⍺⍳∪⍺)⊢⍺:0 ⋄ t←(5-≢∪a)↑(∪,w)~a,⊢⌿w ⋄ 1+(a,t/⍨61+⎕A⍳t)∇w}p,⍨2↑⍉⍪⎕A ⍝ part 2