                                    [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0]]
                                   rows columns))
 
-
-
-
-
 ;; -------------------------
 ;; View
 

            :on-mouse-out #(set-preview nil)
            :class "small-btn blue"} name])

(defn game-of-life []
  [:div {:style {:margin "0px 0px 0px 0px"}}
   [:div [:h3 "Game of life"]
    [game-of-life-board]]

   (let [running? (not (nil? (:timer @app-state)))]
     [:div
      [:div {:class "half-size"}
       [:button {:on-click #(start-game!)
                 :disabled running?
                 :class "full-btn green"} "PLAY"]]
      [:div {:class "half-size"}
       [:button {:on-click #(stop-game!)
                 :disabled (not running?)
                 :class "full-btn red"} "PAUSE"]]])
   [:div
    [:button {:on-click #(reset-board!)
              :class "full-btn dark-gray"} "CLEAR"]]

   [:div
    [:h5 "space ships"]

                                    [0 0 0 1 1 1]
                                    [0 0 0 1 1 1]] rows columns))

(defonce queenbee (utils/expand-to [[0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0]
                                    [0 0 0 0 0 0 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0]
                                    [0 0 0 0 0 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 1 1]
                                    [1 1 0 0 0 1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 1 1]
