Rename q to v for velocity.

jayfoad · Dec 10, 2018 · 310e876 · 310e876
1 parent 81068cc
commit 310e876
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/p10.dyalog b/p10.dyalog
@@ -1,7 +1,7 @@
 p←↑⍎¨¨'-?\d+'⎕S'&'¨⊃⎕NGET'p10.txt'1
-q←0 2↓p ⋄ p←0 ¯2↓p
+v←0 2↓p ⋄ p←0 ¯2↓p
 mean←+⌿÷≢
-n←⌊0.5+mean,-(p-⍤1 mean p)÷(q-⍤1 mean q)
-c←(⊢-⍤1⌊⌿)p+n×q
+n←⌊0.5+mean,-(p-⍤1 mean p)÷(v-⍤1 mean v)
+c←(⊢-⍤1⌊⌿)p+n×v
 ⍉'#'@(↓⎕IO+c)⊢(1+⌈⌿c)⍴'' ⍝ part 1
 n ⍝ part 2