 
 (defn make-cell-list [size]
   (->
-    (sq size)
+    size
+    sq
     dec
     range
     vec



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

            (if (= media-error :denied)
              (:cam-denied strings)
              (:cam-failed strings))
            (apply dom/button
              (if camera-waiting?
                [#js {:className "wait"} "hold on"]
                [#js {:onClick get-camera!} "try again"]))
            (dom/button #js {:onClick #(js/open source-url)} "view cellf source"))

        no-stream?
