Day 14 solution based on JW Buitenhuis's K solution.

jayfoad · Dec 14, 2018 · 2337291 · 2337291
1 parent fd1e99f
commit 2337291
Show file tree

Hide file tree

Showing 2 changed files with 13 additions and 0 deletions.
diff --git a/p14.dyalog b/p14.dyalog
@@ -0,0 +1,12 @@
+⎕IO←0
+input←⍎⊃⊃⎕NGET'p14.txt'1
+scores←3 7
+
+nxt←{(≢scores)|⍵+1+cur⊣scores,←(t<10)↓10 10⊤t←+/cur←scores[⍵]}
+super←{nxt⍣(⌈0.2×≢scores)⊢⍵}
+pos←super⍣{input<¯10+≢scores}0 1
+∊⍕¨r←10↑input↓scores ⍝ part 1
+
+match←⍎¨⍕input
+{}super⍣{∨/match⍷scores}pos
+⊃⍸match⍷scores ⍝ part 2
diff --git a/p14.txt b/p14.txt
@@ -0,0 +1 @@
+640441