   (mk-anim-fn 0.1 [:bub0 :bub1 :bub2 :bub3] ))
 
 
-
-(defmulti update-view! (fn [k v] k))
-
-(defmethod update-view! :dims [k v]
-  )
-
-(defmethod update-view! :zoom [k v]
-  )
-
-
 #_({:start-velocity 10
-  :target-velocity 0
-  :start-time 10
-  :target-time 100
-  })
+    :target-velocity 0
+    :start-time 10
+    :target-time 100
+    })
 
 
 (defn main []

            fps   (format "%0.2f" (* (/ 3600 1000)  dt )) ]


        (dom/div nil
                (om-slider "scale" game-view :scale [1 10] #(msg! :set-scale %))
                (om-slider "time" game-view :time-speed [0 5] #(msg! :set-time-speed %))
                
                )


        #_(html
          [:div
           [:p (str "ROGUEBOW ISLANDS : " msecs " " fps)]
           ])))))

;; }}}


                                :e-func func}} ))


(defn game-component [data owner]
  (reify
    om/IWillMount
