 (def row3 [1 0 1 0 1])
 (def row4 [1 1 0 1 1])
 (def row5 [1 1 1 1 1])
-(def row10 (vec (concat row5 [0] row5)))
+
+(def row10 "row of 10" (vec (concat row5 [0] row5)))
+(def row15 "row of 15" (vec (concat row5 [0] row5 [0] row5)))
 (def rown [row0 row1 row2 row3 row4 row5])
-(def block10 [row5 row5])
-(defn append-block [b n] (if (< n 6)
-                           (conj b row0 (rown n))
-                           (conj (append-block b 5) (rown (- n 5)))))
+
+(def block10 "two rows of 5" [row5 row5])
+
+(defn append-block [b n] (into [] (if (< n 6)
+                                    (conj b row0 (rown n))
+                                    (conj (append-block b 5) (rown (- n 5))))))
+
 (def block20 (append-block block10 10))
 (def block30 (append-block block20 10))
 ;(def block40 (append-block block30 10))
 
-(def block40 (into [] (-> nil
-                         (append-block 8)
-                         (append-block 10)
-                         (append-block 10)
-                         (append-block 10))))
+(def block40 (into [] (next (-> []
+                                (append-block 10)
+                                (append-block 10)
+                                (append-block 10)
+                                (append-block 8)))))
 
 (def dice {1  [[1]]
            2  [[1 0]

               [0 1 0]
               [1 0 1]]
           6  [[1 1 1]
               [0 0 0]
               [1 1 1]]
           7  [[1 1 0]
               [1 1 1]

    :or   {size 100 draw? true key nil}}]
  (view {:key   key
         :style {:backgroundColor "orange"
                 :paddingTop      1
                 :aspectRatio     1
                 :opacity         (if draw? 1 0)
                 :flexDirection   "column"
                 :justifyContent  "center"
                 :alignItems      "center"
                 :width           size                      ;size
                 :borderRadius    (/ size 2)
                 }}
        (view
          {:style {:transform (clj->js [{:scale (/ size 100)}])}}
          (ionicon {:name  "ios-wine"                       ;"ios-radio-button-on"
                    :size  100
                    :style {:width           100
                            :textAlign       "center"
