 (defn build-cast [node dtype])
 (defn build-ApplyGradientDescent [variable learning-rate gradient-control])
 
-(def linreg-graph (proto/protobuf-load proto-much/proto-graph-def (util/slurp-binary "misc/linreg.pb")))
-(-> linreg-graph :node count)
-(mapv :name (-> linreg-graph :node))
-(filter #(= "Identity" (:op %)) (-> linreg-graph :node))
-(map #(str (:name %) " " (:op %) " " (:input %)) (-> linreg-graph :node))
-
-(def addconst-graph (proto/protobuf-load proto-much/proto-graph-def (util/slurp-binary "misc/addconst.pb")))
-(-> addconst-graph :node count)
-
-(def nonsense-graph (proto/protobuf-load proto-much/proto-graph-def (util/slurp-binary "misc/nonsense.pb")))
-
-(def mnist-simple-graph (proto/protobuf-load proto-much/proto-graph-def (util/slurp-binary "misc/mnist_simple.pbtxt")))
-(def mnist-meta-graph (proto/protobuf-load proto-much/proto-meta-graph-def (util/slurp-binary "misc/mnist_simple.model.meta")))
-
-(-> mnist-meta-graph keys)
+;(def linreg-graph (proto/protobuf-load proto-much/proto-graph-def (util/slurp-binary "misc/linreg.pb")))
+;(-> linreg-graph :node count)
+;(mapv :name (-> linreg-graph :node))
+;(filter #(= "Identity" (:op %)) (-> linreg-graph :node))
+;(map #(str (:name %) " " (:op %) " " (:input %)) (-> linreg-graph :node))
+;(def addconst-graph (proto/protobuf-load proto-much/proto-graph-def (util/slurp-binary "misc/addconst.pb")))
+;(-> addconst-graph :node count)
+;(def nonsense-graph (proto/protobuf-load proto-much/proto-graph-def (util/slurp-binary "misc/nonsense.pb")))
+;(def mnist-simple-graph (proto/protobuf-load proto-much/proto-graph-def (util/slurp-binary "misc/mnist_simple.pbtxt")))
+;(def mnist-meta-graph (proto/protobuf-load proto-much/proto-meta-graph-def (util/slurp-binary "misc/mnist_simple.model.meta")))
+;(-> mnist-meta-graph keys)
 
 (defn parse-node-ref [node-ref]
   (let [[name output] (str/split node-ref #":")]

           [tensorflow-clj.graph.transform :refer :all]
           [tensorflow-clj.util :refer [assoc-not-empty assoc-in-not-empty]]
           [clojure.string :as str]))

(defn def-tensor-nodes [name value dtype dims]
  (let [target (build-node-variable dims dtype :name name)

        reduce-mean-node (build-node-reduce-mean input-node reduction-indices-node)]
    [reduction-indices-node reduce-mean-node]))

;;todo build these for reals
(defn build-loop [loop-node times])
(defn build-train-next-batch [])
