Enumerate parameters permitted by some clojure spec

ns.clj

(ns scratch.ns
  (:require
   [clojure.spec.alpha :as s]))

(s/def ::foo string?)
(s/def ::bar string?)
(s/def ::baz string?)

(s/def ::yolo (s/keys :req-un [::foo ::bar]
                      :opt-un [::baz]))

(let [[_ & rest] (s/form ::yolo)]
  (let [entity-def (->> (partition 2 rest)
                        (map vec)
                        (into {}))]
    (concat
     (:req-un entity-def)
     (:opt-un entity-def))))