 
 (enable-console-print!)
 
-(def app-state (atom {:grid {:width 10 :height 10 :cells {}}
-                      :display {:width 600 :height 600}
-                      :started false}))
+(def app-state {:grid {:width 10 :height 10 :cells {}}
+                :display {:width 600 :height 600}
+                :started false})
 
 
 (defn cell-view

      (om/transact! data (fn [d] (assoc d :result :none))))))


(om/root
 (gen-app-view a/labour-market-model)
 app-state
 {:target (. js/document (getElementById "app"))
  :init-state {:animation-step 500}})


(def ^:private empty-view
  (fn [data owner] (reify om/IRender (render [_] (dom/span nil "")))))

(declare render-menu-view)

(defn gen-app-view
  ([automaton-spec]
