(dispatch-fn multifn)
Given a multimethod, return its dispatch-fn.
(defn dispatch-fn [multifn] (-dispatch-fn multifn))