 
 ;(get-from-neo nil)
 
+
+
+
+
+
+
+
+
+
+
+
+   (defonce neo4j-type-index
+     ( try
+     (nn/create-index "types")
+         (catch Exception e (str "caught exception: " (.getMessage e))))
+ )
+
+
+
+   (defn to-nodes4j [results]
+        (into []
+           (map
+             #(get %1 "resultset")
+             results)))
+
+
+   (defn to-maps4j [results]
+        (into []
+           (map
+             #(:data (get %1 "resultset"))
+             results)))
+
+
+   (defn table4j [table-name]
+     (to-maps4j
+         (cy/tquery "START resultset=node:types('type:*') where resultset.type={type} RETURN resultset"
+                    {:type table-name})))
+
+
+
+   (defn nodes4j [table-name]
+     (to-nodes4j
+         (cy/tquery "START resultset=node:types('type:*') where resultset.type={type} RETURN resultset"
+                    {:type table-name})))
+
+
+
+
+   (defn make4j [node]
+      (if (:type node)
+         (let [
+                 node     (nn/create node)
+              ]
+              (nn/add-to-index (:id node)  (:name neo4j-type-index) "type" (:type node))
+         )
+         (throw (new java.lang.Exception "needs a type"))
+      )
+   )
+
+
+
+   ;(make4j {:type "place" :name "Moscow"})
+
+
+
+   ;(table4j "place")
+
+   ;(nodes4j "place")
+
+
+
+
+
+


(defn say-hello [params]
    {:value (into []
         (let [amy (nn/create {:username "amy" :age 27})
                bob (nn/create {:username "bob" :age 28})
                _   (nrl/create amy bob :friend {:source "college"})
                res (cy/tquery "START x = node({ids}) RETURN x.username, x.age" {:ids (map :id [amy bob])})]
            res)
          )}
)




      (>! ch "there")))


(defn add-user [{user-name :user-name password :password}]
  user-name
)




;(add-user {:user-name "zubair"})

(defn get-from-neo [params]
    {:value (into []
