 (defonce PhysicsEngine (.. famous -physics -PhysicsEngine))
 (defonce physics (.. famous -physics))
 (defonce math (.. famous -math))
-(defonce Box (.. physics -Box))
+(defonce FamousBox (.. physics -Box))
 (defonce Spring (.. physics -Spring))
 (defonce RotationalSpring (.. physics -RotationalSpring))
 (defonce RotationalDrag (.. physics -RotationalDrag))

                      :dots dots}]
    (.. back-node
        (setSizeMode 1 1)
        (setAbsoluteSize 240 240)
        (setPosition 40 0 0)
        (setAlign 0 0.5 0)
        (setMountPoint 0 0.5 0))
    (.. next-node
        (setSizeMode 1 1)
        (setAbsoluteSize 240 240)
        (setPosition -40 0 0)
        (setAlign 1 0.5 0)
        (setMountPoint 1 0.5 0))

      (setProperty "lineHeight" "40px")
      (setProperty "cursor" "pointer")
      (setProperty "textHighlight" "none")
      (setProperty "zIndex" "2"))
  (.. (GestureHandler. arrow-node) (on "tap" (fn []
                                               (println text)))))

(defn decorate-dots [dots-node]
  (let [dot-nodes (.. dots-node getChildren)
