 (defn qount
   []
   [{:$count "count"}])
-
-(defn dedup
-  []
-  [{:$group {:_id "$gid" :dedup {:$first "$$ROOT"}}}
-   {:$replaceRoot {:newRoot "$dedup"}}])
-
-(defn dedup-on
-  [field]
-  (let [path (dollar field)]
-    [{:$group {:_id path :dedup {:$first "$$ROOT"}}}
-     {:$replaceRoot {:newRoot "$dedup"}}]))
-
-    ;; {:$group {:_id dollar (keyword field) {:$first dollar} :_history {:$addToSet "$_history"}}}
 
 (defn offset
   [n]

    (to-edge edge-label)
    (to-vertex vertex-label where))))

(defn values
  [values]
  [{:$project

(defn dollar
  [s]
  (str "$" (name s)))

(defn dedup
  []
  [{:$group {:_id "$gid" :dedup {:$first "$$ROOT"}}}
   {:$replaceRoot {:newRoot "$dedup"}}])

(defn dedup-on
  [field]
  (let [path (dollar field)]
    [{:$group {:_id path :dedup {:$first "$$ROOT"}}}
     {:$replaceRoot {:newRoot "$dedup"}}]))

    ;; {:$group {:_id dollar (keyword field) {:$first dollar} :_history {:$addToSet "$_history"}}}

(defn where
  [where]
