     (q/scale -1 1)
     (when p-image
       (q/image p-image 0 0)
-      #_(draw-centroids state))
+      (draw-centroids state))
     (q/pop-matrix)))
 
 (defn on-close

      (assoc-in state [:gray-mat]
                (cv/gray-mat->otsu-gaussian-bw gray-mat bw-mat
                                               (:output-mat state)
                                               {:threshold-type Imgproc/THRESH_BINARY_INV
                                                :blur-k-size (Size. 51 51)})))
    state))

(defn update-gray-p-image

   :bw-mat (Mat.)
   :camera (cv/camera 0)
   :p-image (q/create-image WIDTH HEIGHT :rgb)
   :detector (FeatureDetector/create FeatureDetector/SIMPLEBLOB)
   :blob-points (MatOfKeyPoint.)})

(defn update-gray-mat
  [{:keys [frame-mat gray-mat bw-mat] :as state}]
