   (assoc query :aggregations (facet-aggregations (:nested-science-keywords? query))))
 
 (defn- buckets->value-count-pairs
-  "Processes an elasticsearch aggregation response of buckets to a sequence of value and count tuples"
+  "Processes an elasticsearch aggregation response of buckets to a sequence of value and count
+  tuples"
   [bucket-map]
   (->> bucket-map
        :buckets

               (r/map->ValueCountMaps
                 {:value field-key
                  :count coll-count})))
           (into [])
           (assoc response :value-count-maps)))))

(defn- science-keywords-bucket->facets

(defn- terms-facet
  [field]
  ;; We shouldn't try to handle this many different values.
  ;; We should have a limit and if that's exceeded in the elastic response we should note that in
  ;; the values returned. This can be handled as a part of CMR-1101.
  {:terms {:field field :size 10000}})

(def ^:private collection-count-aggregation
