    [reagent.core :as reagent]))
 
 (def window-width (reagent/atom nil))
+
+(defonce points (->> 100 range (map (fn [x] [x x])) doall atom))
 
 (defn on-window-resize [evt]
   (reset! window-width (.-innerWidth js/window)))

  (reagent/render [home]
                  (.getElementById js/document "app"))
  (.addEventListener js/window "resize" on-window-resize))

  (println value)
  value)

(defn draw-pixel [ctx [x y]]
      (-> ctx
          (.fillRect x y 1 1)))

(defn draw-pixels [ctx col]
    (doall (map (fn [p] (draw-pixel ctx p)) col)))

(defn draw-canvas-contents [canvas]
  (let [ctx (.getContext canvas "2d")
        w (.-clientWidth canvas)
        h (.-clientHeight canvas)]
    (draw-pixels ctx @points)))

(defonce dom-node (reagent/atom nil))

