 
 (defn init! []
   (mount-root))
+
+(st/instrument)

(ns tester.core
  (:require [reagent.core :as reagent]
            [clojure.test.check.generators]
            [cljs.spec.impl.gen :as gen]
            [cljs.spec :as s]))


(def screen-height (.-innerHeight js/window))

(def tile-width (/ (min screen-height screen-width) board-size))

(s/def ::within-board-size (s/int-in 0 board-size))
(s/def ::x ::within-board-size)
(s/def ::y ::within-board-size)
(s/def ::direction directions)
(s/def ::position (s/tuple ::within-board-size ::within-board-size))

(s/def ::tile pos-int?)

(s/def ::game-board (s/map-of ::position ::tile :max-count (* board-size board-size) :min-count 2))
(s/def ::app-db (s/keys :req [::game-board ::direction]))

