    [quil.middleware :as m]
    [videotest.basic-mover.cv :as cv])
   (:import
-   [org.opencv.core CvType Mat MatOfByte MatOfFloat MatOfPoint MatOfPoint2f]))
+   [org.opencv.core CvType Mat]))
 
 
 (def CAM-SIZE (cv/camera-frame-size))

    (q/translate WIDTH 0)
    (q/scale -1 1)
    (q/image p-image 0 0)
    #_(draw-flow state)
    (q/pop-matrix)))

(defn on-close

(defn update [state]
  (-> state
      (cv/update-frame)
      (cv/update-p-image)))

(defn draw [state]
  (let [{:keys [p-image]} state]
