     (render-state [this state]
       (dom/div
         #js {:className "ui segment"}
-        (dom/h2 nil "Bro.")
         (dom/div
           #js {}
-          (dom/h3 nil "A graph of your ODE solver!")
+          (dom/h3 nil title)
           (dom/svg #js {:className "ode-graph"}))))
 
     om/IWillUpdate

            "ODE Solver in Clojurescript"))
        (dom/div
          #js {:className "dashboard-content"}
          (om/build plotter [["y" "t"] (forward-euler-integrate [dy-dt-1] {:y 0} 0 10 0.01)])
          (om/build plotter [["y" "t"] (forward-euler-integrate [dy-dt-t] {:y 0} 0 10 0.01)])
          (om/build plotter [["y" "t"] (forward-euler-integrate [dy-dt-y] {:y 1} 0 10 0.01)])
          (om/build plotter [["y1" "y2"] (forward-euler-integrate [circle-dy1-dt circle-dy2-dt] {:y1 1 :y2 0} 0 10 0.01)])
          (om/build plotter [["y1" "y2"] (forward-euler-integrate [circle-dy1-dt circle-dy2-dt] {:y1 1 :y2 0} 0 10 0.1)])
          (om/build plotter [["y1" "y2"] (forward-euler-integrate [circle-dy1-dt circle-dy2-dt] {:y1 1 :y2 0} 0 100 0.1)])
          (with-out-str (print (forward-euler-integrate [circle-dy1-dt circle-dy2-dt] {:y1 1 :y2 0} 0 10 1)))
          )))))



      (.datasets
        (om/get-state owner :plot)
        #js [(js/Plottable.Dataset. (clj->js dataset))]))))

(defn fitzhugh-nagumo [{:keys [alpha epsilon gamma Iapp]}]
  (forward-euler-integrate [(fhn-dv alpha epsilon Iapp) (fhn-dw gamma)] {:v 0.64 :w 0} 0 1 0.001))

(defn dashboard-view[app-state owner]
  (reify
