                                   qa
                                   clara-tups->maps]]
             [clara.rules.accumulators :as acc]
-            [todomvc.tuplerules :refer-macros [def-tuple-session def-tuple-rule]]))
+            [todomvc.tuplerules :refer-macros [def-tuple-session def-tuple-rule def-tuple-query]]))
 
 (defn todo-tx [id title done]
   (merge

;; Queries
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(defquery find-all-done []
  [:all [[e a v]] (= e ?e) (= a ?a) (= v ?v)]
  [:test (= (attr-ns ?a) "todo")])

(defquery find-done-count []
  [?count <- (acc/count) :from [:todo/done]])

(def-tuple-session todos 'todomvc.rules)

(ns todomvc.rules
  (:require [clara.rules :refer [insert insert-all insert! insert-all!
                                 insert-unconditional!
                                 insert-all-unconditional!
