                                               :else :black)))
           :edge->descriptor viz/edge->descriptor
           :options {:dpi 64})
-        ['context
-         update-map
-         'original-root
-         root
-         'updated-root
-         root'
-         'updated-tablets
-         (mdag/get-data store (meta root') "0/base")
-         (mdag/get-data store (meta root') "0/bc")
-         (mdag/get-data store (meta root') "1/base")
-         (mdag/get-data store (meta root') "1/bc")
-         #_ (mdag/get-data store (get-in root' [::part/tablets :base]))
-         #_ (mdag/get-data store (get-in root' [::part/tablets :bc]))])
+        ['context update-map
+         'original-root (link/identify root) root
+         'updated-root (link/identify root') root'])
       (catch Exception ex
         (throw (ex-info "Error updating tree!"
                         {:context update-map

   :changes {(key/create [5]) {:a 5}
             (key/create [6]) {:x 6}
             (key/create [7]) {:y 7}}})

                        ex))))))


(def example-reuse
  {:families {:bc #{:b :c}},
   :records {(key/create [0]) {},
             (key/create [5]) {:a true
                               :b :abc
                               :c #{"g" "h" "i"}
                               :d #uuid "348f877b-eb00-4bf2-bced-0ea47991f627"}}
   :changes {(key/create [0]) {}
             (key/create [2]) {}}})


(def example-subtree
  {:families {:bc #{:b :c}}
   :records {(key/create [0]) {:a 0 :b 0 :c 0}
             (key/create [1]) {:a 1, :c 1}
