diff --git a/p3.dyalog b/p3.dyalog
index 588ecd5..59d0025 100644
--- a/p3.dyalog
+++ b/p3.dyalog
@@ -1,4 +1,5 @@
 p←⍎¨¨'\d+'⎕S'&'¨⊃⎕NGET'p3.txt'1
-g←1000 1000⍴0 ⋄ {(a b c d e)←⍵ ⋄ g[b c∘+¨⍳d e]+←1}¨p ⍝ grid
+q←{(a b c d e)←⍵ ⋄ b c∘+¨⍳d e}¨p
+g←1000 1000⍴0 ⋄ {g[⍵]+←1}¨q ⍝ grid
 +/,1<g ⍝ part 1
-⊃⊃p/⍨{(a b c d e)←⍵ ⋄ ∧/,1=g[b c∘+¨⍳d e]}¨p ⍝ part 2
+⊃⊃p/⍨{∧/,1=g[⍵]}¨q ⍝ part 2