     #(= (reduce + (map count (vals %)))
         (count (distinct (apply concat (vals %)))))))
 
-
-
-;; ## Family Functions
 
 (defn- family-lookup
   "Build a lookup function for field families. Takes a map from family keys to

        updates
        (family-groups families data)))
    {} records))

    [clojure.spec :as s]
    [merkle-db.key :as key]))


;; ## Record Keys

;; Count of the records contained under a node.
(s/def ::count nat-int?)
