             [om.dom :as dom :include-macros true]
             [cljs-workspace.morph 
               :as morphic 
-              :refer [set-position set-fill set-extent add-morph remove-morph]]))
+              :refer [set-position set-fill set-extent add-morph remove-morph]]
+            [cljs-workspace.branch-vis :refer [render-tree]]))
 
 (enable-console-print!)
 

  @branch-count)

;; global atom referencing the branch that we currently operate on
(def current-branch (atom {:id (generate-uuid) :data (atom @app-history)}))

;; ffd
(def history-view)

      :else
      (let [b @(@current-branch :data)]
        (when-not (= (last b) n)
          (append-to-branch (@current-branch :data) n)
        (let [c (len @(@current-branch :data))]
            (render-tree @app-history)
            (prn (str c " Saved " (pluralize c "State")))))))

; (om/root
