    :insert        q-insert
    :update        q-update
    :delete        q-delete
+   :explain       q-explain
    :create-index  q-create-index
    :drop-index    q-drop-index
    :list-indexes  q-list-indexes

            old-records)]
    [(assoc db :rmap new-rmap :imap new-imap) num-old-records]))

(defn- q-create-index [db {:keys [on where]}]
  (let [records (vals (:rmap db))
        index


(defn- where-plans [db where order]
  [{:action  :db-scan
    :order   [:id :asc]
    :size    :db
    :cost    [:scan :db]}])
