                  :width           size                      ;size
                  :borderRadius    (/ size 2)
                  }}
-        (ionicon {:name  "ios-wine"                         ;"ios-radio-button-on"
-                  :size  100
-                  :flex  1
-                  :style {:color           "white"
-                          :backgroundColor "rgba(0,0,0,0)"
-                          :transform       [{:scale (/ size 100)}]
-                          }})))
+        (view
+          {:style {:transform (clj->js [{:translateX 10}
+                                        {:translateY -99}
+                                        {:scale (/ size 100)}
+                                        {:translateX (/ (* -9 100) size)}
+                                        {:translateY (/ (* 100 100) size)}
+                                        ])}}
+          (ionicon {:name  "ios-wine"                      ;"ios-radio-button-on"
+                    :size  100
+                    :style {:width           100
+                            :textAlign       "center"
+                            :color           "white"
+                            :backgroundColor "rgba(0,0,0,0)"
+                            }}))))
 
 (defn draw-n-square
   [n]

                  (draw-square {:size 50}))))
        ))

(def row0 [0 0 0 0 0])
(def row1 [0 0 1 0 0])
(def row2 [0 1 0 1 0])
(def row3 [0 1 1 1 0])
(def row4 [1 1 0 1 1])
(def row5 [1 1 1 1 1])
(def rown [row0 row1 row2 row3 row4 row5])
(def block10 [row5 row5])
(defn approw [b n] (if (< n 6)
                     (conj b row0 (rown n))
                     (conj (approw b 5) (rown (- n 5)))))
(def block20 (approw block10 10))
(def block30 (approw block20 10))
(def block40 (approw block30 10))
(def dice {1  [[1]]
           2  [[1 0]
               [0 1]]

                   :style {:flexDirection  "row"
                           :justifyContent "space-around"}}
                  (for [[j col] (zipmap (range) row)]
                    (draw-square {:size  (if (zero? col) (/ a 3) a)
                                  :draw? (not (zero? col))
                                  :key   (str "c" j)})))))))

