         (= (:type command) "create")
         (if reversed
           (simple-update "INSERT DATA { ?s ?p ?o }"
-                         ()
+                         (res (:value command))
                          (prop (:predicate command))
                          (res (:uri command)))
           (simple-update "INSERT DATA { ?s ?p ?o }"
                          (res (:uri command))
                          (prop (:predicate command))
-                         (plit (:value command))))
+                         (res (:value command))))
+
+        (= (:type command) "delete")
+        (if reversed
+          (simple-update "DELETE DATA { ?s ?p ?o }"
+                         (res (:value command))
+                         (prop (:predicate command))
+                         (res (:uri command)))
+          (simple-update "DELETE DATA { ?s ?p ?o }"
+                         (res (:uri command))
+                         (prop (:predicate command))
+                         (res (:value command))))
+
        ))
 
 (comment (if reversed

          func (:update (bound-func binding inf))
          binder (.getURI (.getPredicate statement))
          predicate (.asResource (.getObject statement))
          bindings (get-all-bindings inf predicate)
          pred (.getURI predicate)
          resource (res uri)
          reverse (= binder (db :binds))
          graph-store (. GraphStoreFactory create model)
          command (func uri pred data)
          update (query-builder command reverse)
          ]

      (println "!!!!!!!! " update)
      (. UpdateAction execute update graph-store)
      command)))

(defn serializer
  ([view-data]

      (let [inf (. ModelFactory createRDFSModel view-data)
            root (.asResource (.getObject (.getProperty inf
                                                        (res (:root db))
                                                        (prop (:haschild db)))))]

        (s-rec root inf)
        ))
  ([view-data binding]

      (let [inf (. ModelFactory createRDFSModel view-data)]

        (s-rec binding inf)
        )))





        (.getObject
         (.getProperty model binding (prop "http://www.w3.org/1999/02/22-rdf-syntax-ns#type"))))))

(defn literalize [res]
  (if (.isLiteral res)
    (.getString (.asLiteral res))
    (.toString res)))

(def dc (uris "http://purl.org/dc/elements/1.1/" :title :description))

