 
 (defn setup []
   (q/frame-rate 10)
+  (q/text-font (q/create-font "Sans Serif" 28 true))
   {:board (add-glider initial-board)
    :paused false})
 

            [clojure.string :as s]))

(def cell-size 10)
(def board-size 30)

(def state->color {0 [255 255 255]
                   1 [0 0 0]})

    (update state :board step)))

(defn draw-state [state]
  (q/stroke 200 200 200)
  (doall
   (for [x (range board-size)
         y (range board-size)]
