; sharpen photo

(open $path 0.75)
(def average-color 
  (pick))
(convolve 
  (sharpen))