      [memory-thread]
      [memory-query]
      [memory-results]]))
-
 
 (defn login-form []
   (let [username  (subscribe [:credentials :username])

      )))


(defn content-section []
  (let [section (subscribe [:ui-state :section])
        token   (subscribe [:credentials :token])]

  (bidi/match-route routes s))

(def history
  (pushy/pushy set-page! bidi-matcher))


;;;;-------------------------
