 (def ALPHA-STILL 255.0)
 
 ;; 32 works
-(def NUM-COL-BINS 64.0)
+(def NUM-COL-BINS 32.0)
 (def DISPLAY-BIN-SIZE (/ DISPLAY-WIDTH NUM-COL-BINS))
 (def NUM-ROW-BINS (/ DISPLAY-HEIGHT DISPLAY-BIN-SIZE))
 

      (update-rgba)
      (update-color-record)
      (overlay-triangles)
      (update-drawn-p-image)))

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

    :triangle-points       tri-pts
    :triangle-orientations tri-orients
    :triangle-glyphs       tri-glyphs
    :color-record {}
    :previous-color-record {}}))

(defn update-rgba [{:keys [rgba-mat frame-mat] :as state}]
  (assoc-in state [:rgba-mat] (cv/BGR->RGBA! frame-mat rgba-mat)))
