 (def init-block-count 12) ;; Init blocks for red, blue, green, gray
 (def players [:blue :red :green])
 
+
+;; -----------------------------------------
+;; INIT THE BOARD
 ;; -----------------------------------------
 
 (def empty-board


(enable-console-print!)

;; -----------------------------------------

(def board-width 16)

   :turn 0
   ;; From the turn you can deduce the number of turn left
   ;; There is an invariant holding: total score = 12 * 3 + turn
   ;; TODO - Enhance the display to show the available moves (compute them once)
   :scores
   {:blue 12
    :red 12
    :green 12}})


;; -----------------------------------------
;; TAKING CELLS
;; -----------------------------------------

(defn range-single-coord
