   (let [result (mc/find-one-as-map "phrases"
                                    (if for-auth?
                                      {:users user-id
+                                      :usersCount {$gt 5}
                                       :random_point {"$near" [(rand) 0]}}
                                      {:users {$ne user-id}
                                       :random_point {"$near" [(rand) 0]}})

                               :user_id 1
                               :random_point "2d"})
  (mc/ensure-index "phrases" {:random_point "2d", :users 1})
  (mc/ensure-index "phrases" {:phrase-id 1})
  (mc/ensure-index "phrases" {:phrase 1} {:unique 1 :dropDups 1})
  (mc/ensure-index "classifiers" {:user_id 1

                           ; This will be used to store the id's of users who
                           ; have completed training with this phrase.
                           :users []
                           :usersCount 0
                           :random_point [(rand) 0]}) phrases)))

(defn identity
