               bounce (get-in @app [:settings :bounce])
               red-trampete (get-in @app [:settings :red-trampete])
               blue-trampete (get-in @app [:settings :blue-trampete])
+              settings (get-in @app [:settings])
               new-hero (-> original-hero
                            grav
                            ((partial vertical-block original-hero))

                   :settings {:bounce [3]
                              :red-trampete [5]
                              :blue-trampete [3]
                              }})

(def app-state (local-storage (atom default-data) "game"))

    )
  )

(defn time-up? [settings app hero]
  (if (> 0 (first (get-in settings [:time])))
    (merge hero {:life 0})
    (do
      (om/transact! app [:settings :time 0] (fn [old-time] (do
                                                             (console-log old-time)
                                                             (- old-time 0.04))))
      hero
          )))

(defn game-over? [original-hero hero]
  (if (or (> 0 (get-in hero [:position :bottom]))
          (> 0 (get-in hero [:life])))
