diff --git a/p3fast.dyalog b/p3fast.dyalog
new file mode 100644
index 0000000..edb0c53
--- /dev/null
+++ b/p3fast.dyalog
@@ -0,0 +1,6 @@
+⎕IO←0
+p←⍎¨¨'\d+'⎕S'&'¨⊃⎕NGET'p3.txt'1
+q←{(a b c d e)←⍵ ⋄ ,(b+⍳d)∘.+1000×c+⍳e}¨p
+g←1E6/0 ⋄ g[⊃,/q]+←1 ⍝ grid
++/,1<g ⍝ part 1
+⊃⊃p/⍨{∧/1=g[⍵]}¨q ⍝ part 2