        (sub (:pub ws-chan) :post ws-sub-chan)
        (go-loop
            [[m c] (alts! [ws-sub-chan e-chan])]
-         
+
          (when m
            (condp = c
              ws-sub-chan (do

                line-material
                points
                p-mat
                w h ]} (om/get-state owner)
        new-line-geo (js/THREE.Geometry.)
        x-event (-> d3 (.extent datoms #(:x %)))
        y-event (-> d3 (.extent datoms #(:y %)))

   (let [w 950 h 500
         line-geo (js/THREE.Geometry.)
         line-material (js/THREE.LineBasicMaterial.  (clj->js  {:color 0x000000
                                                                :lineWidth 1}))]
     {:renderer (js/THREE.WebGLRenderer. (clj->js {:antialias true}))
      :camera (js/THREE.PerspectiveCamera. 45 (/ w h) 1 10000)
      :scene (js/THREE.Scene.)
