 (defn- all-weights
   [board]
   (into {}
-    (map (fn [point] [point (cell-weight board point)]))
-    cst/all-positions))
+    (for [point cst/all-positions]
+      [point (cell-weight board point)]
+      )))
 
 
 ;; ----------------------------------------------------------------------------


(defn- neighbors-coordinates
  [[x y]]
  (map (fn [[dx dy]] [(+ x dx) (+ y dy)]) cst/directions))

(defn- neighbouring-walls
  [board point]

(ns triboard.ai.scoring
  (:require
    [triboard.logic.constants :as cst]
    [triboard.logic.board :as board]
    ))
