            (= 1 (count input'))
            (assoc ::idents #{(first input')})))))))
 
+#_
 (s/fdef add
   :args (s/cat :indexes (s/or :index ::indexes :blank #{{}})
                :sym qualified-symbol?


(s/def ::dependency-track (s/coll-of (s/tuple qualified-symbol? ::attributes-set) :kind set?))

(s/fdef pick-resolver
  :args (s/cat :env (s/keys :req [::indexes] :opt [::dependency-track])))


                (reduce merge-io collected (vals matches)))
              collected)))))))

#_
(s/fdef discover-attrs
  :args (s/cat :indexes ::indexes :ctx (s/coll-of ::attribute))
  :ret ::io-map)
