Day 6 part 2 super fast avoiding all outer products.

jayfoad · Dec 7, 2018 · 2d7ab0c · 2d7ab0c
1 parent 5b9c410
commit 2d7ab0c
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/p6linear.dyalog b/p6linear.dyalog
@@ -0,0 +1,4 @@
+p←↑⍎¨⊃⎕NGET'p6.txt'1
+sort←{(⊂⍋⍵)⌷⍵}
+f←{+\(+/⍵),¯1↓(-≢⍵)++\0,z⊣z[⍵]+←2⊣z←0/⍨⌈/⍵}
++/(sort f⊣/p)⍸9999-f⊢/p ⍝ part 2