                          :style {:flex            0.7
                                  :padding         20
                                  :backgroundColor (:primary palette)}}
-                        ;;
-                        ;; start of better blocking code
-                        ;;
-                        (for [rb (range rblocks)]
-                          (view {:key   rb
-                                 :style {:flex           (/ 1 rblocks)
-                                         :flexDirection  "row"
-                                         :alignItems     "center"
-                                         :justifyContent "center"
-                                         :marginBottom   (if (= rb (dec rblocks)) 0 10)}}
-                                (for [cb (range cblocks)]
-                                  (view {:key   cb
-                                         :style {:flex           (/ 1 cblocks)
-                                                 :alignItems     "center"
-                                                 :justifyContent "center"
-                                                 :marginRight    (if (= cb (dec cblocks)) 0 10)}}
-                                        (let [k (+ cb (* rb cblocks))]
-                                          (draw-block k (- nn (* 25 k))))))))))))))
+                        (view {:key   1
+                               :style {:position        "absolute"
+                                       :top             0
+                                       :bottom          0
+                                       :left            0
+                                       :right           0
+                                       :zIndex          1}}
+                              (view {:style {:flex           1
+                                             :flexDirection "column"
+                                             :justifyContent "center"
+                                             :alignItems     "center"}}
+                                    (view {:style {:flex           1
+                                                   :flexDirection  "row"
+                                                   :justifyContent "center"
+                                                   :alignItems     "center"}}
+                                          (text {:style {:fontSize        180
+                                                         :color           (:light-primary palette)
+                                                         :backgroundColor "rgba(0,0,0,0)"
+                                                         :opacity         0.5
+                                                         }
+                                                 }
+                                                (str nn)))))
+                        (view {:key   2
+                               :style {:position "absolute"
+                                       :top      0
+                                       :bottom   0
+                                       :left     0
+                                       :right    0
+                                       :zIndex   0
+                                       ;:height 1000
+                                       :backgroundColor (:primary palette)}}
+
+                              (for [rb (range rblocks)]
+                                (view {:key   rb
+                                       :style {:flex           (/ 1 rblocks)
+                                               :flexDirection  "row"
+                                               :alignItems     "center"
+                                               :justifyContent "center"
+                                               :marginBottom 10
+                                               }}
+                                      (for [cb (range cblocks)]
+                                        (view {:key   cb
+                                               :style {:flex           (/ 1 cblocks)
+                                                       :alignItems     "center"
+                                                       :justifyContent "center"
+                                                       }}
+                                              (let [k (+ cb (* rb cblocks))]
+                                                (draw-block k (- nn (* 25 k)))))))))))))))
 
 

        rr (:relative-risk scenar)
        nn (number-needed rr br)
        [cols rows cblocks rblocks] (cols-rows-blocked nn)


        palette (get-palette (rum/react palette-index))
        page-style {:flex            1
                    :backgroundColor (:primary palette)}]

(ns unspun.screens.number-needed
  (:require [cljs-exponent.components :refer [element text view image touchable-highlight status-bar scroll-view] :as rn]
            [themes.palettes :refer [get-palette]]
            [shared.ui :refer [n-icon]]
            [unspun.db :refer [app-state palette-index to-pc number-needed stories story-index story-icon text-generator nn1 nn2]]
