                  (dom/div nil 
                           (dom/button 
                             #js {:onClick (partial toggle-play-state app)}
-                            (if (:playing? app) "stop" "play")))
+                            (if (:playing? app) "stop" "play"))
+                          (dom/button
+                            #js {:onClick #(reset-random!)}
+                            "random"))
                  (apply dom/svg #js {:height (* height cell-size) 
                                      :width (* width cell-size)
                                      :onClick (partial handle-world-click 

                      (disj cells cell)
                      (conj cells cell))))))
                  

(defn world
  [app owner]

           app-state
           {:target (. js/document (getElementById "app"))}))


(defn main []
  (draw! app-state)
  (live! app-state))
