Day 22 solution, very slow.

jayfoad · Dec 22, 2018 · 51c5f0b · 51c5f0b
1 parent 9980a8d
commit 51c5f0b
Show file tree

Hide file tree

Showing 2 changed files with 15 additions and 0 deletions.
diff --git a/p22.dyalog b/p22.dyalog
@@ -0,0 +1,13 @@
+⎕IO←0
+p←⍎¨¨'\d+'⎕S'&'¨⊃⎕NGET'p22.txt'1
+depth←⊃⊃p ⋄ target←⊃⌽p
+el←20183|depth+⊢
+gi←{⍵≡0 0:0 ⋄ ⍵≡target:0 ⋄ 0∊⍵:16807 48271+.×⍵ ⋄ (el g[⊂⍵-0 1])×el g[⊂⍵-1 0]}
+g←0⍴⍨⌈7×target ⋄ {g[⊂⍵]←gi ⍵}¨⍳⍴g
+t←3|el g ⍝ type
++/,t↑⍨1+target ⍝ part 1
+
+m←0@(⊂0 0 1)⊢1E6⍴⍨3,⍨⍴t ⍝ last axis: 0=neither, 1=torch, 2=climbing gear
+mv←{z←1+(1e6⍪⍨1↓⍵)⌊(1e6⍪¯1↓⍵)⌊(1e6,[1]⍨0 1↓⍵)⌊(1e6,[1]0 ¯1↓⍵) ⋄ z[t,¨⍨⍳⍴t]←1E6 ⋄ ⍵⌊z} ⍝ move
+cg←{z←⍵⌊⍤1 0⊢7+⌊/⍵ ⋄ z[t,¨⍨⍳⍴t]←1E6 ⋄ z} ⍝ change gear
+(target,1)⌷cg∘mv⍣≡m ⍝ part 2
diff --git a/p22.txt b/p22.txt
@@ -0,0 +1,2 @@
+depth: 8112
+target: 13,743