 (defn square-collection
   "create data that's used for generating background squares relative to player position"
   [x y]
-    (flatten (for [squarex (range 0 (* square-width vertical-squares) square-width)]
-      (for [squarey (range 0 (* square-width horizontal-squares) square-width)]
+    (flatten (for [squarex (range 0 (* square-width horizontal-squares) square-width)]
+      (for [squarey (range 0 (* square-width vertical-squares) square-width)]
         {:x (* 20 squarex) :y (* 20 squarey)}))))
 
 (defn square-element [square playerx playery]


(defn square-position [squarex squarey playerx playery]
  {:left (- squarex (* physics-to-pixel playerx))
   :bottom squarey})

(def square-width 10)
(def square-space 100)
(def horizontal-squares (js/Math.round (/ (screen-width) square-space)))
(def vertical-squares (js/Math.round (/ (screen-height) square-space)))


                                        :background-color "red"
                                        :width square-width
                                        :height square-width}
                                       (square-position (:x square) (:y square) playerx playery)
                                       (square-rotation (:x square) (:y square) playerx playery)))} nil))

(defn background-view [player owner]
  (reify
