 ;; Delete column types
 ;;
 
-(defn if-exists
-  []
-  [:if-exists nil])
 
 (defn list-elt
   [column-name n]

                       (.countAll query-builder))
       :what-fcall   (fn fcall-query [query-builder [name args]]
                       (.fcall query-builder name (to-array args)))
       :what-columns (fn [query-builder columns]
                       (reduce (fn [builder column]
                                 (if (string? column)
                                   (.column builder column)
                                   (column builder)))
                               query-builder
                               columns))
       :what-column  (fn column-query [query-builder [column {:keys [as]}]]
                       (let [c (.column query-builder (name column))]
                         (if as
                           (.as c as)

       construct))))

;;
;; Select Query
;;

(defn- complete-select-query
  [statements]
