(project xrel ks)
Returns a rel of the elements of xrel with only the keys in ks
(defn project [xrel ks] (set (map #(select-keys % ks) xrel)))