             [clojure.math.combinatorics :as combo])
   (:gen-class))
 
-(def width-heuristic-calculation 6)
+(def width-heuristic-calculation 5)
 (def directors {:h (map #(do [%1 0]) (range -5 6))
                 :v (map #(do [0 %1]) (range -5 6))
                 :d1 (map #(do [%1 %1]) (range -5 6))
                 :d2 (map #(do [%1 (- %1)]) (range -5 6))})
-
 
 (defn gen-heuristic-dictionary
   "Generate the dictionnary of heuristics values"

                              grid-width
                              grid-height)]
        (prn "Decision: " decision)
        (into [] decision)

        )))

  (defn chantest
    []

(defn calc-heuristic
  ""
  [list-to-check player opponent]

  (+
    (calc-positive-heuristic list-to-check player opponent))


  (- (calc-positive-heuristic list-to-check player opponent)
     (calc-positive-heuristic (reverse list-to-check) opponent player)))

