          (render-state [_ state]
            (dom/div
             #js {:className "container-liquid"}
+            (dom/style #js {:media "screen" :type "text/css"}
+                       (automaton-specific-css customization))
             (dom/div
              #js {:className "row"}
              (navigation-button "Menu" render-menu-view)

(def market-model-customization
  (reify
    CellularAutomatonAppCustomization
    (automaton-command-view [_] market-command-view)
    (automaton-command-initial-state [_]
      (let [params (a/market-model-default-params

(def unrestricted-language-parser-customization
  (reify
    CellularAutomatonAppCustomization
    (automaton-specific-css [_] "")
    (automaton-command-view [this] unrestricted-language-parser-command-view)
    (automaton-command-initial-state [_] {})
    (automaton-command-reset [_ input-channel] (put! input-channel {}))
