 
 
 (defn modal [{:keys [stream media-error show-about? result-gif cells win-state
-                     grid-size tick-ms gif-building?] :as app}]
+                     grid-size tick-ms gif-building? camera-waiting?] :as app}]
   (let [winner?    (and cells (= cells win-state))
         no-stream? (not stream)]
     (dom/div



(defn get-camera! []
  (take!
    (media/get-media)
    (fn [{:keys [status data]}]

(defn inversions [grid]
  (let [cells (order grid)]
    (->>
      grid
      count
      range
      (map
        (fn [n]
          (->>
            cells
            (drop n)
            (filter #(< % (nth cells n)))
            count)))
      (reduce +))))
