                  (group-votes subgroup-clusters' base-clusters votes-base)))))
 
 
-      ; {gid {tid consensus}}
+      ; {tid consensus}
       :group-aware-consensus
            (plmb/fnk [group-votes]
              (let [tid-gid-probs

                            (map second)
                            (reduce *)))
                     tid-gid-probs)]
               tid-gid-probs))


      :repness

                     (fn [result [gid gid-stats]]
                       (reduce
                         (fn [result [tid {:keys [A S] :or {A 0 S 0}}]]
                           (let [prob (/ A (+ S 1.0))]
                             (assoc-in result [tid gid] prob)))
                         result
                         (:votes gid-stats)))
                       ;; +1 acts as a dumb prior
