             [clojure2d.math.vector :as v]
             [clojure2d.extra.glitch :as g]
             [clojure2d.color :as c]
-            [clojure2d.core :as core])
+            [clojure2d.core :as core]
+            [clojure.pprint :refer [pprint]])
   (:import [clojure2d.pixels BinPixels]
            [clojure2d.math.vector Vec4]))
 


;; Create canvas, windows, binpixels, configuration and iterate until window is closed
;; press `space` to save

(let [config (make-random-config)
      canvas (create-canvas width height)
      [_ run?] (show-window canvas "Harmonograph" 800 800 5)]

        bp))))

(defn draw-on-canvas
  "Render BinPixels to canvas."
  [canvas ^BinPixels bp]
  (p/set-canvas-pixels canvas (p/to-pixels bp
                                           (Vec4. 8 10 15 255)
